四舍五入，R程序中approx.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 格式写入时，truncation.error 的输出是 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 这些变量在你的代码中保存或定义在哪里？