cutAndPlotResultsT1(CellNOptR)
cutAndPlotResultsT1()所属R语言包:CellNOptR
Plot the results of an optimisation at t1
绘制优化的结果,在t1
译者:生物统计家园网 机器人LoveR
描述----------Description----------
This function takes a model and an optimised bitstring, it cuts the model according to the bitstring and plots the results of the simulation along with the experimental data.
这个函数接受一个模型和优化的比特串,切模型,根据模拟结果与实验数据的比特串和图。
用法----------Usage----------
cutAndPlotResultsT1(Model, bString, SimList, CNOlist, indexList, plotPDF = FALSE)
参数----------Arguments----------
参数:Model
a model (the full one that was used for optimisation)
模型(一个用于优化)
参数:bString
a bitstring for T1 as output by gabinaryT1 (i.e. a vector of 1s and 0s)
由gabinaryT1(即1和0的向量)T1的输出比特串
参数:SimList
a simlist corresponding to the model, as output by prep4Sim
1 simlist相应的模型作为输出,由prep4Sim
参数:CNOlist
a CNOlist, corresponding to the optimisation one
1 CNOlist,相应的优化一
参数:indexList
an indexList, produced by indexFinder ran on the model and the CNOlist above
一个indexList,indexFinder生产运行模式和CNOlist以上
参数:plotPDF
TRUE or FALSE; tells whether you want a pdf to be produced or not
TRUE或FALSE,告诉您是否要以产生PDF或
值----------Value----------
This function doesn't return anything, it only plots the graph in your graphic window, and in a pdf file if asked
这个函数不返回任何东西,它只是在图形窗口中绘制图,并在一个PDF文件,如果问
作者(S)----------Author(s)----------
C.Terfve
参见----------See Also----------
gabinaryT1, prep4Sim
gabinaryT1,prep4Sim
举例----------Examples----------
#load data[数据加载]
data(CNOlistToy,package="CellNOptR")
data(ToyModel,package="CellNOptR")
#pre-process model[预过程模型]
checkSignals(CNOlistToy,ToyModel)
indicesToy<-indexFinder(CNOlistToy,ToyModel,verbose=FALSE)
ToyNCNOindices<-findNONC(ToyModel,indicesToy,verbose=FALSE)
ToyNCNOcut<-cutNONC(ToyModel,ToyNCNOindices)
indicesToyNCNOcut<-indexFinder(CNOlistToy,ToyNCNOcut)
ToyNCNOcutComp<-compressModel(ToyNCNOcut,indicesToyNCNOcut)
indicesToyNCNOcutComp<-indexFinder(CNOlistToy,ToyNCNOcutComp)
ToyNCNOcutCompExp<-expandGates(ToyNCNOcutComp)
#optimise[优化]
ToyFields4Sim<-prep4Sim(ToyNCNOcutCompExp)
initBstring<-rep(1,length(ToyNCNOcutCompExp$reacID))
ToyT1opt<-gaBinaryT1(
CNOlist=CNOlistToy,
Model=ToyNCNOcutCompExp,
SimList=ToyFields4Sim,
indexList=indicesToyNCNOcutComp,
initBstring=initBstring,
maxGens=2,
PopSize = 5,
verbose=FALSE)
cutAndPlotResultsT1(
Model=ToyNCNOcutCompExp,
bString=ToyT1opt$bString,
SimList=ToyFields4Sim,
CNOlist=CNOlistToy,
indexList=indicesToyNCNOcutComp,
plotPDF=FALSE)
转载请注明:出自 生物统计家园网(http://www.biostatistic.net)。
注:
注1:为了方便大家学习,本文档为生物统计家园网机器人LoveR翻译而成,仅供个人R语言学习参考使用,生物统计家园保留版权。
注2:由于是机器人自动翻译,难免有不准确之处,使用时仔细对照中、英文内容进行反复理解,可以帮助R语言的学习。
注3:如遇到不准确之处,请在本贴的后面进行回帖,我们会逐渐进行修订。
|