# #——cellCellSimulate_Default回声= TRUE -------------------------------------- suppressPackageStartupMessages(库(“scTensor”))sim < - cellCellSimulate () ## ---- cellCellSimulate_Setting,回声= TRUE -------------------------------------- # 缺省参数参数< - newCCSParams () str (params) # #没有设置不同的参数。关于基因:1000 setParam (params nGene) < 20 - 1000 # 3细胞,细胞在每一个细胞类型setParam (params, nCell) < - c(20、20、20)#设置中的一对setParam列表(params, cciInfo) < -列表(nPair = 500, #唐森总数对# 1日CCI CCI1 =列表(LPattern = c(1,0,0),这种模式#只有1细胞类型RPattern = c(0,1,0), #只有2细胞类型这一模式nGene = 50 # 50对生成CCI1 fc =“E10”),#程度的微分表达式(褶皱变化)# 2 CCI CCI2 =列表(LPattern = c (0,1,0) RPattern = c (0, 0, 1), nGene = 30, fc =“高达”))#度辍学setParam (params,“λ”)< - 10 #随机数种子setParam (params,“种子”)< - 123 #仿真数据sim <——cellCellSimulate (params) # #——输入,回声= TRUE --------------------------------------------------------- 暗(sim输入美元)sim输入美元(1:2,1:3)# # - LR,回声= TRUE ------------------------------------------------------------ 暗(sim $ LR) sim $ LR (1:10,) sim $ LR 46:55, sim $ LR [491:500 ,] ## ---- celltypes,回声= TRUE ----------------------------------------------------- 长度(sim celltypes美元)头(sim celltypes美元)表(名字(sim celltypes美元 )) ## ---- sessionInfo,回声= FALSE -------------------------------------------------- sessionInfo ()