R插值

Question

我必须要成对值：

A    B
211  2
19   1

如何为值A = 132插入B？

Answer 1

使用approx（线性插值）：

grid <- data.frame(A = c(211, 19), B = c(2, 1))
grid
#     A B
# 1 211 2
# 2  19 1

approx(x = grid$A, y = grid$B, xout = 132)
# $x
# [1] 132
# 
# $y
# [1] 1.588542

Answer 2

我假设你想在这些点之间建立一条直线：

predict(lm(B~A),newdata=list(A=132))
       1 
1.588542