angle2slope(10)
angle2slope(angle = 45)
angle2slope(angle = pi / 4, angleUnit = "rad")
angle2slope(1.047198, "rad")
angle2slope(seq(0.2, 1.5, .4), angleUnit = "rad") #'
slope2angle(100)
slope2angle(100, "rad")
round(pi / 4, 2)
slope2angle(17.6327)
slope2angle(angle2slope(30))
principal(303)
principal(23 * pi / 8, "rad")
principal(7 * pi / 4, angleUnit = "rad")
deg(principal(7 * pi / 4, angleUnit = "rad"))
principal(7 * 45)
Run the code above in your browser using DataLab