prcomp导致行数不同

Question

当我尝试下面的代码时，运行prcomp后得到的行数不同。我想知道为什么会这样吗？

VAS.pca <- prcomp(~., data=VAS, na.action=na.omit, center=TRUE, scale.=TRUE ) 

为每个观察结果提取代表主成分得分的x值

str(VAS.pca)

VAS.pca$x

VAS2 <- cbind(VAS, VAS.pca$x[,1:2])

Error in data.frame(..., check.names = FALSE) : 
  arguments imply differing number of rows: 146, 143