ipeadata-lab / ipeaplot

ipeaplot: criando graficos no padrão editorial do Ipea
https://ipeadata-lab.github.io/ipeaplot/
Other
2 stars 0 forks source link

xbreaks não está funcionando #44

Closed cavalcanti1985 closed 8 months ago

cavalcanti1985 commented 8 months ago

@PedroJorge7, tenho a sensação de que a função xbreaks também não está rodando nos gráficos de linha, por isso, como o Fabio apontou, o eixo X do gráfico 5 está com labels de 2 em 2 anos (automático do ggplot).

Originally posted by @cavalcanti1985 in https://github.com/ipeadata-lab/ipeaplot/issues/41#issuecomment-1991501131

PedroJorge7 commented 8 months ago

@cavalcanti1985 fiz mais alguns testes e acredito que o gráfico 5 foi está dentro do padrão

graf5 <- ggplot(base_graf5, aes(Ano, value, group=variable, color=variable))+
  geom_line(linewidth=1)+
  geom_point(aes(shape=variable, fill = variable),
             size=3, stroke=1.5, show.legend = F)+
  labs(color = "",
       title="GRÁFICO 5",
       subtitle="Crescimento anual do PIB da União Europeia (2004-2013) (Em %)",
       caption = 'Fonte: World Bank (2014).\nTradução dos autores.\nObs.: Os dados foram coletados no sítio do Banco Mundial.\nDisponível em: <http://goo.gl/IvtZ1a>. Acesso em: 26 set. 2014.') +
  theme_ipea(x_breaks = 8, y_breaks = 10, legend.position = 'bottom',
             expand_y_limit = T,expand_x_limit = F,
             include_x_text_title = F,include_y_text_title = F) +
  scale_color_ipea(palette_direction = -1, ) +
  scale_shape_manual(values = c(19, 21)) +
  scale_fill_manual(values = c(NA,"white"))
graf5

image

cavalcanti1985 commented 8 months ago

Na minha máquina rodou ok, @PedroJorge7. @palmaresk8, se quiser testar. Abs.

palmaresk8 commented 8 months ago

Parece ok.