readme fix

Author: ramarty

README.md

@@ -116,7 +116,7 @@ To extract data for multiple time periods, add multiple time periods to `date`.
 ```r
 #### Daily data in March 2021
 r_daily <- bm_raster(roi_sf = roi_sf,
-                     product_id = "VNP46A3",
+                     product_id = "VNP46A2",
                      date = seq.Date(from = ymd("2021-03-01"), to = ymd("2021-03-31"), by = "day"),
                      bearer = bearer)