É possível corrigir a margem do eixo com o ggplot2?
Eu tenho uma exibição interativa que consiste em um gráfico de barras que mostra uma estatística selecionada para diferentes categorias. Contudo,ggplot2
reajusta a largura do eixo y, dependendo dos rótulos e, portanto, faz com que as barras se movam irritantemente na direção x. Veja exemplo:
library(shiny)
library(dplyr)
library(ggplot2)
shinyApp(
ui = bootstrapPage(
selectInput('statistic', label='Chose a statistic', choices=c('carat', 'depth', 'table', 'price')),
plotOutput('plot')
),
server = function(input, output) {
output$plot <- renderPlot(
diamonds %>%
ggplot(aes(x=color, y=get(input$statistic))) +
geom_bar(stat = 'sum') +
theme(text = element_text(size=20), legend.position="none")
)
}
)
Como posso corrigir a largura do rótulo do eixo y? (ou equivalente à largura do painel de plotagem?)
Encontrei perguntas relacionadas, mas todas foram resolvidas em um contexto estático, por exemplocom facetas ou comgtable
.