r - 我需要帮助在 r 中使用 smooth.spline 进行绘图

Question

我在 r 中使用 spline.smooth 并且需要一些帮助。这是我的代码：

my_df_1 <- data.frame(date = seq(as.Date("2020/1/15"), by = "day", length.out = 100),
                      rate = runif(100, min=0, max=0.7),
                      count=sample(2:50, 100, replace = TRUE))

fit <- smooth.spline(my_df_1$date, my_df_1$rate)
plot(my_df_1$date, my_df_1$rate)
lines(fit)

首先，我想使用列数更改绘图点的大小。其次，有没有办法在 ggplot 中绘制平滑样条曲线？第三，如何格式化日期的 x 轴。我想在 x 轴上有一天和一个月。提前谢谢大家！

标签： rspline

Answer 1

这个怎么样：

my_df_1 %>% 
  ggplot(aes(x = date, y = rate)) +
  geom_smooth() +
  geom_point(aes(size = count)) +
  scale_x_date(date_labels = "%d-%B")