#Rstats #Raster #maptools #Calpuff Convertir shapefile puntosa raster. Salidas de salidas de Calpuff MP10
Convertí las salidas .DAT de Calpuff en un vector de puntos con Arcgis. La fuente es esta. Luego cargué el shapefile en R, luego lo convertí a raster, y rasterizé con varias configuraciones de filas y columnas, con promedios.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
setwd("c:/tesis/emisiones") | |
c<-read.csv("conc.csv",header=T) | |
attach(c) | |
names(c) | |
library(maptools) | |
library(raster) | |
cmp10 <- readShapePoints("Conc24.shp") | |
plot(cmp10) | |
head(cmp10) | |
rast <- raster() | |
extent(rast) <- extent(cmp10) | |
ncol(rast) <- 100 | |
nrow(rast) <- 100 | |
rast100 <- rasterize(cmp10, rast, cmp10$RANK, fun=mean) | |
par(mfrow=c(3,2)) | |
plot(rast10) | |
title("Concentraciones de MP10, 10X10") | |
plot(rast20) | |
title("Concentraciones de MP10, 20X20") | |
plot(rast40) | |
title("Concentraciones de MP10, 40X40") | |
plot(rast60) | |
title("Concentraciones de MP10, 60X60") | |
plot(rast80) | |
title("Concentraciones de MP10, 80X80") | |
plot(rast100) | |
title("Concentraciones de MP10, 100X100" |
Comentarios
Publicar un comentario