Averages/Mean angle: Difference between revisions

Content added Content deleted

Inline

@@ Line 1,052: / Line 1,052: @@
 {{trans|Tcl}}
 {{works with|Lua|5.1}}
-<lang Lua>
+<lang Lua>function meanAngle (angleList)
+  local sumSin, sumCos = 0, 0
-function meanAngle (angleList)
+  for i, angle in pairs(angleList) do
-	local sumSin, sumCos = 0, 0
+    sumSin = sumSin + math.sin(math.rad(angle))
-	for i, angle in pairs(angleList) do
-		sumSin = sumSin + math.sin(math.rad(angle))
+    sumCos = sumCos + math.cos(math.rad(angle))
+  end
-		sumCos = sumCos + math.cos(math.rad(angle))
+  local result = math.deg(math.atan2(sumSin, sumCos))
-	end
+  return string.format("%.2f", result)
-	local result = math.deg(math.atan2(sumSin, sumCos))
-	return string.format("%.2f", result)
 end
 print(meanAngle({350, 10}))
 print(meanAngle({90, 180, 270, 360}))
-print(meanAngle({10, 20, 30}))
+print(meanAngle({10, 20, 30}))</lang>
-</lang>
 {{out}}
 <pre>