Attractive numbers: Difference between revisions

Content added Content deleted
(Added Quackery.)
Line 323:
=={{header|Arturo}}==
 
<lang rebol>attractive?: function =[x] -> [prime? size factors.prime &]x
 
print select 1..120 => attractive?</lang>
Retrieved from "https://rosettacode.org/wiki/Attractive_numbers"