This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A119897 #12 Nov 05 2023 09:01:43 %S A119897 552,657,811,1412,1655,2390,2504,2721,2803,2902,3002,3060,3135,3393, %T A119897 3660,4414,4500,4547,4750,4787,4824,5036,5539,5906,6782,7728,8650, %U A119897 9263,9873,9953,10367,10643,10684,10723,11369,11647,11867,11954 %N A119897 Numbers k such that 2^k, 3^k, 5^k, 7^k, 11^k, 13^k, 17^k and 19^k have even digit sum. %H A119897 Harvey P. Dale, <a href="/A119897/b119897.txt">Table of n, a(n) for n = 1..1600</a> %t A119897 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 *) %Y A119897 Cf. A054683, A118734, A118867, A119894, A119895, A119896. %K A119897 base,nonn %O A119897 1,1 %A A119897 _Zak Seidov_, May 26 2006 %E A119897 More terms from _Harvey P. Dale_, May 10 2017