powered by
projectOntoPerp(A, x)
A <- diag(5)[,1:2] x <- 1:5 projectOnto(A, x)
Run the code above in your browser using DataLab