A119895 Numbers k such that 2^k, 3^k, 5^k, 7^k, 11^k and 13^k have even digit sum.

90, 168, 185, 229, 242, 447, 470, 503, 552, 657, 684, 758, 804, 811, 1000, 1113, 1126, 1182, 1402, 1410, 1412, 1420, 1546, 1566, 1638, 1655, 1663, 1790, 2066, 2180, 2232, 2275, 2362, 2390, 2416, 2504, 2585, 2670, 2721, 2725, 2803, 2814, 2902, 2911, 2928

Offset

1,1

Links

Robert Israel, Table of n, a(n) for n = 1..895

Mathematica

Select[Range[3000], AllTrue[Total[IntegerDigits[#]]&/@(Prime[ Range[ 6]]^#), EvenQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* Harvey P. Dale, May 10 2018 *)

Crossrefs

Cf. A118734, A118867, A119894, A119896, A119897.

Sequence in context: A241004 A294310 A048705 * A270266 A255792 A255785

Adjacent sequences: A119892 A119893 A119894 * A119896 A119897 A119898

Keyword

base,nonn

Author

Zak Seidov, May 26 2006

Status

approved