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

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

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

                                        Matrix Seismic Record
                                         矩阵地震记录

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

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

Plot a matrix of time series as a var-squiggle display (filled in half traces)
绘制的时间序列矩阵作为一个变种波浪线显示(一半痕迹填写)


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


matsquiggle(XMAT, dt1, dist = NULL, thick = 1, FLIP = FALSE, filcol='blue', tracecol="black", add=FALSE, PLOT=TRUE)



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

参数:XMAT
matrix of traces
矩阵的痕迹


参数:dt1
sample interval, s
采样间隔,S


参数:dist
distance for each trace in the matrix
距离矩阵中的每一个追踪


参数:thick
thickness for each trace to be plotted
厚度要绘制的每一个追踪


参数:FLIP
logical, FALSE (default) plot horizontal, TRUE=plot vertical
逻辑,FALSE(默认值)图水平,真实的=图垂直的


参数:filcol
color for shading
颜色阴影


参数:tracecol
color for trace
颜色跟踪


参数:add
add traces to existing plot
添加到现有的图的痕迹


参数:PLOT
whether to create a new plotting region
是否要创建一个新的绘图区


Details

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

see varsquiggle for more details
见varsquiggle更多详细信息


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

side effects.
副作用。


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


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



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

varsquiggle, varsquig
varsquiggle,varsquig


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




data(GH)
m = match( GH$STNS,    GH$stafile$name)
LATS = GH$stafile$lat[m]
LONS = GH$stafile$lon[m]
dees = rdistaz( GH$pickfile$LOC$lat, GH$pickfile$LOC$lon, LATS, LONS)

sel = which(GH$COMPS=="V")
sel = sel[order(dees$dist[sel])]

###  plot normal way:[##图正常的方式:]
### swig(GH, sel=sel, WIN=c(5,10), SHOWONLY=TRUE)[##痛饮(SEL = GH,SEL,WIN = C(5,10),SHOWONLY = TRUE)]


###  plot with varsquiggle[##图varsquiggle]
### varsquiggle(GH, sel=sel, WIN=c(5,10))[##varsquiggle(GH,SEL SEL,WIN = C(5,10))]

ex = seq(from=0, by=GH$dt[sel[1]], length=length(GH$JSTR[[sel[1]]]))
wx = ex>=5 &amp; ex<=10
XMAT = matrix(ncol=length(sel), nrow=length(which(wx)))

for(i in 1:length(sel))
{
XMAT[,i] =  GH$JSTR[[sel[i]]][wx]

}


matsquiggle(XMAT, GH$dt[sel[1]] , dist = dees$dist[sel] , thick = 1,
FLIP = FALSE)

axis(1)
axis(2)
title(xlab="Time, s", ylab="Distance, km")



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


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

使用道具 举报

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

本版积分规则

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

GMT+8, 2024-11-27 10:32 , Processed in 0.020983 second(s), 15 queries .

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

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