Load cellScaleFactors data table (tibble file)

csfLoadData.R

#!/usr/bin/env R

# Author: Sean Maden
#
# Query and load the cellScaleFactors data table from Bioconductor's ExperimentHub.
#
# ExperimentHub/GH repo for cellScaleFactors: https://github.com/metamaden/cellScaleFactors
#

library(ExperimentHub)
eh <- ExperimentHub()
csfData <- query(eh, c("cellScaleFactors"))
path <- csfData[["EH8419"]]
csfData <- get(load(path))