R: perpendicular marks along line

perpen {GEOmap} | R Documentation

## perpendicular marks along line

### Description

draw perpendicular marks along line

### Usage

    perpen(x, y, h, rot, col = "black", lwd = 1)

### Arguments

`x` | x-coordinates
`y` | y coordinates
`h` | height of tooth
`rot` | rotation of teeth
`col` | color of line
`lwd` | line width

### Details

Used by faultperp

### Value

graphical side effects

### Author(s)

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

### See Also

PointsAlong, faultperp

### Examples

    plot(c(-5,5), c(-5,5), asp=1, type='n' )
    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)

    lines(G)

    perpen(g$x, g$y, .3, g$rot, col = "black", lwd = 1)

[Package GEOmap version 2.4-0 Index]