Rosetta Code

Averages/Root mean square: Difference between revisions

Page Discussion

Averages/Root mean square (view source)

Revision as of 07:27, 1 February 2017

3 bytes removed ,  7 years ago
→‎{{header|Haskell}}: foldl -> foldr
m (→‎{{header|zkl}}: reformat)
(→‎{{header|Haskell}}: foldl -> foldr)
Line 719:
<lang haskell>rootMeanSquare :: [Double] -> Double
rootMeanSquare xs =
sqrt (foldlfoldr (\a x a -> a + (x * x)) 0 xs / fromIntegral (length xs))
 
main :: IO ()
Hout
9,659

edits

Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/140344"