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

R语言 solaR包 D_compare-methods()函数中文帮助文档(中英文对照)

[复制链接]
发表于 2012-9-30 11:49:02 | 显示全部楼层 |阅读模式
D_compare-methods(solaR)
D_compare-methods()所属R语言包:solaR

                                        Compare G0, Gef and ProdGCPV objects
                                         比较G0,GEF和ProdGCPV的对象

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

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

Compare and plot the yearly values of several objects.
对比和绘制的年度值几个对象。


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


## S4 method for signature 'G0'



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

参数:...
A list of objects to be compared.
进行比较的对象列表。


方法----------Methods----------

The class of the first element of ... is used to determine the
的类的第一个元素的...被用来确定




signature(... = "G0") yearly values of G0d,
signature(... = "G0")值G0d每年,




signature(... = "Gef") yearly values of Gefd, Befd and Defd.
signature(... = "Gef")每年Gefd,Befd和Defd值。




signature(... = "ProdGCPV") yearly values of Yf, Gefd and G0d.
signature(... = "ProdGCPV")每年Yf,Gefd和G0d值。


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


Oscar Perpi帽谩n Lamigueiro



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

dotplot
dotplot


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


lat=37.2;
G0dm=c(2766, 3491, 4494, 5912, 6989, 7742, 7919, 7027, 5369, 3562, 2814,
2179)
Ta=c(10, 14.1, 15.6, 17.2, 19.3, 21.2, 28.4, 29.9, 24.3, 18.2, 17.2, 15.2)
prom=list(G0dm=G0dm, Ta=Ta)

###Comparison of different tracker methods[##不同的跟踪方法的比较]
ProdFixed<-prodGCPV(lat=lat, dataRad=prom, keep.night=FALSE)
Prod2x<-prodGCPV(lat=lat, dataRad=prom, modeTrk='two', keep.night=FALSE)
ProdHoriz<-prodGCPV(lat=lat, dataRad=prom, modeTrk='horiz', keep.night=FALSE)

compare(ProdFixed, Prod2x, ProdHoriz)

##The first element rules the method[#第一个元素法则的方法]
GefFixed=as(ProdFixed, 'Gef')
compare(GefFixed, Prod2x, ProdHoriz)

## Not run: [#不运行:]
###compare and do.call[##比较和do.call]
EstMadrid <- subset(RedEstaciones, NomProv=='Madrid')
nEstMadrid <- nrow(EstMadrid)
namesMadrid <- EstMadrid$NomEst

prodMadrid <- lapply(1:nEstMadrid,
                     function(x){try(prodGCPV(lat=41, modeRad='siar',
                                                  dataRad=list(prov=28, est=x,
                                                    start='01/01/2009', end='31/12/2010'))
                                     )})
names(prodMadrid) <- namesMadrid
okMadrid <- lapply(prodMadrid, class)!='try-error'
prodMadrid <- prodMadrid[okMadrid]

do.call(compare, prodMadrid)

## End(Not run)[#(不执行)]

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


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

使用道具 举报

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

本版积分规则

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

GMT+8, 2025-6-9 07:16 , Processed in 0.024130 second(s), 16 queries .

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

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