principal component cannot be selected

[stemangiola]

library(spatialLIBD)
library(ExperimentHub)

spatial_data <- 
  ExperimentHub::ExperimentHub() |> 
  spatialLIBD::fetch_data( eh = _, type = "spe")

Principal components are there in the tibble representation

spatial_data |> as_tibble() |> colnames()

But cannot be selected

spatial_data |> select(PC1)

Error in `select_helper()`:
! Can't select columns that don't exist.
✖ Column `PC1` doesn't exist.

However, tidySCE can

spatial_data |> as("SingleCellExperiment") |> select(PC1)
tidySingleCellExperiment says: Key columns are missing. A data frame is returned for independent data analysis.
# A tibble: 47,681 × 1
       PC1
     <dbl>
 1  -2.04 
 2   3.36 
 3  -6.82 
 4 -17.6  
 5   0.371
 6   0.468
 7  -7.07 
 8  -1.24 
 9   3.47 
10   2.78 
# ℹ 47,671 more rows
# ℹ Use `print(n = ...)` to see more rows