Как получить обратное предсказание от гладкой подгонки bspline в R

Я использовал методы функционального анализа данных, чтобы сгладить дискретный набор данных. Я использовал пакет fda и функцию smooth.basis. Это дает мне подогнанный гладкий объект, но теперь мне нужно получить его инверсию. Коды примерно такие:

basisobj<-create.bspline.basis(c(0,1),7)
fit=smooth.basis(argvals=Data$Time,y=Data$Score,fdParobj=basisobj)$fd

Я хочу знать, каково значение Data $ Time, когда Data $ Score, скажем, 20.

Я попробовал функцию inverse.predict, но она могла дать результат только для функции lm.

Благодарю вас!


r smoothing
person Richard Li    schedule 23.05.2012    source источник
comment
Я думаю, что проблема заключается в том, что ваша функция не обязательно будет монотонно возрастающей или убывающей, и что для обратной задачи может быть несколько возможных решений. Вместо этого я бы рекомендовал использовать мошеннический пакет, а затем использовать монотонно увеличивающиеся или убывающие сплайны и использовать приблизительно() для обратного прогнозирования, как в предсказание-из-лесс-объект-в-г" title="калибровка обратного предсказания из лёссового объекта в r">stackoverflow.com/questions/23957486/   -  person Tom Wenseleers    schedule 06.03.2018