舍入，R 程序中大约 df 中的逻辑错误

Question

我正在尝试解决一个问题。当我运行这段代码时，我实现了我想要的。(.8372e-03 1.8372e-06 1.8372e-09(

truncation.error <- function(f, x) {
steps <- c(0.1, 0.01, 0.001)
n <- length(steps)
fdx1 <- vector(length = n)
for (h in 1:n) {
fdx1[h] <- exp(2.4)*steps[h]^3/6
}
return(fdx1)
}
for (i in 2.4) {
print(truncation.error(f, x))}

但是，当我以 data.frame 格式编写时，截断错误输出为 0-0-0。 为什么输出会改变？知道吗？以及我该如何解决此问题。我想看到我在上面获得的真实答案。 ;

colnames(approx.df) <- c('Actual Values', 'Central Difference Approx', 'Central Differences Error', "truncation error")
approx.df```

Original question is [ [1]: https://i.stack.imgur.com/hmO3I.png][1]

How can I solve this problem or where am I making mistake? Thanks a lot.

[1]: https://i.stack.imgur.com/hmO3I.png

Answer 1

change f <- expression(exp(x)) it to f <- as.expression(exp(x)). 您的错误将消失 你正在做的错误是你没有定义这些东西实际的，central.approx，实际的 - central.approx这些变量在你的代码中保存或定义在哪里？