RSEIS (version 3.7-4)

jlegend: plot a legend

Description

Add legend to side of figure

Value

See legend() for details on input

Details

Rewrite of the legend function for easier manipulation.

See Also

legend

Examples

# NOT RUN {

plot(c(0,1), c(0,1))
u  <-  par('usr')
LEG  <-  jlegend( u[1], u[4], c("Vp", "Vs"),
            lwd=2, col=c(4,3), plot=FALSE  )

 
# }