Erdős-Nicolas numbers: Difference between revisions

Erdős-Nicolas numbers (view source)

138 bytes removed , 1 year ago

Undo revision 364971 -- task definition is explicitly limited to positive integers

6,962

edits

Revision as of 17:45, 11 August 2022 (view source) Rdm (talk \| contribs) m (→‎{{header\|J}}) ← Older edit		Revision as of 17:46, 11 August 2022 (view source) Rdm (talk \| contribs) (Undo revision 364971 -- task definition is explicitly limited to positive integers) Newer edit →
Line 25: =={{header\|J}}== ~~Technically, 0 might be considered an Erdős-Nicolas number (k=0, and many numbers evenly divide zero), but here we deliberately ignore that possibility~~Implementation:<lang J>divisors=: {{ /:~ ,*/@> { (^ i.@>:)&.>/__ q: y}} ::_: erdosnicolas=: {{ y e. +/\ _2}. divisors y }}"0</lang>Task example:<lang J> I.erdosnicolas i.1e7 24 2016 8190 42336 45864 392448 714240 1571328