x=1:7y=[0 0.9 4.8 24.3 67.6 83.5 92.8 98.5 0]% 以上是离散点的原始数据 pp=csape(x,y,'second')% 样条曲线 % second表示第二边界条件,取值对应y中第一个0和最后的0 X=1:0.1:7Y=ppval(p
使用的是 geom_mark_rect() 函数
使用到的是 geom_mark_circle() 函数
用到的是 geom_mark_ellipse() 函数
用到的是 geom_mark_hull() 函数
这里会遇到一个警告信息 Warning message: The concaveman package is required for geom_mark_hull
需要安装并加载concaveman这个包
···
install.packages("concaveman")
library(concaveman)
···