怎么画出这个函数的图像?

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

1. x=rnorm(1000)
   
2. sigma=3
   
3. f <- function(x, sigma) {
   
4. if (any(x < 0)) return (0)
   
5. stopifnot(sigma > 0)
   
6. return((x / sigma^2) * exp(-x^2 / (2*sigma^2)))
   
7. }  

复制代码

请教怎么画出这个函数的图像呢？谢谢啊！

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：RETURN Sigma turn Norm GMA 函数 图像

你的f(x, sigma) = 0，只有一个点，怎么画图啊？

这是定义的一个函数，如何画出这个定义的函数的图像。

函数里面的x是一个数还是一组数？

如果x是一个数的话，curve(f(x, sigma = 3), -5, 5)

不好意思，可能我的表述不清楚。我的意思是，现在定义了一个函数，
f <- function(x, sigma) {
if (any(x < 0)) return (0)
stopifnot(sigma > 0)
return((x / sigma^2) * exp(-x^2 / (2*sigma^2)))
}
希望画出这个函数的图像。谢谢啊！

1. plot(1:20,f(1:20,2),type='l',col=1)
   
2. lines(1:20,f(1:20,5),type='l',col=2)

复制代码

谢谢楼上热心的朋友！
假设x=rnorm(100)该如何做呢？我用下面的程序得到的图像很怪。
plot(order(x),f(order(x),2),type='l',col=1)

order返回的是序，去掉order...

如楼上所述，使用

1. plot(x,f(x,2),type='l',col=1)

复制代码

此外，为了结果的可重复性，建议设置随机种子set.seed()

不好意思啊，这个还是不行，如下提示
> set.seed(12345)
> x=rnorm(100)
> plot(x,f(x,2),type='l',col=1)
错误于xy.coords(x, y, xlabel, ylabel, log) :
  'x' and 'y' lengths differ