RosettaCodeData/Task/Tau-number/F-Sharp/tau-number.fs
2023-07-01 13:44:08 -04:00

2 lines
153 B
FSharp

// Tau number. Nigel Galloway: March 9th., 2021
Seq.initInfinite((+)1)|>Seq.filter(fun n->n%(tau n)=0)|>Seq.take 100|>Seq.iter(printf "%d "); printfn ""