|
|
A119897
|
|
Numbers n such that 2^n, 3^n, 5^n, 7^n, 11^n, 13^n, 17^n and 19^n have even digit sum.
|
|
4
|
|
|
552, 657, 811, 1412, 1655, 2390, 2504, 2721, 2803, 2902, 3002, 3060, 3135, 3393, 3660, 4414, 4500, 4547, 4750, 4787, 4824, 5036, 5539, 5906, 6782, 7728, 8650, 9263, 9873, 9953, 10367, 10643, 10684, 10723, 11369, 11647, 11867, 11954
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
Harvey P. Dale, Table of n, a(n) for n = 1..1600
|
|
MATHEMATICA
|
edsQ[n_]:=AllTrue[Prime[Range[8]]^n, EvenQ[Total[IntegerDigits[#]]]&]; Select[ Range[12000], edsQ] (* The program uses the AllTrue function from Mathematica version 10 *) (* Harvey P. Dale, May 10 2017 *)
|
|
CROSSREFS
|
Cf. A118734, A118867, A119894, A119895, A119896.
Sequence in context: A204870 A263947 A203629 * A014360 A158636 A251161
Adjacent sequences: A119894 A119895 A119896 * A119898 A119899 A119900
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
Zak Seidov, May 26 2006
|
|
EXTENSIONS
|
More terms from Harvey P. Dale, May 10 2017
|
|
STATUS
|
approved
|
|
|
|