フィット値を抽出するR

Question

フィットモデルから値を外挿してみようとしています。これまでのところ、私はインターネット上で見つけることができるすべての提案に誤りを残しています。ここで

は私のコード

plotPoints(absorbance~time,data=a) 
f1 = fitModel(absorbance~B*time^(A),data=a) 
plotFun(f1(time)~time,add=TRUE,col="red") 
fitted(f1) 
Error: object of type 'closure' is not subsettable 

でお時間をいただき、ありがとうございますと

セバスチャン

Answer 1

f1がモデルではありません、してみてください助け：

library(mosaic) 
a <- data.frame(absorbance = sample(1:10,10),time = sample(1:10,10),B=sample(1:10,10)) 
plotPoints(absorbance~time,data=a) 
f1 = fitModel(absorbance~B*time^(A),data=a) 
plotFun(f1(time)~time,add=TRUE,col="red") 
fitted(model(f1)) 

https://www.rdocumentation.org/packages/mosaic/versions/0.14.4/topics/fitModel