

A036345


Divisible by its 'even' sum of prime factors (counted with multiplicity).


2



4, 16, 30, 60, 70, 72, 84, 220, 240, 256, 286, 288, 308, 378, 440, 450, 476, 528, 540, 560, 576, 594, 624, 646, 648, 728, 800, 884, 900, 960, 1040, 1056, 1080, 1160, 1170, 1248, 1276, 1404, 1456, 1496, 1530, 1748, 1776, 1798, 1824, 1976, 2322, 2408, 2464
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

0,1


LINKS

Harvey P. Dale, Table of n, a(n) for n = 0..1000


EXAMPLE

646 = 2*17*19 > sum = 2+17+19 = 38 (=even) so 38 divides 646 exactly.


MATHEMATICA

dspfQ[n_]:=Module[{spf=Total[Times@@@FactorInteger[n]]}, EvenQ[spf] && Divisible[n, spf]]; Select[Range[4, 2500, 2], dspfQ] (* Harvey P. Dale, Oct 06 2011 *)


CROSSREFS

Cf. A046346, A036346.
Sequence in context: A227434 A173019 A031003 * A046001 A239611 A031050
Adjacent sequences: A036342 A036343 A036344 * A036346 A036347 A036348


KEYWORD

nonn,base


AUTHOR

Patrick De Geest, Dec 15 1998.


STATUS

approved



