Mean analyst

Identifying the timeline through the theme of anti-communism and communism propaganda. Because the news data is taken from the last 25 years, therefore this research process will get a comprehensive picture in the form of a monthly time period, which months the two propaganda are often informed in each month.

Create Data

date_data <-data.frame(Month=c('Jan','Feb','Mar','Apr','May',
                               'Jun','Jul','Aug','Sep','Oct',
                               'Nov','Dec'),
                        Propaganda=c(12,6,13,7,24,24,17,18,90,36,7,6))

Creating a Timeline analyst with ggplot2

library(ggplot2)
ggplot(data = date_data, aes(x=Month, y=Propaganda, group=1))+
  geom_line(col="red")+
  geom_point()+
labs(title = "Timeline Framing Media of Communist propaganda in Indonesia",
     x = "Month",
     y = "Propaganda News") +
  theme_bw() +
  theme(plot.title = element_text(face = "bold"))