R Plotly隐藏了X轴

Question

当我绘制r-plotly图表时，其x轴处于隐藏状态。以下是存在此问题的图表：

下面是我的代码：

p <- plot_ly(b1image, x = b1image$CNT, y = b1image$Label, type = 'bar', orientation = 'h', 
             marker = list(color = viridis::viridis_pal(option = "C", direction =1)(max(b1image$Label) - min(b1image$Label) + 5))) %>% 
  config(displayModeBar = F)
p

我想知道是否有办法避免隐藏的x轴？

此外，我想知道如何更改y轴的比例。

例如，我不想在y轴上看到5.5、4.5 ...，而只能看到5、4、3 ...等。

谢谢。

Answer 1

可以通过参数showline = T更改该行，或者在某些情况下可以使用 zeroline = T取决于您的绘图是否实际在0-x范围内运行。

几乎所有属性都可以查询here

p <- plot_ly(mtcars, x = ~mpg, y = ~cyl, type = 'bar', orientation = 'h', 
             marker = list(color = viridis::viridis_pal(option = "C", direction =1)(max(mtcars$mpg) - min(mtcars$mpg) + 5))) %>% 
  config(displayModeBar = F) 
p <- layout(p, title = 'A plot',
       autosize = TRUE,
       margin = list(l = 50, r = 0, b = 20, t = 60, pad = 2), 
       xaxis = list(title = 'horizontal', ticks = "outside", ticklen = 5, tickwidth = 2, tickcolor = toRGB("black"),
                  showgrid = T, autorange = T, showticklabels = TRUE, zeroline = F,  showline = T),
       yaxis = list(title = 'vertical', ticks = "outside", ticklen = 5, tickwidth = 2, tickcolor = toRGB("black"),
                    showgrid = T, autorange = T, showticklabels = TRUE, zeroline = F,  showline = T),
       showlegend = T,  #show it or not
       legend = list(x = 100, y = 0.5), # can be used to position the legend
       scene = list(aspectratio = list(x = 1, y = 1, z = 1))) # can be used to keep the plot square, or not
p