RosettaCodeData/Task/Prime-decomposition/Factor/prime-decomposition.factor

6 lines
120 B
Factor

USING: io kernel math math.parser math.primes.factors sequences ;
27720 factors
[ number>string ] map
" " join print ;