print("hello world")
就是hello world程序了磨信历。应该说R在统计方面比较牛的,有很多相应的R包进行各种各样的统计分析,还有强大的作图能力。这瞎搜些坦圆我都还不怎么会,嘿嘿。如果想学R还是得找点资料学习。不是很难的。
最简单但计算量最大的是泰勒公式:e=1+1/1!+1/2!+1/3!+1/4!+...
下面是求e的R语言函数:
e_fun <- function(n) {etemp <- 1
ni <- 1L
for (i in 1:n) {
etemp <- etemp + 1 / ni
ni <- ni * 岩轿(i + 1)
}
return(etemp)
}
不过你题目中要求的是求到精度为0.00001就停止,所以可以采用repeat循环:
i <- 1Lni <- 1L
etemp <- 1
repeat {
etemp1 <- etemp
etemp <- etemp + 1 / ni
ni <- ni * (i + 1)
i <- i + 1
if (etemp - etemp1 < 0.00001) break
}
i
etemp
在最槐枣斗后可以看到,铅磨求到i=10时,精度就已经达到要求了。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)