R 如何重新记录我的折线图并提高日期
问题是，根据2020-05-31年确诊病例的地区顺序，从高到低生成p1的小倍数，并用color=“firebrick”和size=0.8为每个面板突出显示每个地区 数据是 正确的图形应该如下所示 我的代码显示了一张顺序错误的图片，灰线消失了，有人能帮我吗 这是我的密码：R 如何重新记录我的折线图并提高日期,r,ggplot2,R,Ggplot2,问题是，根据2020-05-31年确诊病例的地区顺序，从高到低生成p1的小倍数，并用color=“firebrick”和size=0.8为每个面板突出显示每个地区 数据是 正确的图形应该如下所示 我的代码显示了一张顺序错误的图片，灰线消失了，有人能帮我吗 这是我的密码： p2 <- covid19_bg %>% ggplot(aes(x = confirmed, y = new_cases,group = country_region_bg))+ geom_line(co
p2 <- covid19_bg %>%
ggplot(aes(x = confirmed, y = new_cases,group = country_region_bg))+
geom_line(colour = "gray80", size = 0.4) +scale_y_log10(labels = label_number_si()) scale_x_log10(labels = label_number_si()) +
geom_line(aes(color=date("2020-05-31")),colour = "firebrick", size = 0.8) +
facet_wrap(vars(fct_reorder(country_region_bg, confirmed)))
p2
p2%
ggplot（不良事件（x=确诊，y=新病例，组=国家/地区/背景））+
几何尺寸线（color=“gray80”，size=0.4）+刻度线（labels=label\u number\u si（））刻度线（labels=label\u number\u si（））+
geom_线（aes（颜色=日期（“2020-05-31”）），颜色=耐火砖，尺寸=0.8）+
面包（VAR（fct\U重新订购（国家/地区背景，确认）））
p2