Averages/Mean angle: Difference between revisions
Content added Content deleted
(Added Wren) |
No edit summary |
||
| Line 828: | Line 828: | ||
->ama 10 20 30 |
->ama 10 20 30 |
||
Mean angle is 20.0 |
Mean angle is 20.0 |
||
</pre> |
|||
=={{header|IDL}}== |
|||
<lang IDL>function mean_angle, phi |
|||
z = total(exp(complex(0,phi*!dtor))) |
|||
return, atan(imaginary(z),real_part(z))*!radeg |
|||
end</lang> |
|||
{{out}} |
|||
<pre>IDL> print, mean_angle([350, 10]) |
|||
-7.80250e-06 |
|||
IDL> print, mean_angle([90, 180, 270, 360]) |
|||
90.0000 |
|||
IDL> print, mean_angle([10, 20, 30]) |
|||
20.0000 |
|||
</pre> |
</pre> |
||