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

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

[复制链接]
发表于 2012-2-25 11:54:08 | 显示全部楼层 |阅读模式
setRepository(annotate)
setRepository()所属R语言包:annotate

                                        Functions to add arbitrary repositories
                                         功能添加任意的库

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

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

These functions allow end users to add arbitrary repositories for use with the htmlpage function.
这些功能允许最终用户添加任意库与htmlpage功能使用。


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


setRepository(repository, FUN, ..., verbose=TRUE)
getRepositories()
clearRepository(repository, verbose=TRUE)



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

参数:repository
A character name for the repository.
一个仓库字符的名称。


参数:FUN
A function to build hyperlinks for the repository. See details for more information.
函数,以建立资料库中的超链接。详情请参阅更多信息。


参数:...
Allows one to pass arbitrary code to underlying functions.
允许一个人通过基本功能任意代码。


参数:verbose
Output warning messages?
输出警告消息?


Details

详情----------Details----------

These functions allow end users to add, view, and remove repositories for use with the htmlpage function. getRepositories will output a vector of names for available repositories. clearRepository can be used to remove a repository if so desired. setRepository can be used to add a repository. See the examples section for the format of the FUN argument.
这些功能允许最终用户添加,查看,删除使用htmlpage函数库。 getRepositories将输出一个可用库名的向量。 clearRepository可以用来删除一个库,如果需要的话。 setRepository可以用来添加一个仓库。看到的乐趣参数的格式的例子。

Once a new repository has been set, the htmlpage function can be called using the name of the new repository as a value in the repository argument (e.g., htmlpage(<other args>, repository = list("newrepositoryname"))
一旦一个新的仓库已定,htmlpage函数可以被称为使用的新资料库的名称作为一个库中的参数值(例如,htmlpage(库=列表<其他args>,(“newrepositoryname” ;))


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


Martin Morgan &lt;mtmorgan@fhcrc.org&gt;



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



## A simple fake URI[#一个简单的假的URI]
repofun <- function(ids, ...)
paste("http://www.afakeuri.com/", ids, sep = "")

setRepository("simple", repofun)

## More complicated, we want to make sure that[#更复杂的,我们要确保]
## NAs get converted to empty cells[#定居地转化为空单元格]

repofun <- function(ids, ...){
bIDs <- which(is.na(ids))
out <- paste("http://www.afakeuri.com/", ids, sep = "")
out[bIDs] <- "&amp;nbsp;"
out
}

setRepository("complex", repofun)

## More complicated URI where we need to pass more information[#更复杂的URI的地方,我们需要传递更多的信息]
## An example is Ensembl, which requires a species as part of the URI[#一个例子是Ensembl的,这就要求作为URI的一部分,一个物种]
## Since htmlpage() has an '...' argument, we can pass arbitrary[#,由于htmlpage()有一个“...”参数,我们可以通过任意]
## arguments to this function that will be passed down to our[#此功能将传递到我们的论点]
## repfun. Here we assume the argument species="Homo_sapiens" has been[#repfun。在这里,我们假设参数物种=“Homo_sapiens的”一直]
## included in the call to htmlpage().[#包括在通话到htmlpage()。]


repofun <- function(ids, ...){
if(!is.null(list(...)$species))
      species <- list(...)$species
  else
      stop("To make links for Ensembl, you need to pass a 'species' argument.",
           call. = FALSE)
out <- paste("http://www.ensembl.org/", species, "/Search/Summary?species=",
              species, ";idx=;q=", ids, sep = "")
out
}

setRepository("species_arg", repofun)


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


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

使用道具 举报

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

本版积分规则

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

GMT+8, 2025-1-23 15:02 , Processed in 0.019586 second(s), 15 queries .

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

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