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

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

[复制链接]
发表于 2012-9-30 01:25:15 | 显示全部楼层 |阅读模式
swap(seqinr)
swap()所属R语言包:seqinr

                                        Exchange two R objects
                                         交换两个R对象

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

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

Exchange object x with object y.
Exchange对象x:的对象y的。


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


swap(x, y)



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

参数:x
an R object
R对象


参数:y
an R object
R对象


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

none.
没有。


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


J.R. Lobry



参考文献----------References----------



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

move
move


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


#[]
# Example in a new empty environment:[例如,在一个新的空环境:]
#[]
local({
  x <- 0:9
  y <- 10:19
  print(x)
  print(y)
  swap(x[1], y[2])
  print(x)
  print(y)
})
#[]
# Sanity check with a bubble sort:[一个冒泡排序的合理性检查:]
#[]
bubble.sort <- function(tab, n = length(tab)){
  i <- 1
  while(i < n){
    if(tab[i + 1] < tab[i]){
      swap(tab[i], tab[i+1])
      i <- 1
    } else {
      i <- i+1
    }
  }
  return(tab)
}
set.seed(1)
x <- rnorm(10)
stopifnot(identical(sort(x), bubble.sort(x)))

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


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

使用道具 举报

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

本版积分规则

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

GMT+8, 2025-5-20 11:56 , Processed in 0.023553 second(s), 16 queries .

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

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