Markov Inequality Plot in R

Question

I have a Normal distribution CCDF plot made in R. I need to apply Markov inequality to this data and plot them at this same plot. How can I implement it? Any help is welcome.

My data and what I have:

n01 <- rnorm(1000, mean = 27947623, sd = 575.839)
ecdf_n01 <- ecdf(n01)
ccdf <- data.frame(x = sort(n01),
                 y = 1-ecdf_n01(sort(n01)))
plot(ccdf)

The Markov inequality formula:

𝑃[𝑋≥𝑘]≤𝐸[𝑋]/𝑘

user2554330 · Accepted Answer · 2022-09-24 20:19:02Z

0

After the plot you've already drawn, add this code:

x <- sort(n01)
y <- mean(n01)/x
lines(x, y)

It's a very boring plot: over the range of n01, 1/x hardly changes at all:

It's a little more interesting if you change the range, but now the ECDF is crammed into a nearly vertical line:

x <- seq(2.6e7, 4e7, len=200)

plot(ccdf, xlim = range(x))

y <- mean(n01)/x
lines(x, y)

answered Sep 24, 2022 at 20:19

user2554330

47.1k4 gold badges52 silver badges115 bronze badges

Sign up to request clarification or add additional context in comments.

Collectives™ on Stack Overflow

Markov Inequality Plot in R

1 Answer 1

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

Comments

Your Answer

Sign up or log in

Post as a guest

Related