powered by
simple_triplet_matrix
matrix
corr(x, y) sdev(x)
cor(x,y)
nrow(y)=nrow(x)
ncol(x)
ncol(y)
sdev
data(hockey) ## some good players r <- corr(Xplayer, Ygoals) sort(r[,1], decreasing=TRUE)[1:20] ## players with lots of ice-time s <- sdev(Xplayer) sort(s, decreasing=TRUE)[1:20]
Run the code above in your browser using DataLab