eqwrapup(Rquake)
eqwrapup()所属R语言包：Rquake
Earthquake Wrap Uo
地震总结UO
译者：生物统计家园网 机器人LoveR
描述----------Description----------
Calculate error and summary information on earthquake location.
计算误差对地震的位置和摘要信息。
用法----------Usage----------
eqwrapup(Ldat, EQ, vel, distwt=20, lambdareg = 0.0, verbose=FALSE)
参数----------Arguments----------
参数：Ldat
List of station arrival times, lat-lon, and uncertainty
站到达时间，纬度，经度和不确定性名单
参数：EQ
List of earthquake location: Lat-Lon-z-t
地震位置的纬度，经度列表-Z-T
参数：vel
velocity model
速度模型
参数：distwt
distance weight, default=20
距离权重，默认值= 20
参数：lambdareg
numeric, regularization parameter (default=0)
数字，正则化参数（默认值= 0）
参数：verbose
logical, TRUE=print information to screen
逻辑，TRUE =打印信息屏
Details
详细信息----------Details----------
Earthquakes are located with a generalized inverse (SVD). covariance matrix is extracted and 95% confidence bounds are calculated. Quality factors Q1 and Q1 estimate the quality iof the location based on the gap, minimum distance and rms.
位于地震的广义逆（SVD）。协方差矩阵中提取95％的置信区间的计算。质量因素的Q1和Q1的质量法语国家国际组织估计，基于位置的最小距离上的差距，和rms。
值----------Value----------
List
表
参数：rms
Root Mean Square Residual
根平均平方剩余
参数：meanres
Mean Residual
平均剩余
参数：sdres
Standard Dev of residuals
标准开发的残差
参数：sdmean
Standard error of mean residual
标准误差平均剩余
参数：sswres
Sum squared weighted residuals
平方和加权残值法
参数：ndf
Number of Degrees of Freedom
自由度数
参数：sterrx
km, error in X (East-West)
公里，误差在X（东 - 西）
参数：sterry
km, error in Y (North-South)
公里，误差在Y（北 - 南）
参数：sterrz
km, error in Z, (depth)
公里，Z中的误差，（深度）
参数：sterrt
s, Delta-time
，台达时
参数：cov
covariance matrix (used for error ellipsoids)
协方差矩阵（用于错误椭球）
参数：lam
lambda
拉姆达
参数：gap
Spatial gap (max subtended angle)
空间间隙（最大圆心角）
参数：herr
Horizontal error
水平误差
参数：distmin
Minimum distance to epicenter
最小距离震中
参数：Q1
Quality Factor based on Gap and RMS
品质因数的基础上间隙和RMS
参数：Q2
Quality factor based on RMS, depth and min-Distance
质量因素的基础上的RMS，深度和最小距离
注意----------Note----------
The Damping parameter (lambda) is set to zero. In the UW lquake program, lambda is set to 0.02.
阻尼参数（λ）被设置为零。在UW lquake计划，λ为0.02。
（作者）----------Author(s)----------
Jonathan M. Lees<jonathan.lees@unc.edu>
参见----------See Also----------
Klocate, Glocate, getGAP
Klocate，Glocate，getGAP
实例----------Examples----------
require(RSEIS)
data(GH)
data(wu_coso.vel)
vel = wu_coso.vel
gpf = GH$pickfile
w1 = which(gpf$STAS$phase=="P" | gpf$STAS$phase=="S" )
N = length(w1)
Ldat = list(
name = gpf$STAS$name[w1],
sec = gpf$STAS$sec[w1],
phase = gpf$STAS$phase[w1],
lat=gpf$STAS$lat[w1],
lon = gpf$STAS$lon[w1],
z = gpf$STAS$z[w1],
err= gpf$STAS$err[w1],
yr = rep(gpf$LOC$yr , times=N),
jd = rep(gpf$LOC$jd, times=N),
mo = rep(gpf$LOC$mo, times=N),
dom = rep(gpf$LOC$dom, times=N),
hr =rep( gpf$LOC$hr, times=N),
mi = rep(gpf$LOC$mi, times=N) )
EQ = GH$pickfile$LOC
EQ$t = EQ$sec
kuality = eqwrapup(Ldat, EQ, vel, distwt = 20, verbose = TRUE )
names(kuality)
转载请注明:出自 生物统计家园网(http://www.biostatistic.net)。
注：
注1：为了方便大家学习，本文档为生物统计家园网机器人LoveR翻译而成，仅供个人R语言学习参考使用，生物统计家园保留版权。
注2：由于是机器人自动翻译，难免有不准确之处，使用时仔细对照中、英文内容进行反复理解，可以帮助R语言的学习。
注3：如遇到不准确之处，请在本贴的后面进行回帖，我们会逐渐进行修订。
|
发表于 2012-9-28 20:26:18
