Ruth-Aaron numbers: Difference between revisions

=={{header|Sidef}}==

<lang ruby>say "First 30 Ruth-Aaron numbers (factors):"

say 30.by {|n| (sopfr(n) == sopfr(n+1)) && (n > 0) }.join(' ')

say "\nFirst 30 Ruth-Aaron numbers (divisors):"

say 30.by {|n| ( sopf(n) == sopf(n+1)) && (n > 0) }.join(' ')</lang>

{{out}}

<pre>

First 30 Ruth-Aaron numbers (factors):

5 8 15 77 125 714 948 1330 1520 1862 2491 3248 4185 4191 5405 5560 5959 6867 8280 8463 10647 12351 14587 16932 17080 18490 20450 24895 26642 26649

First 30 Ruth-Aaron numbers (divisors):

5 24 49 77 104 153 369 492 714 1682 2107 2299 2600 2783 5405 6556 6811 8855 9800 12726 13775 18655 21183 24024 24432 24880 25839 26642 35456 40081

</pre>