如何将数据框制作成栅格对象R
How to make data frame into raster object R
我有一个包含一列值的数据框。如何使用以下参数将其制作成光栅图像?我也想将它保存为 .tif 光栅图像。
尺寸:(6,7,42)(nrow、ncol、ncell)
分辨率 (30,30) (x,y)
范围:(286695、286905、4620945、4621125)(xmin、xmax、ymin、ymax)
crs: +proj=utm +zone=17 +datum=WGS84 +units=m +no_defs +ellps=WGS84 +towgs84=0,0,0
值:0、65535(最小值、最大值)
感谢您的帮助!
library(raster)
#making dataframe
b1DF <- data.frame("b1" = c(18880, 19364, 20446, 21070, 23001, 22981, 23362,
19538,18902, 19013, 18676, 20998, 23206, 24784, 21979, 20804, 20496, 19993,
20830, 22396, 24246, 19877, 21002, 21771, 21478, 20827, 21267, 23036, 20103,
21220, 22308, 21443, 20780, 21874, 23029, 19521, 20173, 20826, 21000, 21693,
23388, 23935))
与光栅包附带的大多数示例非常相似。
b1DF <- data.frame(b1 = c(18880, 19364, 20446, 21070, 23001, 22981, 23362,
19538,18902, 19013, 18676, 20998, 23206, 24784, 21979, 20804, 20496, 19993,
20830, 22396, 24246, 19877, 21002, 21771, 21478, 20827, 21267, 23036, 20103,
21220, 22308, 21443, 20780, 21874, 23029, 19521, 20173, 20826, 21000, 21693,
23388, 23935))
library(raster)
r <- raster(nrow=6, ncol=7, ext=extent(286695, 286905, 4620945, 4621125), crs="+proj=utm +zone=17 +datum=WGS84 +units=m")
values(r) <- b1DF$b1
r
#class : RasterLayer
#dimensions : 6, 7, 42 (nrow, ncol, ncell)
#resolution : 30, 30 (x, y)
#extent : 286695, 286905, 4620945, 4621125 (xmin, xmax, ymin, ymax)
#crs : +proj=utm +zone=17 +datum=WGS84 +units=m +ellps=WGS84 +towgs84=0,0,0
#source : memory
#names : layer
#values : 18676, 24784 (min, max)
我有一个包含一列值的数据框。如何使用以下参数将其制作成光栅图像?我也想将它保存为 .tif 光栅图像。
尺寸:(6,7,42)(nrow、ncol、ncell)
分辨率 (30,30) (x,y)
范围:(286695、286905、4620945、4621125)(xmin、xmax、ymin、ymax)
crs: +proj=utm +zone=17 +datum=WGS84 +units=m +no_defs +ellps=WGS84 +towgs84=0,0,0
值:0、65535(最小值、最大值)
感谢您的帮助!
library(raster)
#making dataframe
b1DF <- data.frame("b1" = c(18880, 19364, 20446, 21070, 23001, 22981, 23362,
19538,18902, 19013, 18676, 20998, 23206, 24784, 21979, 20804, 20496, 19993,
20830, 22396, 24246, 19877, 21002, 21771, 21478, 20827, 21267, 23036, 20103,
21220, 22308, 21443, 20780, 21874, 23029, 19521, 20173, 20826, 21000, 21693,
23388, 23935))
与光栅包附带的大多数示例非常相似。
b1DF <- data.frame(b1 = c(18880, 19364, 20446, 21070, 23001, 22981, 23362,
19538,18902, 19013, 18676, 20998, 23206, 24784, 21979, 20804, 20496, 19993,
20830, 22396, 24246, 19877, 21002, 21771, 21478, 20827, 21267, 23036, 20103,
21220, 22308, 21443, 20780, 21874, 23029, 19521, 20173, 20826, 21000, 21693,
23388, 23935))
library(raster)
r <- raster(nrow=6, ncol=7, ext=extent(286695, 286905, 4620945, 4621125), crs="+proj=utm +zone=17 +datum=WGS84 +units=m")
values(r) <- b1DF$b1
r
#class : RasterLayer
#dimensions : 6, 7, 42 (nrow, ncol, ncell)
#resolution : 30, 30 (x, y)
#extent : 286695, 286905, 4620945, 4621125 (xmin, xmax, ymin, ymax)
#crs : +proj=utm +zone=17 +datum=WGS84 +units=m +ellps=WGS84 +towgs84=0,0,0
#source : memory
#names : layer
#values : 18676, 24784 (min, max)