| rotate {StratigrapheR} | R Documentation | 
Spherical rotation around fixed axes
Description
Spherical rotation around given rotation axes
Usage
rotate(dec, inc, rdec, rinc, rmag)
Arguments
dec | 
 declination of the data; it is the angle from the north taken on an horizontal plane. It is measured clockwise from North and ranges from 0 to 360° (Tauxe 2010).  | 
inc | 
 inclination of the data; it is the angle from the horizontal, is positive downward, and ranges from +90° for straight down to -90° for straight up (Tauxe, 2010).  | 
rdec | 
 declination of the rotation axes (of length 1 or n).  | 
rinc | 
 inclination of the rotation axes (of length 1 or n).  | 
rmag | 
 magnitude of rotation (following the notation of the Stereonet software): a positive rotation is clockwise looking in the direction of the given declination and inclination; of length 1 or n).  | 
References
Tauxe, L., 2010. Essentials of Paleomagnetism. University of California Press.
Allmendinger, R. W., Cardozo, N. C., and Fisher, D., 2013, Structural Geology Algorithms: Vectors & Tensors: Cambridge, England, Cambridge University Press, 289 pp.
Cardozo, N., and Allmendinger, R. W., 2013, Spherical projections with OSXStereonet: Computers & Geosciences, v. 51, no. 0, p. 193 - 205, doi: 10.1016/j.cageo.2012.07.021
See Also
rmatrix, restore and
reposition
Examples
earnet()
inc <- seq(0,85,5)
dec <- rep(0,length(inc))
earpoints(dec,inc)
rdec <- rep(0, length(inc))
rinc <- rep(90, length(inc))
mag <- 90
rmag  <- seq(mag, 0, by = -mag/(length(inc)-1))
rot <- rotate(dec,inc,rdec,rinc,rmag)
earpoints(dec = round(rot$dec,digits = 2), inc = round(rot$inc,digits = 2),
          l = list(bg = "green"),
          u = list(bg = "blue"),
          h = list(bg = "yellow"))
earpoints(dec = 0, inc = 90, l = list(bg = "red"))