Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/80.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R 求分布的最大值_R - Fatal编程技术网
Fatal编程技术网
  • r/
  • R 求分布的最大值

R 求分布的最大值

r

R 求分布的最大值,r,R,问题：我有一个函数X，想找到最大化X（y）的值y set.seed（8） Aoptimize（）收敛到间隔内的最大值： optimize(X,c(0,20),maximum=TRUE) ## $maximum ## [1] 19.99993 ## ## $objective ## [1] 0 绘制曲线证实了这一点 x <- seq(0,20,length=1000) y <- sapply(x,X) plot(x,y,type="l") xoptimize（）收敛到间隔内的最大

问题：我有一个函数
X
，想找到最大化
X（y）
的值
y

set.seed（8）
A
optimize（）
收敛到间隔内的最大值：


optimize(X,c(0,20),maximum=TRUE)
## $maximum
## [1] 19.99993
## 
## $objective
## [1] 0


绘制曲线证实了这一点


x <- seq(0,20,length=1000)
y <- sapply(x,X)
plot(x,y,type="l")



x
optimize（）
收敛到间隔内的最大值：


optimize(X,c(0,20),maximum=TRUE)
## $maximum
## [1] 19.99993
## 
## $objective
## [1] 0


绘制曲线证实了这一点


x <- seq(0,20,length=1000)
y <- sapply(x,X)
plot(x,y,type="l")



x y是否只接受整数值？方法取决于此。如果y必须是一个整数，那么暴力搜索可能是您最好的选择，找出导数为零的位置。不幸的是，y可以是任何实数。对于此函数，很难计算导数给定的函数不会生成您声明的X（10）和X（11）的值。你写的函数正确吗？此外，对于任何随机种子，函数似乎是单谐函数，并且随着y的增加渐近接近零。单调函数没有最大值或最小值。如果您的函数确实有一个最大值，您可以使用
optimize
或
Optim
y是否只取整数值？方法取决于此。如果y必须是一个整数，那么暴力搜索可能是您最好的选择，找出导数为零的位置。不幸的是，y可以是任何实数。对于此函数，很难计算导数给定的函数不会生成您声明的X（10）和X（11）的值。你写的函数正确吗？此外，对于任何随机种子，函数似乎是单谐函数，并且随着y的增加渐近接近零。单调函数没有最大值或最小值。如果你的函数有一个最大值，你可以使用
optimize
或
Optim