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

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

[复制链接]
发表于 2012-9-28 21:26:08 | 显示全部楼层 |阅读模式
DISPLACE.SEISN(RSEIS)
DISPLACE.SEISN()所属R语言包:RSEIS

                                        Displacement seismogram
                                         位移地震

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

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

Removes seismic instrument response and integrates to displacement.
删除地震仪器的响应和集成位移。


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


DISPLACE.SEISN(TH, sel = 1:length(TH$JSTR), inst = 1, Kal = Kal,waterlevel = 1e-08,  FILT = list(ON = FALSE, fl = 1/30, fh = 7, type = "HP", proto = "BU"))



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

参数:TH
list structure of seismic traces
列表构造的地震痕迹


参数:sel
select which tracesin list to deconvolve
选择tracesin列表反卷积


参数:inst
index to instrument in Kal list for calibration and instrument response  
指数在卡尔的工具列表中的校准和仪器响应


参数:Kal
list of instrument responses
仪器响应列表


参数:waterlevel
waterlevel for low frequency division  
waterlevel低频分


参数:FILT
filter output, after instrumentation
滤波器的输出后,仪表


Details

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

Instrument responses are lists of poles and zeros for each instrument defined.
仪器响应的极点和零点定义为每个仪器的列表。


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

Same as input list with new traces representing displacement versus velocity
输入新的痕迹,代表位移与速度相同


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


Jonathan M. Lees<jonathan.lees@unc.edu>



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

VELOCITY.SEISN, deconinst
VELOCITY.SEISN,deconinst


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



## Not run: [#不运行:]
Majorevent  = 250+8/24+2250/(24*3600)

at1 = Majorevent - 1/24
at2 = Majorevent + 1/24


TH =  Mine.seis(at1, at2, DB99, NULL, NULL , kind = 1, Iendian=1, BIGLONG=FALSE, CHOP=TRUE, verbose=FALSE)
inst = rep(0, length(TH$STNS))
inst[TH$COMPS
inst[TH$STNS=="krm2" &  TH$COMPS
inst[TH$STNS=="krm0" &  TH$COMPS


DH =  DISPLACE.SEISN(TH, sel = which(inst>0) , inst = inst, Kal = Kal, FILT = list(ON = FALSE, fl = 1/200, fh = 7, type = "BP", proto = "BU"))

  SOUT =  swig(DH, PADDLAB=c("CENTER", "fspread", "HALF", "PREV"), filters=thefilts  )



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




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


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

使用道具 举报

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

本版积分规则

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

GMT+8, 2024-11-27 06:25 , Processed in 0.087756 second(s), 16 queries .

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

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