Превратить fd в fData в R

Question

Мне нужно использовать MBD (измененную глубину полосы) в объекте fd, но это усложняется.Я пытался извлечь данные из моего объекта fd, но я не могу их найти, хотя я получаю результаты при применении некоторых функций.Проблема в том, что у меня есть две базы данных fd, и мне нужно их итеративно вставлять, поэтому данные fd бесполезны.Кто-нибудь знает, как превратить объект fd в объект fData.

Большое вам спасибо.

Answer 1

правый.fd и fData являются объектами для функциональных данных, и у меня есть два функциональных набора данных в объектах fd, скажем, X и Y. Мне нужно вычислить Modified Band Depth (MBD) этих данных, включая каждое наблюдение другого.Я имею в виду, что для каждой кривой в XI необходимо создать функциональный набор данных, объединяющий все наблюдения в Y с наблюдением в X. Мне нужно сделать это несколько раз, и проблема в том, что функция MBD доступна только для объектов fData.Я не смог сделать преобразование из fd в fData.

SE_hat_U<-fd(basisobj=BSpl)

for(i in 1:61){
SE_hat_U$coefs<-cbind(SE_hat_U$coefs, sm[[i]]$fd$coefs)
}

SE_hat_U$fdnames$reps<-(1:61)
X<-SE_hat_U[as.numeric(NT$Id)]
Y<-SE_hat_U[!datos$Id%in%(NT$Id)]

Это код, который у меня есть, но я не знаю, как превратить SE_hat_U в объект fData вместо fd.