Соединение двух графиков временных рядов в одном графике - PullRequest
0 голосов
/ 20 апреля 2019

Я пытаюсь связать два графика временных рядов в один граф в R, в виде сетки фасетов или чего-либо интерактивного.

1-й график:

TT = ggplot(data = x1, aes(Date, Count_of_Fresh_emails)) + 
  geom_line(aes(color = Country), size = 1) + 
  scale_color_manual(values = c("#00AFBB", "#E7B800", "darkgreen", "red")) +   
  theme_minimal() + 
  scale_x_date(date_labels = "%b/%Y")
ggplotly(TT)

2-й график:

p <- ggplot(data = x2, aes(Date, FollowUp_Counts)) + 
  geom_line(aes(color = Country), size = 1) + 
  scale_color_manual(values = c("#00AFBB", "#E7B800", "darkgreen", "red")) +  
  theme_minimal() + 
  scale_x_date(date_labels = "%b/%Y")
ggplotly(p)
...