积分三维散点图R z轴和同构

我试图用R界面绘制一个三维散点图。我plotly电话是：积分三维散点图R z轴和同构

p.sagittale<-plot_ly(data=filter(temp,tipo=='Caucasici'), x = ~coordX.Sagg , y = ~ coordY.Sagg, z = ~coordZ.Sagg,text = ~punti) %>% 
add_markers(color=~cluster) %>% 
layout(title = paste('Caucasici','Dente',i,'Sagittale'), xaxis = myaxis.list, yaxis = myaxis.list, zaxis=myaxis.list)

其中myaxis.list被定义为前：

myaxis.list<- list(
    zeroline = TRUE, 
    showline = TRUE, 
    mirror = "ticks", 
    gridcolor = toRGB("gray50"), 
    gridwidth = 2, 
    zerolinecolor = toRGB("blue"), 
    zerolinewidth = 4, 
    linecolor = toRGB("black"), 
    linewidth = 6, 
    autotick = FALSE, 
    ticks = "outside", 
    tick0 = 0, 
    dtick = 0.25 
)

我有两个问题：1。我收到警告：

“警告消息：'layout'对象没有这些属性： 'zaxis'有效属性包括：'font'，'title'，'titlefont'， 'autosize'，'width'，'height'，'ma '''''''''''''''''''''，''''''''''''''''''''''''''''''''，''''，'hidesources'''地图'，'legend'， 'annotations'，'shapes'，'images'，'updatemenus'，'ternary'，'mapbox'， 'radialaxis'，'angularaxis'，'direction'，'orientation'，' barmode'， 'bargap'，'mapType'“。

所以我的第一个问题是：如何设置z轴美学？

我想要有一个同构图：刻度之间的间距相同，x，y，z轴上的刻度尺相同。我怎样才能得到这个？

预先感谢您的支持

来源

2017-02-10 Giorgio Spedicato

图中的完整代码，您可以包括一个数据集到您的文章？ – MLavoie

是的，输入图像在这里https://www.dropbox.com/sh/7ct3xpfwwj555gh/AAAJc7u3aIxIBoN4dtvjKqora?dl=0 –

你需要换你的轴在scene。

layout(scene = list(xaxis = myaxis.list, 
        yaxis = myaxis.list, 
        zaxis = myaxis.list), 
     )

并通过range指定轴的范围（即上限和下限）。

myaxis.list<- list( 
    autorange = FALSE, 
    range = c(-5, 5) 
    [...] 
)

下面

myaxis.list<- list( 
    zeroline = TRUE, 
    showline = TRUE, 
    mirror = "ticks", 
    gridcolor = toRGB("gray50"), 
    gridwidth = 2, 
    zerolinecolor = toRGB("blue"), 
    zerolinewidth = 4, 
    linecolor = toRGB("black"), 
    linewidth = 6, 
    autotick = FALSE, 
    ticks = "outside", 
    tick0 = 0, 
    dtick = 0.25, 
    autorange = FALSE, 
    range = c(-5, 5) 
) 
p.sagittale<-plot_ly(data=filter(temp,tipo=='Caucasici'), x = ~coordX.Sagg , y = ~ coordY.Sagg, z = ~coordZ.Sagg,text = ~punti) %>% 
add_markers(color=~cluster) %>% 
layout(title = paste('Caucasici','Dente',"i",'Sagittale'), scene=list(xaxis = myaxis.list, yaxis = myaxis.list, zaxis=myaxis.list))

来源

2017-02-10 14:08:45

积分三维散点图R z轴和同构

回答

相关问题