我仍在学习如何在R中使用Optim资源。 我在下面具有此功能，我想最小化更改两个参数（k和l）的MSE，但发现以下错误消息： “ fn（par，...）中的错误：缺少参数“ k”，没有默认值”
代码：
age = c(7,14,21,28,35)
weight = c(0.190,0.500,0.900,1.6,2.25)
fr <- function(l,k,age,weight)sqrt(sum(abs(weight-(0.05*exp((l/k)*(1-exp(-k*age)))))^2))
optim(c(0.21,0.045), fr, age=age, weight=weight)
谢谢