2016-07-11 10 views
0

scatterplot3dを使用してRの距離行列をプロットしました。すべての点に一意の色を割り当てたいと思います。たとえば、次の例では、プロットは、5つのポイント(AE)含まれています:現時点ではR 3次元の色付き点のプロット

 A  B  C  D  E 
A  0  0.1  0.2  0.1  0.2 
B  0.1  0  0.1  0.2  0.1 
C  0.2  0.1  0  0.1  0.2 
D  0.1  0.2  0.1  0  0.1 
E  0.2  0.1  0.2  0.1  0 

を、ポイントの外観のための私のscatterplot3dコードは非常に簡単です:

s3d <- scatterplot3d(x,y,z, main="Just A Test", pch = 19) 

ポイントのそれぞれを異なる色(16進コードを使用)で表示させるにはどうしたらいいですか?

答えて

0

?scatterplot3dcolor引数を見ましたか?

dd <- read.table(header=TRUE,text=" 
     A  B  C  D  E 
A  0  0.1  0.2  0.1  0.2 
B  0.1  0  0.1  0.2  0.1 
C  0.2  0.1  0  0.1  0.2 
D  0.1  0.2  0.1  0  0.1 
E  0.2  0.1  0.2  0.1  0") 

ここで私は

library(scatterplot3d) 
## some made-up colors 
cols <- c("#000000","#fa0ace","#eeabce","#5a0af0","#883856") 
s3d <- with(dd,scatterplot3d(A,B,C, 
    main="Just A Test", pch = 19, color=cols,cex.symbols=3)) 

enter image description here

+0

...あなたがあなたの座標として列に-Cを使用したいと仮定していますが、応答をありがとう!私は 'color'引数を見ましたが、問題は私の実際の行列が数十種類の色に分かれた数百の異なる行を持つことです。グループ化を簡単にするために、ベクトルにコードを組み込む方法はありますか?たとえば、行1〜15の場合は#000000、行16〜30の場合は#fa0aceなどとなります。 –

+0

'newcols < - rep(元の色、それぞれ= 15)'。 (私は混乱しています;あなたの質問はあなたが "各点"を別の色にしたいと言っています...これが再現可能な例*が良いアイデアです...) –

関連する問題