我是R和它的新软件包系统的新手,只是写了我的第一个软件包,意图将它与OpenCPU一起使用。
执行此功能时:
#' Create a PNG which shows interpolated senseMap Data
#'
#' @export
#' @import jsonlite
#' @import sp
#' @import gstat
#' @import rgeos
#' @import maptools
#' @param JSON
inteRidwTest <- function(input){
### JSON to data.frame ###
oSeM_df <- input
### data.frame to spatialPointsDataFrame ###
coordinates(oSeM_df) =~longitude+latitude
### adding CRS to the data ###
proj4string(oSeM_df)="+proj=longlat +datum=WGS84"
project_df=spTransform(oSeM_df, CRS("+proj=longlat +datum=WGS84"))
### creating a bounding box ###
bbox <- bbox(oSeM_df)
### creating a grid based on the bbox ###
x.range <- as.numeric(c(floor(bbox[1]), ceiling(bbox[3]))) # min/max longitude of the interpolation area
y.range <- as.numeric(c(floor(bbox[2]), ceiling(bbox[4])))# min/max latitude of the interpolation area
grd <- expand.grid(x = seq(from = x.range[1], to = x.range[2], by = 0.1), y = seq(from = y.range[1], to = y.range[2], by = 0.1))
coordinates(grd) <- ~x + y
gridded(grd) <- TRUE
grdSp <- as(grd, "SpatialPolygons")
### adding CRS to grid ###
proj4string(grdSp)="+proj=longlat +datum=WGS84"
grd_df=spTransform(grdSp, CRS("+proj=longlat +datum=WGS84"))
### setting up basegrid for the png ###
grdSp.union <- unionSpatialPolygons(grd_df, rep("x", length(slot(grd_df,"polygons"))))
llGRD <- GE_SpatialGrid(grdSp.union)
llGRD_in <- over(llGRD$SG, grdSp.union)
llSGDF <- SpatialGridDataFrame(grid = slot(llGRD$SG,"grid"), proj4string = CRS(proj4string(llGRD$SG)), data = data.frame(in0 = llGRD_in))
llSPix <- as(llSGDF, "SpatialPixelsDataFrame")
### IDW ###
llSPix$pred <- idw(value ~ 1, oSeM_df, llSPix)$var1.pred
return(llSPix$pred)
# ### create the png ###
# png(file = "idw.png", width = llGRD$width,height = llGRD$height, bg = "transparent")
# par(mar = c(0, 0, 0, 0), xaxs = "i", yaxs = "i")
# image(llSPix, "pred", col = bpy.colors(20, alpha=0.7))
# dev.off()
}
抛出以下错误:
OpenCPU错误HTTP 400对象'rgeos'未找到
致电:get(“rgeos”,envir = .MAPTOOLS_CACHE)
尝试在本地使用此程序包和函数时会抛出相同的错误。如果在我的inteRsense包之前安装并添加了rgeos包,它就会按预期工作。
错误似乎连接到我的包导入的rgeos和maptools包,我想更改使用我的包时导入这些包的顺序。但我无法弄清楚如何在NAMESPACE文件中执行此操作:
# Generated by roxygen2: do not edit by hand
export(helloWorld)
export(inteRidw)
export(inteRidwTest)
import(gstat)
import(jsonlite)
import(maptools)
import(rgeos)
import(sp)
所以我想我的问题是:如何更改R包中的NAMESPACE文件? 但我真的很感激任何帮助。
答案 0 :(得分:1)
如何更改R包中的NAMESPACE文件?
要更改R包中的NAMESPACE文件,您必须:
问题是更改将是本地的,您必须自己分发修改后的包。
在这种情况下,最好的解决方案是联系包的维护者,看看它是否可以解决问题并更新包存储库上的包。
但是我遇到了同样的问题。我收到这个错误:
Error in get("rgeos", envir = .MAPTOOLS_CACHE) : object 'rgeos' not found
当我正在开发的包调用maptools函数'unionSpatialPolygons'时。我正在处理的包导入maptools和rgeos包但仍然失败。如果用户手动加载maptools包,一切正常。
所以另一个临时解决方案是在加载包之后加载maptools包。
<强>更新强>
我编辑了我正在处理的包的DESCRIPTION文件。我将'maptools'软件包从“imports”字段移到了“depends”字段,问题似乎消失了!