shapefile 到光栅 .tif 文件 R

Question

我添加了一个新变量来编码我的形状文件的单元格，我想将该文件另存为 .tif 并拥有我的新变量的所有信息。我将其另存为新的 .shp 文件，然后使用 shp2raster 函数，但出现错误。

beijing10<-sf::read_sf("Landuse/Beijing2010.shp")
beijing10<-mutate(beijing10,land=ifelse(CODE%in%c(41,42),"Cultivated Land","Unused Land"))
st_write(beijing10,"beijing2010new.shp")
shp2raster("beijing2010new.shp",column = "land")

错误： Error in p$rasterize(nrow(r), ncol(r), as.vector(extent(r)), values, background) : Not compatible with requested type: [type=character; target=double].

我也试过这个，但我没有得到 2 个课程。

r <- raster(ncol=180, nrow=180) #can take any value
extent(r) <- extent(beijing10)
rr<-rasterize(beijing10,r,'land')
writeRaster(rr,"beijing2.tif",options=c('TFW=YES'),'land')

是否有另一种获取 .tif 文件的方法。有人可以帮助我了解转换是如何工作的以及我应该如何添加正确的代码以便我不需要使用 ArcMap 来获取文件。谢谢

Answer 1

这是一个最小的、可重现的self-contained示例

library(raster)
p <- shapefile(system.file("external/lux.shp", package="raster"))
r <- raster(p, res=0.01)
p$land <- ifelse(p$ID_2 > 6, "Cultivated Land", "Unused Land")

错误发生是因为您试图栅格化一个字符变量。那是不支持的。不过，您可以使用一个因数

p$land <- as.factor(p$land)
r <- rasterize(p, r, "land")
r
#class      : RasterLayer 
#dimensions : 73, 78, 5694  (nrow, ncol, ncell)
#resolution : 0.01, 0.01  (x, y)
#extent     : 5.74414, 6.52414, 49.45162, 50.18162  (xmin, xmax, ymin, ymax)
#crs        : +proj=longlat +datum=WGS84 +no_defs 
#source     : memory
#names      : layer 
#values     : 1, 2  (min, max)

shapefile 到光栅 .tif 文件 R

shapefile to a raster .tif file R

r

raster

spatial

geospatial

sf