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

loveR

prep1wig(RSEIS)
prep1wig()所属R语言包：RSEIS

                                        Prepare structure for RSEIS
                                         准备为RSEIS结构

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

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

Takes list of traces and prepares new list for analysis in RSEIS
轨迹列表，并准备新的列表在RSEIS分析


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


prep1wig(wig=vector(), dt=1, sta="STA", comp="CMP", units="UNITS", starttime=list(yr=0, jd=1,mo=1,dom=1,hr=1,mi=1,sec=0) )



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

参数：wig
vector of time series
矢量的时间序列


参数：dt
sample interval
采样间隔


参数：sta
character, station name
字符，站名


参数：comp
character,component name
字符，组件名称


参数：units
character, units of signal
字符，单位为信号


参数：starttime
list(yr=1972, jd=1,mo=1,dom=1,hr=1,mi=1,sec=0)
列表（年= 1972，，JD = 1，MO = 1，DOM = 1小时= 1英里= 1秒= 0）


Details

详细信息----------Details----------

prep1wig is offered to reformat a time series
prep1wig提供格式化时间序列

for input to program swig()
输入程序痛饮（）


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

Rsac output list
RSAC输出列表


参数：amp
amplitude
振幅


参数：dt
sample rate
采样率


参数：nzyear
year
年


参数：nzhour
hour
小时


参数：nzmin
minutes
分钟


参数：nzsec
seconds
秒


参数：nzmsec
msec
毫秒


参数：b
sac stuff
囊的东西


参数：e
sac stuff
囊的东西


参数：o
sac stuff
囊的东西


参数：fn
character, file name
字符，文件名


参数：sta
character
字符


参数：comp
character
字符


参数：DATTIM
list of date and time
列表的日期和时间


参数：N
number of points
的点的数量


参数：units
character
字符


（作者）----------Author(s)----------


Jonathan M. Lees<jonathan.lees.edu>



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

swig, prepSEIS
痛饮，prepSEIS


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



data(sunspots)
AA = attributes(sunspots)
starttime=list(yr=AA$tsp[1], jd=1,mo=1,dom=1,hr=0,mi=0,sec=0)
ES = prep1wig(wig=sunspots, dt=1/12, sta="STA", comp="CMP", units="UNITS", starttime=starttime     )

EH=prepSEIS(ES)

STDLAB = c("DONE",  "zoom out", "refresh", "restore", "XTR", "SPEC", "SGRAM" ,"WLET")

xx =  swig( EH, STDLAB = STDLAB)
####################[＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃]
####################[＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃]
####################   example with multiple signals[＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃＃例如与多个信号]

dt = 0.001
t = seq(0, 6, by=0.001)
######   % sample rate = 1000 Hz, 0.001 seconds 601 samples[＃＃＃＃＃％采样率= 1000赫兹，0.001秒601样品]

###  set up the fequencies and amplitudes for signals that have 2 frequencies[＃＃成立fequencies和幅度的信号，有2个频率]
afreqs1 = c(50, 40,10, 5 )
amps1 = c(6, 2,3, 2 )
####[＃＃＃]
afreqs2 = c(120,30,20, 30  )
amps2 = c(10,5, 9, 2 )


x = cbind( amps1[1]*sin(2*pi*afreqs1[1]*t) + amps2[1]* sin(2*pi*afreqs2[1]*t),
amps1[2]*sin(2*pi*afreqs1[2]*t) + amps2[2]* sin(2*pi*afreqs2[2]*t),
amps1[3]*sin(2*pi*afreqs1[3]*t) + amps2[3]* sin(2*pi*afreqs2[3]*t),
amps1[4]*sin(2*pi*afreqs1[4]*t) + amps2[4]* sin(2*pi*afreqs2[4]*t))

d = dim(x)

########  names of signals[＃＃＃＃＃＃＃的信号名称]
mysta=c("R1", "R2", "R3", "R4")

MYLIST = list()
starttime=list(yr=2008, jd=1,mo=1,dom=1,hr=0,mi=0,sec=0)
############  set up the initial list of wiggles[＃＃＃＃＃＃＃＃＃＃＃设置的初始列表晃]
for(i in 1:d[2])
{

A = prep1wig(wig =x[,i], sta=mysta[i], dt=dt, comp="DO", units="amp", starttime=starttime)
A[[1]]$DATTIM$yr=2000
MYLIST = c(MYLIST, A)

}

###  reorganize into RSEIS format:[＃＃重组到RSEIS格式的：]
PH1=prepSEIS(MYLIST)

STDLAB = c("DONE",  "zoom out", "refresh", "restore", "XTR", "SPEC", "SGRAM" ,"WLET")

swig(PH1, STDLAB = STDLAB)




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


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