Как вывести сдвиг для деформации Эрмита сплайна - PullRequest
0 голосов
/ 25 апреля 2019

Я пытаюсь найти сдвиг для получения функции деформации Эрмита.Если я знаю, как найти сдвиг, я могу провести остаток анализа.Я пытался прочитать теорию, я понимаю некоторую концепцию и интуицию, но не знаю, как найти сдвиг.Я прилагаю код R, но на самом деле я ничего не сделал, потому что моя первая задача - найти сдвиг (горизонтальный сдвиг)

#Packages to need to solve the homework
library(R.matlab)
library(splines)
library(car)
library(ggplot2)
library(MASS)
library(FactoMineR)
library(matrixStats)
#installed.packages('fpca')
library(fda)
#To derive the data
Data <- readMat("C:\\Users\\syeda\\Desktop\\Reserach PhD\\Data\\gait.mat")
#To separate Knee variable
kne<-Data$knee
t20 <- seq(0.025,0.975,len=20)
#To plot the raw data
matplot(t20,kne,type="l",xlab="time",ylab="Knee")
#Derive the finer time grid using 200 equispaced points
t <- seq(0.025,0.975,len=200)
#To derive knots
knt <- seq(0.025,0.975,len=7)
#To exclude the boundary points
knt <- knt[2:length(knt)-1]
...