Tau function: Difference between revisions

No change in size ,  11 months ago
m
(→‎{{header|Haskell}}: added a variant using Data.Numbers.Primes)
Line 1,572:
 
tau :: Integer -> Int
tau n = product . fmap (succ . length) <$>. group (primeFactors. n))primeFactors
 
 
Line 1,579:
main :: IO ()
main = putStrLn $
(table " " . chunksOf 10 . fmap show . take 100)
oeisA000005
 
9,659

edits