Plot Fry Output

Description

Plot Fry Output limited by a specified distance.

Usage

1
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<jonathan.lees@unc.edu>

References

Fry, N., (1979) Random point distributions and strain measurement in rocks Tectonophysics, 60:89-105.

See Also

dofry, Showfry

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
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')  
   

Want to suggest features or report bugs for rdrr.io? Use the GitHub issue tracker.