找回密码
 注册
查看: 505|回复: 0

R语言 s4vd包 stabpath()函数中文帮助文档(中英文对照)

[复制链接]
发表于 2012-9-29 21:22:28 | 显示全部楼层 |阅读模式
stabpath(s4vd)
stabpath()所属R语言包:s4vd

                                         Stability paths plot
                                         稳定路径图

                                         译者:生物统计家园网 机器人LoveR

描述----------Description----------

The function plots the stability path of a S4VD result
函数曲线的稳定性路径的S4VD结果


用法----------Usage----------


stabpath(res,number)



参数----------Arguments----------

参数:res
the S4VD result   
S4VD结果


参数:number
the bicluster for which the stability path shall be plotted
的稳定性路径应绘制的bicluster


Details

详细信息----------Details----------

Plots the stability path for the rows and the columns regarding the last iteration of the s4vd algorithm. Note that if the pointwise error control was used or if savepath=FALSE the final selection probabilities for the rows and the columns will be plotted.  
图解关于最后一次迭代的s4vd算法的行和列的稳定路径。请注意,如果使用或逐点误差控制savepath = FALSE最终选择的行和列的概率将被绘制。


(作者)----------Author(s)----------



Martin Sill \
<a href="mailto:m.sill@dkfz.de">m.sill@dkfz.de</a>




实例----------Examples----------


# example data set according to the simulation study in Lee et al. 2010[例如数据集,根据Lee等人的模拟研究。 2010]
# generate artifical data set and a correspondig biclust object[产生人工数据集和correspondig的biclust对象]
u <- c(10,9,8,7,6,5,4,3,rep(2,17),rep(0,75))
v <- c(10,-10,8,-8,5,-5,rep(3,5),rep(-3,5),rep(0,34))
u <- u/sqrt(sum(u^2))
v <- v/sqrt(sum(v^2))
d <- 50
set.seed(1)
X <- (d*u%*%t(v)) + matrix(rnorm(100*50),100,50)
params <- info <- list()
RowxNumber <- matrix(rep(FALSE,100),ncol=1)
NumberxCol <- matrix(rep(FALSE,50),nrow=1)
RowxNumber[u!=0,1] <- TRUE
NumberxCol[1,v!=0] <- TRUE
Number <- 1
ressim <- BiclustResult(params,RowxNumber,NumberxCol,Number,info)
#perform s4vd biclustering [执行s4vd双分群]
system.time( ress4vd <- biclust(X,method=BCs4vd,pcerv=0.5,pceru=0.5,ss.thr=c(0.6,0.65),steps=500,pointwise=FALSE,nbiclust=1,savepath=TRUE))
#perform s4vd biclustering with fast pointwise stability selection[执行s4vd双分群选择快速逐点稳定]
system.time( ress4vdpw <- biclust(X,method=BCs4vd,pcerv=0.5,pceru=0.5,ss.thr=c(0.6,0.65),steps=500,pointwise=TRUE,nbiclust=1))
#stability paths[稳定路径]
stabpath(ress4vd,1)
#selection probabilitys for the pointwise stability selection[选择probabilitys稳定的逐点选择]
stabpath(ress4vdpw,1)

转载请注明:出自 生物统计家园网(http://www.biostatistic.net)。


注:
注1:为了方便大家学习,本文档为生物统计家园网机器人LoveR翻译而成,仅供个人R语言学习参考使用,生物统计家园保留版权。
注2:由于是机器人自动翻译,难免有不准确之处,使用时仔细对照中、英文内容进行反复理解,可以帮助R语言的学习。
注3:如遇到不准确之处,请在本贴的后面进行回帖,我们会逐渐进行修订。
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

手机版|小黑屋|生物统计家园 网站价格

GMT+8, 2024-11-29 02:54 , Processed in 0.023163 second(s), 15 queries .

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表