Square-free integers: Difference between revisions
Content added Content deleted
(→{{header|J}}: Add J) |
m (→{{header|J}}) |
||
Line 658:
=={{header|J}}==
'''Solution:'''
<lang j>isSqrFree=: (#@~. = #)@q: NB. are there no duplicates in the prime factors of a number?
filter=:
countSqrFree=: +/@:isSqrFree
thru=: <. + i.@(+ *)@-~ NB. helper verb</lang>
'''Required Examples:'''
|