在R中繪制散點圖3D

Question

我想在scatterplot3d中可視化我的數據

在我的X和Y軸上，我想要相同的標簽。 像這樣：

x<-c("A","B","C","D")
y<-c("A","B","C","D")

在Z軸上，我想展示X和Y上的標簽之間的比較

A with A
A with B
A with c
A with D
B with B
B with C
B with D
C with C
C with D
D with D

#altogether 10 values in Z
z<-c(0.25, 0.7, 0.35, 1.14, 0.85, 0.36, 0.69, 0.73, 0.023, 0.85) 

現在，我想在scatterplot3d上繪制所有這些信息。 如何在scatterplot3d上實現此概念？

Answer 1

如果要繪制點，則需要匹配(x,y,z)值的三元組。 您可以使用以下命令創建與z的位置匹配的x和y值

xx <- factor(rep(x, 4:1), levels=x)
yy <- factor(unlist(sapply(1:4, function(i) y[i:4])), levels=y)

然后你可以用

library(scatterplot3d)
scatterplot3d(xx,yy,z, 
    x.ticklabs=c("",x,""), y.ticklabs=c("",y,""), 
    type="h", lwd=2,
    xlim=c(0,5), ylim=c(0,5))

要得到

但老實說，這似乎並不是一種特別有效的可視化。