1

2 つの行列をペアで組み合わせてプロットしており、行の範囲の色を指定したいと考えています。私には醜い解決策がありました。指定された色に従って色付けされる行 (または列) の範囲を直接指定する提案はありますか? 前もって感謝します！

# C - is combination of two matrices A and B
C <- rbind(A,B)
C_f <- as.factor(c(rep("label1",nrow(A)),rep("label2",nrow(B))))
pairs(C, col=c("red", "blue")[C_f])

# EDIT: added matrix generation as  thelatemail asked
A<-matrix(sample(1:100,rep=T),10,10)
B<-matrix(sample(1:200,rep=T),20,10)
C<-rbind(A,B)
4

1 に答える 1

1

あなたはただできるはずです

  pairs(C, col=c("red", "blue")[rep(1:2, c(nrow(A), nrow(B)))])

2行目を削除します（つまり、必要ありませんC_f）

于 2012-12-19T04:20:40.830 に答える