ggplot中的线图平滑

Question

https://gis.stackexchange.com/questions/302381/how-to-smooth-lines-that-go-exactly-though-the-datapoints-ggplot

我正在尝试在r中制作这张照片

[https://i.stack.imgur.com/NbtqK.png]

但是，这是我到目前为止所取得的成就。

https://i.stack.imgur.com/2HLJG.png

这些是我的数据
https://i.stack.imgur.com/kf7fd.png

和代码

g0 <- ggplot(data = plot.m, aes(x = Var1,  y = value, group=Var2)) +
  geom_point(aes(color = Var2))+geom_line()

g0

• 有人可以帮助您获得遍及所有人的流畅线条吗？ 数据点？
• 帮助将x轴标签放在下面一点点（大约2厘米）吗？