如何在R中以10对的方式为矢量赋值？

Question

我想成对地将一个向量的10个元素分配给某个值。如果不手动为每个第10个元素写出作业，我怎么能这样做呢？

X_mean <- 4.5;
X <- matrix(1, nrow=40, ncol=2);
X[1:10,2] <- 0 - X_mean;
X[11:20,2] <- 3 - X_mean;
X[21:30,2] <- 5 - X_mean;
X[31:40,2] <- 10 - X_mean;

Answer 1

创建矩阵X和向量X_mean后，您可以执行以下操作：

X[,2] <- rep(c(0,3,5, 10) - X_mean, each = 10)