Skip to contents

Function used for plotting subduction lines

Usage

sawteeth(
  x,
  left,
  cex = 1,
  shape = 1,
  splineshape = -0.5,
  col = "black",
  lwd = 1,
  ...
)

Arguments

x

(numeric) Two dimensional matrix of coordinates (x and y) columns.

left

(logical) Switch indicating whether to put the teeth on the left- or right-hand side.

cex

(numeric) Standard scaling argument, controls the size and number of sawteeth. Defaults are based on plot parameters (cxy), different device dimensions will lead to differently sized triangles.

shape

(numeric) Proportion of tooth height to its base.

splineshape

(numeric) Shape parameter of xspline (called twice!).

col

(numeric) The color of the teeth and the lines.

lwd

(numeric) The width of the line.

...

Additional arguments passed to polygon.

Value

The function has no return value.

Examples

# define points
x <- c(0.42, 1.90, 2.06, 1.28, 1.01, 1.05, 1.34, 2.14,
  4.25, 6.69, 7.96, 8.88, 9.35, 9.41, 8.84)

y <- c(1.06, 0.86, 1.91, 2.90, 4.25, 5.52, 6.81, 8.03,
  9.03, 9.25, 9.30, 8.88, 8.36, 7.00, 6.50)

# visualize the line with a sawteeth
plot(x, y, xlim=c(0,10), ylim=c(0, 10))

sawteeth(cbind(x,y), left=TRUE, col="#99000077")
sawteeth(cbind(x,y), left=TRUE, col="black", shape=0.5)


# use combination of cex and shape to control the size triangles
plot(x, y, xlim=c(0,10), ylim=c(0, 10))
sawteeth(cbind(x,y), left=TRUE, col="#99000077", cex=0.5, shape=3)