![](/img/trans.png)
[英]R : spls getting error “Error in one %*% y : requires numeric/complex matrix/vector arguments”
[英]I keep getting error “Error in Y %*% X : requires numeric/complex matrix/vector arguments”
我的代码是这样的:
X2 <- list(33, 41, 7, 49, 5, 31)
Y <- list(42, 33, 75, 28, 91, 55)
X <- matrix(cbind(1:1,X1,X2),nrow=6,ncol=3)
Y <-t(X)
XtX <- X %*% Y
而且我不知道出了什么问题请帮忙
尝试使用向量而不是列表创建矩阵:
X1 <- c(33, 41, 7, 49, 5, 31)
X2 <- c(42, 33, 75, 28, 91, 55)
X <- as.matrix(cbind(1:1,X1,X2),nrow=6,ncol=3)
XtX <- X %*% t(X)
[,1] [,2] [,3] [,4] [,5] [,6]
[1,] 2854 2740 3382 2794 3988 3334
[2,] 2740 2771 2763 2934 3209 3087
[3,] 3382 2763 5675 2444 6861 4343
[4,] 2794 2934 2444 3186 2794 3060
[5,] 3988 3209 6861 2794 8307 5161
[6,] 3334 3087 4343 3060 5161 3987
不确定matrix(cbind(1:1,X1,X2),nrow=6,ncol=3)
是否正是您所期望的:
X1 X2
[1,] 1 33 42
[2,] 1 41 33
[3,] 1 7 75
[4,] 1 49 28
[5,] 1 5 91
[6,] 1 31 55
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.