R语言处理矢量和栅格数据

问题遇到的现象和发生背景

我想在R语言里画栅格图，之后叠加上研究区的矢量图形，但是一直没有成功，矢量文件是我自己在arcgis里生成的，栅格图和矢量图都可以单独画出来，但是他们叠加不到一块，这怎么处理啊？

问题相关代码，请勿粘贴截图

area <- rgdal::readOGR('area.shp')#读取研究区矢量数据
n_data_path <- dir('路径',full.names = TRUE)##栅格数据放置路径
n_deposition <- raster(n_data_path[1])##读取栅格数据
p <- plot(n_deposition,axes=TRUE)
p+layer(sp.lines(area,lwd=0.8,col='black'))#叠加矢量数据

运行结果及报错内容

错误: Attempted to create layer with no geom.
Run rlang::last_error() to see where the error occurred.

我的解答思路和尝试过的方法

一直没有解决。

我想要达到的结果

我是想叠加栅格数据和矢量数据出一张图片

你好，我是有问必答小助手，非常抱歉，本次您提出的有问必答问题，技术专家团超时未为您做出解答


本次提问扣除的有问必答次数，将会以问答VIP体验卡（1次有问必答机会、商城购买实体图书享受95折优惠）的形式为您补发到账户。


因为有问必答VIP体验卡有效期仅有1天，您在需要使用的时候【私信】联系我，我会为您补发。