getwd() setwd("D:/curso_de_backend_r_y_python/python_rstudio_1242_pubs") library(raster) library(sp) library(sf) library(gstat) library(rastervis) Contour_tif1<- st_read("Contour_tif1") plot(st_geometry(Contour_tif1), graticule = TRUE, axes=TRUE) Contour_tif1 <- st_transform(Contour_tif1, crs = 4324)

Lab 13

Analysis of health and economic impact of severe weather events using NOAA Storm Database (1950-2011)