You can install the development version of sell:
# FILL THIS IN! HOW CAN PEOPLE INSTALL YOUR DEV PACKAGE?
pak::pak("rainoffallingstar/sell")
This is a basic example which shows you how to solve a common problem:
library(sell)
## basic example code
## check seurat api
seurat_api_detect()
## encode your array and pdata into seurat object and take computation
seurat_object <- seurat_encoder(newdata[["arraydata"]],newdata[["pdata"]],min.cells = 0,
min.features = 0,reduction_dims = 1:5)
## extract datas from seurat container
sell_list <- seurat_decoder(seurat_object)
## creat a R6 object for single cell: BagEnd
## In a hole in the ground there lived a lot of cells,lol
sellobject <- BagEndClass$new(arraydata = arraydata,pdata = pdata)
## select interested samples and gene and transform into a long table for further works
sell_melt_df <- intersect_array_pdata(arraydata,pdata) %>%
sell_melt()