# Different representations of the "same" angle
angle(180, "degrees")
angle(pi, "radians")
angle(0.5, "turns")
angle(200, "gradians")
pi_radians(1)
a1 <- angle(180, "degrees")
angular_unit(a1)
is_angle(a1)
as.numeric(a1, "radians")
cos(a1)
a2 <- as_angle(a1, "radians")
angular_unit(a2)
is_congruent(a1, a2)
Run the code above in your browser using DataLab