pcknn_crossvalidation: principal component regression predictions cv
In ablanda/Esame:

fonisce le previsioni della cv, da utilizzare dentro sapply(1:k,...)

1	pcknn_crossvalidation(i, y, x, folds, cor = T, npc, K, use.all = F)

`i`	i-esimo fold
`y`	vettore. variabile risposta
`x`	matrice variabili esplicative
`folds`	prodotto da kfold function
`cor`	logical. if correlation or covariance
`npc`	numero componenti principali
`K`	numero vicini più prossimi
`use.all`	quando più di K punti sono ugualmente vicini, se prenderli tutti o sceglierne K a caso.