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

R语言 DEGraph包 AN.test()函数中文帮助文档(中英文对照)

[复制链接]
发表于 2012-2-25 16:24:00 | 显示全部楼层 |阅读模式
AN.test(DEGraph)
AN.test()所属R语言包:DEGraph

                                        Performs the Adaptive Neyman test of Fan and Lin (1998)
                                         执行范和林的自适应的奈曼测试(1998年)

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

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

Performs the Adaptive Neyman test of Fan and Lin (1998).
范和林(1998)执行自适应奈曼测试。


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


AN.test(X1, X2, candK=1:ncol(X1), na.rm=FALSE)



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

参数:X1
A n1 x p matrix, observed data for class 1: p variables, n1 observations.
一个N1 XP matrix,观察到1级的数据:P变量,N1的意见。


参数:X2
A n2 x p matrix, observed data for class 2: p variables, n2 observations.
一个N2 XP matrix,观察到的数据为2级:P变量,N2意见。


参数:candK
A vector, candidate values for the true number of Fourier components.
一个vector,候选人傅立叶分量的真实值。


参数:na.rm
A logical value indicating whether variables with NA in at least one of the n1 + n2 observations should be discarder before the test is performed.
一个logical值,指示是否使用变量NA至少在一个N1 + N2意见应该铳前进行测试。


值----------Value----------

A list with class "htest" containing the following components:
一个list类“htest”包含以下组件:




statistic A numeric value, the test statistic.
统计一个numeric值,检验统计量。




p.value A numeric value, the corresponding p-value.
p.value一个numeric值,相应的p值。




kstar A numeric value, the estimated true number of Fourier
科士达一个numeric值,估计真正的傅立叶


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


Laurent Jacob, Pierre Neuvial and Sandrine Dudoit



参见----------See Also----------

BS.test() graph.T2.test() hyper.test()
BS.test()graph.T2.test()hyper.test()


举例----------Examples----------


library("KEGGgraph")
## library("NCIgraph")[#库(“NCIgraph”)]
library("rrcov")

data("Loi2008_DEGraphVignette")
exprData <- exprLoi2008
classData <- classLoi2008
rn <- rownames(exprData)

## Retrieve expression levels data for genes from one KEGG pathway[#从一个KEGG通路的基因表达水平的数据检索]
gr <- grListKEGG[[1]]
gids <- translateKEGGID2GeneID(nodes(gr))
mm <- match(gids, rownames(exprData))

## Keep genes from the graph that are present in the expression data set[#远离基因图,是在表达数据集]
idxs <- which(!is.na(mm))
gr <- subGraph(nodes(gr)[idxs], gr)

idxs <- which(is.na(mm))
if(length(idxs)) {
  print("Gene ID not found in expression data: ")
  str(gids[idxs])
}
dat <- exprData[na.omit(mm), ]
str(dat)

X1 <- t(dat[, classData==0])
X2 <- t(dat[, classData==1])

## DEGraph T2 test[#DEGraph T2检验]
res <- testOneGraph(gr, exprData, classData, verbose=TRUE, prop=0.2)

## T2 test (Hotelling)[#T2检验(霍特林)]
rT2 <- T2.test(X1, X2)
str(rT2)

## Adaptive Neyman test[#自适应奈曼测试]
rAN <- AN.test(X1, X2, na.rm=TRUE)
str(rAN)

## Adaptive Neyman test from Fan and Lin (1998)[#自适应奈曼测试范和林(1998)]
rAN <- AN.test(X1, X2, na.rm=TRUE)
str(rAN)

## Test from Bai and Saranadasa (1996)[#测试从白和Saranadasa(1996)]
rBS <- BS.test(X1, X2, na.rm=TRUE)
str(rBS)

## Hypergeometric test[#超几何测试]
pValues <- apply(exprData, 1, FUN=function(x) {
  tt <- t.test(x[classData==0], x[classData==1])
  tt$p.value
})
str(pValues)
names(pValues) <- rownames(exprData)
rHyper <- hyper.test(pValues, gids, thr=0.01)
str(rHyper)


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


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

使用道具 举报

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

本版积分规则

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

GMT+8, 2025-2-12 04:28 , Processed in 0.027029 second(s), 16 queries .

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

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