来自vignette source的vignettes/flowFP/inst/doc/flowFP_HowTo的代码。Rnw ' ################################################### ### 代码块1号:loadPackage ################################################### 库(flowFP ) ################################################### ### 代码块2号:ShowData ################################################### 数据(fs1) fs1 ################################################### ### 代码块3号:ShowTube ################################################### fs1 [[1 ]] ################################################### ### 代码块4:数量模型 ################################################### 国防部< - flowFPModel (fs1、name = " CD45 / SS模型”,参数= c(2、5),nRecursions = 7)显示(mod ) ################################################### ### 代码块5号:PlotModel ################################################### 情节(mod ) ################################################### ### 代码块6号:指纹 ################################################### fp < - flowFP (fs1、mod)显示(fp)情节(fp, type = "堆栈 ") ################################################### ### 代码块7号:Plex1 ################################################### 数据(fs2) mod1 < - flowFPModel (fs1、name =“CD45 / SS模型vs fs1”,参数= c(“党卫军日志”、“FL3日志”),nRecursions = 7) mod2 < - flowFPModel (fs2名称=“CD45 / SS模型vs fs2”,参数= c(“党卫军日志”、“FL3日志”),nRecursions = 7) fp1_1 < - flowFP (fs1、mod1) fp1_2 < - flowFP (fs1、mod2)丛< - flowFPPlex (c (fp1_1 fp1_2))情节(丛类型=“网格”,vert_scale = 10 ) ################################################### ### 代码块8号:Plex2 ################################################### fp < - flowFP (fs1、参数= c(“党卫军日志”、“FL3日志”),nRecursions = 8)丛< - flowFPPlex()(水平8:5){nRecursions (fp) < -水平丛< - append(丛,fp)}情节(丛类型=“纠结”,转换= "常态 ") ################################################### ### 代码块9号:QC1 ################################################### fp1 < - flowFP (fs1、参数= c(“党卫军日志”、“FL3日志”),name = "自我模型:fs1”,nRecursions = 5)情节(fp1类型=“质量控制”,主要= "门qc样品fs1 ") ################################################### ### 代码块10号:QC2 ################################################### fp2 < - flowFP (fs2参数= c(“党卫军日志”、“FL3日志”),name =“自我模型:fs2 nRecursions = 5)情节(fp2,类型=“质量控制”,主要= "门qc样品fs2 ") ################################################### ### 代码块11号:子样品 ################################################### phenoData (fs2)管< -因子(1:7)# $(我在1:7){exprs (fs2[[我]])= exprs (fs2[[我]])(样本(1:nrow (fs2[[我]]),大小= 2500),]}fp2 < flowFP (fs2参数= c(2、5),nRec = 5 ) ################################################### ### 代码块12号:FvizFigure ################################################### xyplot(“FL3日志”~“党卫军日志”|管,data = fs2 ) ################################################### ### 代码块13号:flowFP_HowTo。Rnw: 493 - 494 ################################################### 情节(trellis.last.object ()) ################################################### ### 代码块14号:QC3 ################################################### 情节(fp2, fs2,嗨= 5,showbins = c(6、7、10、11),pch = 20, cex =。3、转换= '常态 ') ################################################### ### 代码块数量15:QC4 ################################################### 数据(板)fp < - flowFP(板、参数= c(“SSC-H”、“FL3-H”,“FL4-H”),nRecursions = 5)情节(fp、类型=“板”)