I was using streamgraph. It was working fine on standalone program, however, it was not working as expected on r-shiny. On R-shiny, the X-Axis just disappeared. Please see the figures attached. Can anyone please help me with this? Thank you.
Code to generate the case,
library(dplyr) library(streamgraph) library(ggplot2movies)
movies %>%
select(year, Action, Animation, Comedy, Drama, Documentary, Romance, Short) %>%
tidyr::gather(genre, value, -year) %>% group_by(year, genre) %>% tally(wt=value) %>% ungroup %>%
streamgraph("genre", "n", "year") %>% sg_axis_x(20) %>%
sg_fill_brewer("PuOr") %>%
sg_legend(show=TRUE, label="Genres: ")