oce (version 1.1-1)

rotateAboutZ: Rotate velocity components within an oce object

Description

Alter the horizontal components of velocities in adp, adv or cm objects, by applying a rotation about the vertical axis.

Usage

rotateAboutZ(x, angle)

Arguments

x

An oce object of class adp, adv or cm.

angle

The rotation angle about the z axis, in degrees counterclockwise.

See Also

Other things related to adp data: [[,adp-method, [[<-,adp-method, ad2cpHeaderValue, adp-class, adpEnsembleAverage, adp, as.adp, beamName, beamToXyzAdpAD2CP, beamToXyzAdp, beamToXyzAdv, beamToXyz, beamUnspreadAdp, binmapAdp, enuToOtherAdp, enuToOther, handleFlags,adp-method, is.ad2cp, plot,adp-method, read.adp.ad2cp, read.adp.nortek, read.adp.rdi, read.adp.sontek.serial, read.adp.sontek, read.adp, read.aquadoppHR, read.aquadoppProfiler, read.aquadopp, setFlags,adp-method, subset,adp-method, summary,adp-method, toEnuAdp, toEnu, velocityStatistics, xyzToEnuAdpAD2CP, xyzToEnuAdp, xyzToEnu

Other things related to adv data: [[,adv-method, [[<-,adv-method, adv-class, adv, beamName, beamToXyz, enuToOtherAdv, enuToOther, plot,adv-method, read.adv.nortek, read.adv.sontek.adr, read.adv.sontek.serial, read.adv.sontek.text, read.adv, subset,adv-method, summary,adv-method, toEnuAdv, toEnu, velocityStatistics, xyzToEnuAdv, xyzToEnu

Other things related to cm data: [[,cm-method, [[<-,cm-method, as.cm, cm-class, cm, plot,cm-method, read.cm, subset,cm-method, summary,cm-method

Examples

# NOT RUN {
library(oce)
par(mfcol=c(2, 3))
# adp (acoustic Doppler profiler)
data(adp)
plot(adp, which="uv")
mtext("adp", side=3, line=0, adj=1, cex=0.7)
adpRotated <- rotateAboutZ(adp, 30)
plot(adpRotated, which="uv")
mtext("adp rotated 30 deg", side=3, line=0, adj=1, cex=0.7)
# adv (acoustic Doppler velocimeter)
data(adv)
plot(adv, which="uv")
mtext("adv", side=3, line=0, adj=1, cex=0.7)
advRotated <- rotateAboutZ(adv, 125)
plot(advRotated, which="uv")
mtext("adv rotated 125 deg", side=3, line=0, adj=1, cex=0.7)
# cm (current meter)
data(cm)
plot(cm, which="uv")
mtext("cm", side=3, line=0, adj=1, cex=0.7)
cmRotated <- rotateAboutZ(cm, 30)
plot(cmRotated, which="uv")
mtext("cm rotated 30 deg", side=3, line=0, adj=1, cex=0.7)

# }