“无限坡度”是什么意思? 这就是你在 R 中的做法:
library(dplyr)
df <- tibble::tribble(
~R1, ~LAI1,
233.7, 1.34,
411.3, 4.42,
143.4, 3.57,
136.7, 3.27,
249, 5.53,
59, 1.79,
186, 4.32,
185, 2.58
)
model1 <- lm(LAI1 ~ R1, data = df)
summary(model1)
plot(df$R1, df$LAI1)
abline(model1)
![在此处输入图像描述](https://stackoom.com/link/aHR0cHM6Ly9pLnN0YWNrLmltZ3VyLmNvbS9ycDBvTS5wbmc=)