【发布时间】:2013-12-05 16:37:14
【问题描述】:
我有一个由 1 行和 2 列组成的矩阵[D](第 1 列中的截距,第 2 列中的斜率)。
然后我有一个 30 行和 2 列的矩阵 [C],其中该矩阵的第 2 列是感兴趣的。我想取斜率[D, 2] 值乘以[C, 2] 值并加上截距[D,1],然后将新计算的值存储在新矩阵中。
我现在的代码:
A <- matrix(c(Box.Z, Box.DC.gm), nrow=42)
randco
B<- A[sample(42,6),]
arows <- apply(A, 1, paste, collapse="_")
brows <- apply(B, 1, paste, collapse="_")
C<- A[-match(brows, arows), ]
D<- lm(B[,2] ~ B[,1])$coefficients
}
Z
【问题讨论】: