plotfry: Plot Fry Output

In geophys: Geophysics, Continuum Mechanics, Gravity Modeling

Description

Plot Fry Output limited by a specified distance.

Usage

plotfry(fry, dis, col = grey(0.7), ann = FALSE, axes = FALSE)

Arguments

fry	list output of dofry
dis	distance to limit plotting to the center
col	color for points
ann	logical, annotation of axes, see par
axes	logical, whether to plot the axes, see par

Details

Used for plotting the points attained through the fry method

Value

x	x-coordinates
y	y-coordinates
mx	x center of plot
my	y center of plot
dis	distance for limiting plot

Author(s)

Jonathan M. Lees<[email protected]>

References

Fry, N., (1979) <http://dx.doi.org/10.1016/0040-1951(79)90135-5> Random point distributions and strain measurement in rocks Tectonophysics, 60:89-105.

See Also

dofry, Showfry

Examples

RDAT = randFRY(400, LIM=c(0,0, 200, 200) , rlen=5   )
length(RDAT$x)
plot(RDAT$x, RDAT$y, asp=1, pch=".", cex=2)
flag = sqrt( (RDAT$x-mean(RDAT$x))^2  + (RDAT$y-mean(RDAT$y))^2)<75

DAT = list(x=RDAT$x[flag], y=RDAT$y[flag])
 x = DAT$x
    y = DAT$y
 plot(x,y, asp=1, pch=21, col='red', bg='gold', ann=FALSE, axes=FALSE)

FF = dofry(DAT$x, DAT$y )
AF = plotfry(FF, dis=30)

Z = xtractlip(AF)

lines(cluster::predict.ellipsoid(Z$hull), col='red')  
   

geophys documentation built on Jan. 22, 2018, 1:01 a.m.