[t]crossprod(x,y) and %*% are more tolerant when x or y are vectors; notably crossprod(x,y) == t(x) %*% y

git-svn-id: https://svn.r-project.org/R/trunk@66495 00db46b3-68df-0310-9c12-caf00c1e9a41