1

我有一个外部距离对象 ( gdis)，需要将其转换为包含距离矩阵两半的矩阵。我目前正在使用打印功能来实现这一点。每次运行脚本时都必须打印出整个矩阵是相当笨重的。有没有办法避免这种情况？

wgdis<-print(gdis, upper=TRUE)
4

1 回答 1

3 
m <- matrix(rpois(50,5), nrow=5)
m2 <- dist(m)
attr(m2, "Upper") <- TRUE
m2
          1         2         3         4         5
1           12.083046 11.135529 11.958261 12.529964
2 12.083046            6.928203 10.148892  8.062258
3 11.135529  6.928203            8.660254  9.643651
4 11.958261 10.148892  8.660254           14.491377
5 12.529964  8.062258  9.643651 14.491377
于 2012-06-15T10:05:45.630 回答