summarize(flowPhyto)
summarize()所属R语言包:flowPhyto
Summarize phytoplankon event & log parameters
总结phytoplankon事件log参数
译者:生物统计家园网 机器人LoveR
描述----------Description----------
perform aggregate statistics on a particular combination of events (in a dataframe) per population.
执行人口特别是结合每一个事件(一个dataframe)汇总统计。
用法----------Usage----------
summarize(x, channel.clmns = CHANNEL.CLMNS, opp.paths.str='1,2,3')
参数----------Arguments----------
参数:x
event dataframe
事件dataframe
参数:channel.clmns
flow cyometry event-level chanels columns in the dataframe (x) on which to perform aggreate statistics (mean and standard deviation).
流cyometry事件级别chanels,在dataframe列(X)执行aggreate的统计(平均数和标准差)。
参数:opp.paths.str
a comma delimited string of file names
逗号分隔的字符串的文件名
值----------Value----------
returns an aggregate statistics dataframe
返回总额统计dataframe的
举例----------Examples----------
opp.paths <- sapply(c(1,2,3), function(i)
system.file("extdata","seaflow_cruise","2011_001", paste(i,'.evt.opp',sep=''),
package="flowPhyto"))
filter.df <- do.call(rbind.data.frame, lapply(opp.paths, readSeaflow,
add.yearday.file=TRUE))
consen.df <- do.call(rbind.data.frame, lapply(opp.paths, readConsensusFile))
classed <- cbind.data.frame(filter.df, consen.df)
nrow.opp <- sapply(opp.paths, function(p) readSeaflow( p , count.only=TRUE))
nrow.evt <- sapply(opp.paths, function(p) readSeaflow(sub('.opp','',p), count.only=TRUE))
classed$opp <- rep(nrow.opp, times=nrow.opp)
classed$evt <- rep(nrow.evt, times=nrow.opp)
summary(classed)
class.jn <- do.call(rbind.data.frame, by(classed, list(classed$file),
joinSDS, caroline::nv(opp.paths, sapply(opp.paths, getFileNumber)) ))
summarize(class.jn, opp.paths.str=paste(names(opp.paths), collapse=','))
转载请注明:出自 生物统计家园网(http://www.biostatistic.net)。
注:
注1:为了方便大家学习,本文档为生物统计家园网机器人LoveR翻译而成,仅供个人R语言学习参考使用,生物统计家园保留版权。
注2:由于是机器人自动翻译,难免有不准确之处,使用时仔细对照中、英文内容进行反复理解,可以帮助R语言的学习。
注3:如遇到不准确之处,请在本贴的后面进行回帖,我们会逐渐进行修订。
|