Use correct options

Co-authored-by: Barret Schloerke <[email protected]>

Author: jcheng5

R/layers.R

@@ -245,7 +245,7 @@ addRasterImage <- function(
   project = TRUE,
   method = c("auto", "bilinear", "ngb"),
   maxBytes = 4 * 1024 * 1024,
-  options = tileOptions(),
+  options = gridOptions(),
   data = getMapData(map)
 ) {
   stopifnot(inherits(x, "RasterLayer"))