我是R的首发，我需要一些帮助来提取增长图上的最大斜率以应用Gompertz增长定律。我成功应用线性回归并使用＆＃34; pspline＆＃34;来模拟我的数据。但我有问题提取这个结果的方程式。我需要在图的不同点找到最大图，以计算增长率。
day<-c(1,2,3,4,5,6,7,10,11,12)
cells<-c(100000;300000,400000,600000,900000,1200000,2000000,3000000,5000000,6000000)
d<-data.frame(day,cells)
#find maximum slope
#install.packages("pspline",dependencies = T)
library("pspline")
plot(d$day, d$cell, main = "data(d) & smoothing splines")
d.spl <- sm.spline(d$day, d$cells)
d.spl
lines(d.spl, col = "blue")
lines(sm.spline(d$day, d$cells, df=10), lty=2, col = "red")