绘图密度函数

Question

随机变量Y具有密度f由

给出的分布

f(y)= y-1/6 if 1<=y<=4

  -(y-5/6) if 4<=y<=5

   0  else

使用R生成Y的密度函数图。  这是我的问题，我如何使用R程序绘制它？

Answer 1

使用ifelse

  (y <- c(1:6)) 
[1] 1 2 3 4 5 6
(fy <-  ifelse(1<=y & y<4,  y-1/6, ifelse(4<=y & y<=5, -(y-5/6), 0)))
[1]  0.8333333  1.8333333  2.8333333 -3.1666667 -4.1666667  0.0000000
plot(fy~y, type='l') 

我假设如下： 如果1＆lt; = y＆lt; 4然后y-1/6 4＆lt; = y＆lt; = 5然后 - （y-5/6） y> 5然后0

这避免了你在1＆lt; = y＆lt; = 4和4＆lt; = y＆lt; = 5

中的重叠