所以这是我的函数计算的PDF:
fx = 0.3 if(0 <= x <1)0.1 if(1 <= x <2)0.25 if(2 <= x <3)0.15 if(3 <= x <4)0.2 if(4 <= x < 5)否则为0
这是我的编码:
fx = function(x)
{
if ((0<=x) & (x<1)) 0.3
else if ((1<=x) & (x<2)) 0.1
else if ((2<=x) & (x<3)) 0.25
else if ((3<=x) & (x<4)) 0.15
else if ((4<=x) & (x<5)) 0.2
else 0
}
Run Code Online (Sandbox Code Playgroud)
现在我将如何绘制y = fx?
我试过了:
x <- runif(n,0,5)
y <- fx(x)
plot(x, y, type='1', xlim=c(0,5), ylim=c(0,5))
Run Code Online (Sandbox Code Playgroud)
但是我得到一个'x'和'y'有不同长度的错误?