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

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

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

                                        Merge solaR objects
                                         合并太阳能对象

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

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

Merge the daily time series of solaR objects
合并的日常时间序列的太阳能对象


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


## S4 method for signature 'G0'



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

参数:...
A list of objects to be merged.
要合并的对象的列表。


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

The class of the first element of ... is used to determine the suitable method. Only the most important daily variable is
的类的第一个元素的...被用来确定合适的方法。每天只有最重要的变量是




signature(... = "Meteo") G0
signature(... = "Meteo")G0




signature(... = "G0") G0d
signature(... = "G0")G0d




signature(... = "Gef") Gefd
signature(... = "Gef")Gefd




signature(... = "ProdGCPV") Yf
signature(... = "ProdGCPV")Yf




signature(... = "ProdPVPS") Yf
signature(... = "ProdPVPS")Yf


实例----------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)

###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)

prod <- mergesolaR(ProdFixed, Prod2x, ProdHoriz)
head(prod)

## Not run: [#不运行:]
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]

YfMadrid <- do.call(mergesolaR, prodMadrid)

horizonplot(YfMadrid-rowMeans(YfMadrid),
            origin=0,
            scales=list(y=list(relation='same')),
            colorkey=TRUE)

TargetDiagram(YfMadrid, end=as.POSIXct('2010-12-31'), ndays=c(10, 20,
30, 40, 50, 60), cex=0.6)

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

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


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

使用道具 举报

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

本版积分规则

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

GMT+8, 2025-6-10 18:55 , Processed in 0.033360 second(s), 16 queries .

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

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