三維可視化與R中的顏色權重

Question

你能推薦一種方法，像一種格子包（點雲可視化）可視化R中的數據集，但在這些部分中點的顏色變化更高？ 例如如果在座標等於0：-1：6的距離10上有一個沒有鄰居的點，那麼這個點將被標記爲藍色。並且當許多非常近鄰的座標爲100：100：100（而鄰居像99：100：100）時，那麼這個點就是紅色的。

此外，有必要能夠在3D中生成這種可視化。

有沒有這樣的溶劑？

例子：

x = (sample.int(101,size=100,replace=TRUE)-1)/100 
y = (sample.int(101,size=100,replace=TRUE)-1)/100 
z = (sample.int(101,size=100,replace=TRUE)-1)/100 
data = data.frame(x,y,z) 

然後我想發展plot.ly東西，比如這個

library(plotly) 
plot_ly(type = 'scatter3d', x = x, y = y, z = z, mode = "markers") 

這提供了一個很好的結果，但我想特別是在色彩更加可視化。有溶劑嗎？

Answer 1

有幾種方法可以做到這一點。您可以根據距離定義中心的距離定義自己的方法，也可以使用聚類方法。

例如，使用k均值聚類：

set.seed(20) 
dataCluster <- kmeans(data, 5, nstart = 20)$cluster %>% 
    as.factor() 

plot_ly(type = 'scatter3d', x = x, y = y, z = z, mode = "markers", color = dataCluster)