Factors of an integer: Difference between revisions

Content added Content deleted
(→‎Raku: fix to get expected results e.g. 4 -> (1, 2, 4) instead of ((1, 4), (2, 2)))
(→‎Raku: naive approach is OK as it's much faster for big args than this one)
Line 5,189: Line 5,189:
</lang>
</lang>


=={{header|Raku}}==
==Raku==
(formerly Perl 6)
(formerly Perl 6)
{{works with|Rakudo|2015.12}}
{{works with|Rakudo|2015.12}}
<lang perl6>sub factors (Int $n) { squish sort flat ($_, $n div $_ if $n %% $_ for 1 .. sqrt $n) }</lang>
<lang perl6>sub factors (Int $n) { (1..$n).grep($n %% *) }</lang>


=={{header|REALbasic}}==
=={{header|REALbasic}}==