RosettaCodeData/Task/Averages-Mean-angle/Zkl/averages-mean-angle.zkl
2023-07-01 13:44:08 -04:00

7 lines
170 B
Text

fcn meanA(a1,a2,etc){
as:=vm.arglist.pump(List,"toFloat","toRad");
n:=as.len();
(as.apply("sin").sum(0.0)/n)
.atan2(as.apply("cos").sum(0.0)/n)
.toDeg()
}