在光栅包R中覆盖许多ASCII层

我有120个物种分布图作为.asc文件，我使用r软件包“光栅”进行了叠加。我想添加所有这些层，以生成一个大空间范围的丰富性地图。我曾尝试使用覆盖函数简单地将所有asc文件相加为一个贴图，但我发现了一个错误。有人对如何纠正这个问题有什么建议吗。 提前谢谢

SDM.Stack<-stack (files)

#Overlay Function 
SDM.Overlay.Map1<-overlay (SDM.Stack, fun=function(x,y){return(x+y)}, unstack=FALSE)

#Error in .overlayList(x, fun = fun, filename = filename, ...) : 
  cannot use this formula, probably because it is not vectorized

---

SDM.Stack如果您只是为每个单元格跨层添加值

calc(SDM.Stack, sum)

如果您只是为每个单元跨层添加值

calc(SDM.Stack, sum)