chooser(RPMG)
chooser()所属R语言包:RPMG
Iteractive Selection Winder
Iteractive选择绕线机
译者:生物统计家园网 机器人LoveR
描述----------Description----------
Choose an option from a selection
从选择中选择一个选项
用法----------Usage----------
chooser(opts=c(1, 2, 5, 10, 15, 20) , ncol=5, nsel=NA, newdev=TRUE, STAY=FALSE,
cols="red", main="", newplot=TRUE, xlim=c(0,1), ylim=c(0,1),
just="CEN", ... )
参数----------Arguments----------
参数:opts
list of options
的选项列表
参数:ncol
number of columns
的列数
参数:nsel
number of selections
选择数量
参数:newdev
logical, TRUE=start new device, default=TRUE
逻辑,TRUE =启动新的设备,默认= TRUE
参数:STAY
logical, TRUE=keep same device when done, default=FALSE
逻辑,TRUE =保持相同的设备时,默认= FALSE
参数:cols
colors for buttons, default = pastel.col(N)
颜色的按钮,默认值= pastel.col(N)
参数:main
title for screen (maybe instructions for picking)
标题画面(也许说明采摘)
参数:newplot
logical, TRUE means start a new plot
逻辑,TRUE的方式启动一个新的绘图
参数:xlim
xlim on the plot
在图上作适当调整
参数:ylim
ylim on the plot
ylim的图
参数:just
character, justification in box, one of CEN, LEFT, RIGHT
字符,理由框中,CEN,LEFT,RIGHT
参数:...
additional parameters from par, used for font, cex, etc...
额外的参数,从参数,用于字体,CEX,等..
Details
详细信息----------Details----------
Used for interactive selections of numeric or other options. If the input vector is all numeric, a numeric value is returned. If, on the other hand, the input is mixed or character, a character vector is returned. If the selection number nsel is left blank, it is set at 1. If it is specified, selection can be truncated by clicking the right mouse.
用于交互式数字或其他选项的选择。如果输入向量是所有的数字,返回一个数值。如果,在另一方面,其输入是混合或字符,字符向量被返回。如果选择数量NSEL留为空白,它被设置为1。如果它被指定,点击鼠标右键选择可以被截断。
值----------Value----------
vector of selections.
向量的选择。
(作者)----------Author(s)----------
Jonathan M. Lees<jonathan.lees.edu>
参见----------See Also----------
locator
定位器
实例----------Examples----------
k = letters[1:26]
pk = chooser(opts=k , nsel=3 )
print(pk)
k = c( 1:26, letters[1:26])
pk = chooser(opts=k , nsel=3 )
print(pk)
k = 1:12
pk = chooser(opts=k , nsel=3 )
print(pk)
##################[#################]
plot(runif(10, 1, 100), runif(10, 1, 100), type='n')
APAL = c('tan2','red2','lightpink3','chocolate4','blue3','thistle4',
'lightcyan4',
'orangered1','purple4','darkred','dodgerblue1','gold3','chartreuse',
'sienna4')
## nchar( APAL )[#NCHAR(APAL)]
wm = which.max(nchar( APAL ))
swidth = strwidth(APAL[wm])
upar = par("usr")
mhgt = sum( strheight(APAL )+0.5*strheight(APAL ))
mwid = max( strwidth(APAL) )
mwid = mwid + 0.05*mwid
chooser(opts=APAL , ncol=1, nsel=NA, newdev=FALSE, STAY=TRUE,
newplot=FALSE, xlim=c(upar[1], upar[1]+mwid) , ylim=c( (upar[4]-mhgt),upar[4]) , main="" )
转载请注明:出自 生物统计家园网(http://www.biostatistic.net)。
注:
注1:为了方便大家学习,本文档为生物统计家园网机器人LoveR翻译而成,仅供个人R语言学习参考使用,生物统计家园保留版权。
注2:由于是机器人自动翻译,难免有不准确之处,使用时仔细对照中、英文内容进行反复理解,可以帮助R语言的学习。
注3:如遇到不准确之处,请在本贴的后面进行回帖,我们会逐渐进行修订。
|