r - 在 R 中执行常量插值

Question

我有一组数据，例如:

x<-c(1, 2, 3, 4, 5, 6)
y<-c(100, 110, 121, 133.1, NA, 161.051)

现在， y显然以 10% 的恒定速度增加。

我希望能够在 x=5 处插入数据, 我想打印 146.41作为答案。然而，这个功能似乎并没有做到:

approx(x,y,5)

这打印 147.0755 ，这不是我要找的答案。

approx(x,y,5,method="constant")

也不行。

我哪里错了？

Answer 1

既然你在处理费率，你需要翻译y进入 log(y) ，插值，然后使用 exp将结果恢复为线性比例:

exp(approx(x, log(y), x)$y)
# [1] 100.000 110.000 121.000 133.100 146.410 161.051