Landsat First Try

|

tags:

Download Libraries

library(getlandsat)
library(raster)
library(tidyverse)

res<- lsat_scenes(n_max=20)
res

Testing Downloading imagery

lsat_image(x = "LC80360332015008LGN00_B5.TIF") ## Works
lsat_image(x = "LC80101172015002LGN00_B5.TIF") ##Works
lsat_image(x = "LC80360332015008LGN00_B5.TIF")
lsat_image(x = "LC80360332015008LGN00.TIF")

lsat_cache_list()

Using the file

x<-lsat_cache_details()[[2]]
img<-raster(x$file)
summary(img)
plot(img)

Raster Info

crs(img)
res(img)
dim(img)