0

我正在使用 Google 移动数据。

read_csv("https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv", guess_max = 75000)

对于一个国家，有 7 种类型的地方（本例中的 pivot_longer names_to = "type"）
重叠太多geom_text(check_overlap)，ggrepel::geom_text_repel(max.overlaps )产生的地方太多或不够。

geom_text(aes(label= type, x = max(date)/2, y = max(index)/2), angle = 45, 
               size = 3, check_overlap = FALSE, 
               position = position_dodge2(width = 1))

或其他组合给了我重叠的文本，因为这 7 种类型共享日期范围和 100% 索引。
我尝试过设置aes(x=median(date), y=median(index))，但随后 7 个标签彼此叠放。

理想情况下，我会在 date() 数据上进行 7 次均匀间隔的绘制，但我会随机抽取 7 次。另一个问题是日期被格式化为日期，因此很难对其进行大量数学运算，我例如，可以选择最大值但不能选择中值。

4

0 回答 0