# Create an ingres object with viper slot
ing = createIngresObjectFromSeurat(
small_blca_wang, "RNA", "data", network_genes, network
)
ing@viper = viper_results
ing = computePbnByCluster(ing)
head(ing@cluster.pbn)
ing = computePbnBySingleCell(ing)
head(ing@single.cell.pbn)
# Restrict range to (-0.5, 0.5)
ing = computePbnByCluster(ing, range = c(-0.5, 0.5))
head(ing@cluster.pbn)
ing = computePbnBySingleCell(ing, range = c(-0.5, 0.5))
head(ing@single.cell.pbn)
Run the code above in your browser using DataLab