R/pitch2.R

pitch2 <-
function(x,y,z,roll){
  pitch = atan((-x)/((y*sin(roll))+(z*cos(roll)))  )
  return(pitch)  
}
EdFarrell/animalTrack documentation built on May 6, 2019, 3:12 p.m.