【发布时间】:2021-07-18 21:08:18
【问题描述】:
如何允许垂直向下滚动图表以查看所有条形图和标签?我有 7000 个标签。我生成图表的代码如下:
plot_cost <- function(){
segments <- segment_data %>%
filter(District %in% input$district) %>%
ggplot(aes(x = reorder(Segments, Improvement_Cost), y = Improvement_Cost, fill = Segments)) +
geom_col() +
#theme(axis.text.x = element_text(angle = 30, hjust = 1, vjust = 1)) +
coord_flip()
我的闪亮渲染代码如下:
tabPanel('Graph', icon = icon("fas fa-chart-bar"),
plotlyOutput('costs', height = "100%"))
【问题讨论】: