Я хотел бы сравнить два Спектра и количественно оценить их сходство. Я думаю, что PCA - это возможность.
Здесь вы можете увидеть мой код. В конце концов я получил pc1 и 2. Теперь я не уверен, что это значит относительно сходства спектров.
x = 250:262
y = c(809,834,477,478,307,122,96,102,324,476,540,629,670)
data = cbind(x,y)
y2 = c(805,820,480,475,307,101,94,110,324,480,539,634,657)
ref = cbind(x,y2)
plot(data, col="red")
lines(data, col ="red")
plot(ref, col="blue")
lines(ref, col="blue")
mydata = cbind(y, y2)
mydata = as.data.frame(mydata)
#PCA and plotting
data_pca=prcomp(mydata)
data_pca
plot(data_pca)