#load datasetwd("D:\\KS项目\\公众号文章\\nichenet单细胞通讯分析及可视化")load("D:/KS项目/公众号文章/nichenet单细胞通讯分析及可视化/scRNA_nichenet.RData")lr_network<- readRDS('./nichent-human-network/lr_network_human_21122021.rds')ligand_target_matrix<- readRDS('./nichent-human-network/l...
#load datasetwd("D:\\KS项目\\公众号文章\\nichenet单细胞通讯分析及可视化")load("D:/KS项目/公众号文章/nichenet单细胞通讯分析及可视化/scRNA_nichenet.RData")lr_network<- readRDS('./nichent-human-network/lr_network_human_21122021.rds')ligand_target_matrix<- readRDS('./nichent-human-network/l...