Блог

Я хотел бы получить помощь в создании аналогичного графика, подобного изображению 2. Я не знаю, проблема в моих данных или коде. Но, как вы можете видеть на первом рисунке, есть перекрытие, и я бы хотел, чтобы графика была более мягкой в качестве второго изображения. С другой стороны. Может кто-нибудь заказать даты?

 ggplot(data = consum, mapping = aes(x = Month, y = Cpc, color = Year, group = 1))  
      geom_line()  
      facet_wrap(~Type)   
      theme_bw()   
      scale_color_manual(values = c("orange", "blue"))
```
 

 structure(list(Month = c("January", "Frebrary", "March", "April", 
"January", "Frebrary", "March", "April", "January", "Frebrary", 
"March", "April", "January", "Frebrary", "March", "April", "May", 
"January", "Frebrary", "March", "April", "January", "Frebrary", 
"March", "April"), Cpc = c(52.6030417616108, 52.3807979985595, 
63.4812345277527, 69.9337994172852, 4.87131485047933, 5.10130976154746, 
5.81295804297682, 6.85707419263629, 7.155082484813, 7.24882986945935, 
8.32846647323954, 9.80847493902699, 6.94921351149698, 6.55179853175549, 
7.35259139659446, 6.95037273611445, 8.03280438298055, 4.60674099035869, 
4.47914291992134, 4.95627076108138, 4.57283076670216, 51.3581426441543, 
47.660340330082, 52.8289135861524, 50.6656566779732), Year = c("2020", 
"2020", "2020", "2020", "2020", "2020", "2020", "2020", "2020", 
"2020", "2020", "2020", "2019", "2019", "2019", "2019", "2019", 
"2019", "2019", "2019", "2019", "2019", "2019", "2019", "2019"
), Type = c("Total feeding", "Total feeding", "Total feeding", 
"Total feeding", "Fresh vegetables", "Fresh vegetables", "Fresh vegetables", 
"Fresh vegetables", "Fresh fruits", "Fresh fruits", "Fresh fruits", 
"Fresh fruits", "Fresh fruits", "Fresh fruits", "Fresh fruits", 
"Fresh fruits", "Fresh fruits", "Fresh vegetables", "Fresh vegetables", 
"Fresh vegetables", "Fresh vegetables", "Total feeding", "Total feeding", 
"Total feeding", "Total feeding")), row.names = c(NA, -25L), class = c("tbl_df", 
"tbl", "data.frame"))