R函数approxfun将创建一个执行线性插值的函数.
> F <- approxfun(x=df$lowerx, y=df$lowery) > F(80) > 13 [1] TRUE
我使用你提供的数据并在"红点"的坐标处测试我的最佳猜测为(80,13),因此它表示13小于插值且(80,15)高于:
> F(80) > 15 [1] FALSE