faultperp: Fault Perpendiculars

Description Usage Arguments Value Author(s) See Also Examples

Description

Draw perpendicular marks on fault trace

Usage

1
faultperp(x, y, N = 20, endtol = 0.1, h = 1, col = "black")

Arguments

x

x-coordinates

y

y-coordinates

N

number of points

endtol

indent on either ends

h

length of perpendicular marks

col

color of line

Value

Graphical Side effect

Author(s)

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

See Also

OverTurned

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
ff=list()
ff$x=c(-4.850,-4.700,-3.934,-2.528, 0.603, 2.647, 3.861, 2.626)
ff$y=c(-4.045,-2.087,-0.710, 0.172, 1.291, 2.087,-0.753,-4.131)

G =getsplineG(ff$x, ff$y, kdiv=20)
g = PointsAlong(G$x, G$y, N=5)


plot(c(-5,5), c(-5,5), asp=1, type='n' )
lines(G)

faultperp(G$x, G$y, N = 10, endtol = 0.1, h = .3, col = "black")

GEOmap documentation built on May 2, 2019, 8:56 a.m.