Can anyone help with troubleshooting/resolving the error here in R Studio?
dem_mod <- maxExtentMap(dem, 1300, 2600)
#now create a map
dem_mod_map <- levelplot(dem_mod, margin = F, col.regions= c("khaki", "darkgreen"),
xlab = "Longitude",
ylab = "Latitude",
main = "DEM model")
#create the plot and add the road
dem_mod_map + roadLayer
lc.rast <- raster('Data/SatelliteData/land_class.tif') #read previously saved raster for use in this script
lc.rast <- lcRatify(lc.rast)
Show Traceback
Rerun with Debug
Error in `$<-.data.frame`(`*tmp*`, "code", value = c("Crops", "Desert", :
replacement has 4 rows, data has 5261023
lc_map <- levelplot(lc.rast, margin=F, col.regions= c("olivedrab1", "khaki", "darkgreen", "darkblue"),
xlab = "Longitude",
ylab = "Latitude",
main = "Observed Land Cover")
show(lc_map)
Thank you.