jebard

### handles the Seurat to phate conversio

### first, grab the input required for phate (here we are using the normalized data stored in Seurat
seurat_data <- as.data.frame(seurat.object@assays$RNA@data)

## reshape for input into PHATE
phate_data_input <- t(seurat_data)

## run phate -- this is a default run, feel free to tune params