高分辨率数据导致GGplot线阻塞

Question

我正在尝试使用GGplot绘制一些高分辨率数据。不幸的是，该地块非常“块状”，我不确定如何解决。随附的是当前情节的照片

我已经厌倦了通过导入数据以及在ggplot中使用'scale_x_date'参数来更改日期格式

HG$Date<-as.Date(HG$Date, format("%d-%B"))

scale_x_date(date_breaks = "15 day", labels=date_format("%d-%B")

我正在尝试生成一个看起来不那么块状的“正常”外观图，但我不想使用平滑工具

样本数据：

Date_Stamp       Date Site.1 Site.2 Site.3 Site.4
1  5/18/2018 22:00 2019-05-18  7e-04 0.0028 0.0034  1e-03
2  5/18/2018 22:30 2019-05-18  7e-04 0.0027 0.0033  1e-03
3  5/18/2018 23:00 2019-05-18  8e-04 0.0029 0.0034  1e-03
4  5/18/2018 23:30 2019-05-18  8e-04 0.0028 0.0033  1e-03
5   5/19/2018 0:00 2019-05-19  7e-04 0.0027 0.0033  1e-03
6   5/19/2018 0:30 2019-05-19  7e-04 0.0029 0.0033  1e-03
8   5/19/2018 1:30 2019-05-19  8e-04 0.0028 0.0033  9e-04
9   5/19/2018 2:00 2019-05-19  8e-04 0.0029 0.0033  9e-04
10  5/19/2018 2:30 2019-05-19  8e-04 0.0028 0.0033  9e-04