################################################### ### 块1号:CGHnormaliterPackage ################################################### 选项(keep.source = TRUE) CGHnormaliterPackage < - packageDescription(“CGHnormaliter ") ################################################### ### 块2号:loadData ################################################### 库(CGHnormaliter)数据(白血病 ) ################################################### ### 块3号:runCGHnormaliter ################################################### 结果< - CGHnormaliter(白血病,nchrom = 3 ) ################################################### ### 块数量4:accessResults ################################################### 归一化。数据<- copynumber(结果)分段。数据<-分段(结果)被调用。< -调用(结果数据 ) ################################################### ### 块5号:plotCommand ################################################### 情节(结果[2],ylimit = c (2, 2), dotres = 1 ) ################################################### ### 块6号:callFigure ################################################### 情节(结果[2],ylimit = c (2, 2), dotres = 1 ) ################################################### ### 块7号:saveNormalizedData ################################################### CGHnormaliter.write.table(结果 ) ################################################### ### 块8号:saveOtherData ################################################### CGHnormaliter.write。table(result, data.type="segmented")表(因此,data.type = "称为")