remove [,SpatialData,numeric

Former-commit-id: c7fc33d
Former-commit-id: 73330201c9358f458105d100405436a4c618c7ec

Author: HelenaLC

R/methods.R

@@ -334,16 +334,6 @@ setReplaceMethod("[[",
     })
 #' @export
 #' @rdname SpatialData
-setReplaceMethod("[[", 
-    c("SpatialData", "numeric", "ANY"), 
-    \(x, i, value) {
-        if (!i %in% seq_along(.LAYERS)) stop(.invalid_layer)
-        l <- .LAYERS[i]
-        x[[l]] <- value
-        x
-    })
-#' @export
-#' @rdname SpatialData
 setReplaceMethod("[[", 
     c("SpatialData", "ANY", "ANY"), 
     \(x, i, value) stop(.invalid_layer))

man/SpatialData.Rd

@@ -145,7 +145,6 @@ imageNames(sd)
 
 # alternative ways 
 # (using list-style)
-names(sd[[1]])
 names(sd$images)
 names(sd[["images"]])
 ```