fix gate_interactive for library(STexampleData) spatial_data <- Visiu…

…m_mouseCoronal()
william-hutchison · Sep 16, 2024 · c2a8b63 · c2a8b63
1 parent 5cc58f2
commit c2a8b63
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/R/methods.R b/R/methods.R
@@ -353,8 +353,8 @@ gate_interactive <-
 
     # Prepare spatial information
     image <- 
-      SpatialExperiment::imgData(spe)[1, ]@listData$data[[1]] |>
-      SpatialExperiment::imgSource() |>
+      spe |> 
+      SpatialExperiment::imgRaster() |> 
       magick::image_read()
 
     image_x_size <-