我有一个名为 r 的大型真实一维数据集。 我想要情节:
mean(log(1+a*r)) vs a, with a > -1 .
我该怎么做？
最佳答案
您可以使用 sapply 在一组值上评估函数。
x <- seq(-1,1,length=20)
y <- sapply(x, function(a) mean(log(1+a*r)) )
plot(x,y, type="l")
或者，您可以定义一个函数来计算这个数量 并使用曲线来绘制它。 该函数必须矢量化。
r <- runif(100)
f <- function(a) mean(log(1+a*r))
f <- Vectorize(f)
curve(f, xlim=c(-1,1), las=1)
关于r - 在 R 中绘制参数平均值，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/9904467/