dismo - Dismo，物种分布模型

Question

    setwd("Y:/people/sack0093/Sack0093/R/R_files")
    list.files()
    tifs<- list.files(pattern='tif$', full.names=TRUE )
    tifs
    allrasters <- lapply(tifs, raster)
    allrasters
    s<-stack(allrasters)

    pr<-file.choose()
    Pr<-raster(pr)

##入侵物种存在点栅格

我尝试将我的存在点与我的环境数据放在一起，这是我收到的错误消息

    data<-sdmData(pp,s)
    Error in (function (classes, fdef, mtable)  : unable to find an inherited method for function ‘sdmData’ for signature ‘&quot;RasterLayer", "RasterStack", "missing", "missing"’