如何使用此示例在R中对 3变量执行外推？我已经阅读了这篇文章并找到了尝试这样做的途径。我知道约对此不起作用，因为它插值
Height Direction Velocity
91 152.7 7.5
737 179.8 9.1
1434 238.1 11.2
2999 275.3 16.6
4204 278.7 18.3
5580 279 24.3
7190 280.5 33.2
9151 284.1 38.8
10354 285.6 39
11814 285.9 38.4
13674 285.6 30
16252 281.9 19.9
18439 291.4 16.3
20488 327.7 15.3
23680 25.9 19.6
26234 30.7 23.1
30699 24.3 31.9
并说我想得到其他变量 假设的高度
Height Direction Velocity
31300 ? ?
33750 ? ?
35650 ? ?
37950 ? ?
38840 ? ?
我按照这里找到的一个例子得到了这个（如下所示）。如何在R中做到这一点？
> df[,Direction := ifelse(is.na(Direction),
+ predict(lm(Direction, data=.SD), .SD),
+ Direction)
+ , by=Height
+ ][, Velocity := ifelse(is.na(Velocity),
+ predict(lm(Velocity, data=.SD), .SD),
+ Velocity)
+ , by=Height
+ ]
Error in `[.data.frame`(df, , `:=`(Direction, ifelse(is.na(Direction), :
unused argument (by = Height)