data(PRECASTObj)
PRECASTObj <- SelectModel(PRECASTObj)
seuInt <- IntegrateSpaData(PRECASTObj, species='unknown')
dimPlot(seuInt, reduction = 'PRECAST')
## or use the Seurat::DimPlot(seuInt, reduction = 'PRECAST')
Run the code above in your browser using DataLab