# dNBR is calculated through the difference of pre and post-fire NBR
dNBR <- (pre_fire_NBR) - (post_fire_NBR)