如何对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)