私は機能データ分析手法を使用して、個別のデータセットを平滑化していました。fda パッケージと関数 Smooth.basis を使用していました。これでフィットした滑らかなオブジェクトが得られますが、今度はその逆を取得する必要があります。コードは次のようなものです。
basisobj<-create.bspline.basis(c(0,1),7)
fit=smooth.basis(argvals=Data$Time,y=Data$Score,fdParobj=basisobj)$fd
Data$Score が 20 のときの Data$Time の値を知りたいです。
inverse.predict 関数を試してみましたが、 lm 関数の結果しか得られませんでした。
ありがとうございました!