R/pitch2.R

pitch2 <-
function(x,y,z,roll){
  pitch = atan((-x)/((y*sin(roll))+(z*cos(roll)))  )
  return(pitch)  
}

Try the animalTrack package in your browser

Any scripts or data that you put into this service are public.

animalTrack documentation built on May 2, 2019, 5:07 a.m.