|
|
A059464
|
|
Numbers which are the sum of their proper divisors containing the digit 5.
|
|
8
|
|
|
1506, 1518, 3012, 3036, 3156, 3174, 4506, 6312, 7512, 9012, 9174, 10518, 10524, 10536, 10554, 13506, 15006, 15018, 15102, 15126, 15144, 15156, 15186, 15192, 15306, 15516, 15906, 16518, 17106, 17124, 17142, 17148, 17718, 19506, 19518
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
spd5Q[n_]:=Total[Select[Most[Rest[Divisors[n]]], DigitCount[#, 10, 5]>0&]] == n; Select[Range[4, 20000], spd5Q] (* Harvey P. Dale, Jul 31 2020 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|