假设我有下三角矩阵,即
w1 <- c(0,0.6,0.3,0.6,0.7,
0,0,0.6,0.6,0.7,
0,0,0,0.6,0.6,
0,0,0,0,0.7,
0,0,0,0,0)
w1 <- matrix(w1,5,5)
然后,我希望第二个矩阵是一个下三角矩阵,比如w2
每个非零值w2
是1-the corresponding values of w1
。
像这样:
w2 <- c(0,0.4,0.7,0.4,0.3,
0,0,0.4,0.4,0.3,
0,0,0,0.4,0.4,
0,0,0,0,0.3,
0,0,0,0,0)
w2 <- matrix(w2,5,5)
w <- list(w1, w2)
我怎样才能w2
自动获得?
由于 R 中的大多数操作都是矢量化的,您可以简单地使用ifelse
减去1 - w1
,或者如果w1
为零,则保留零。
ifelse(w1 == 0, 0, 1 - w1)
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句