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 A135554 #17 Sep 05 2025 10:24:12 %S A135554 16,256,625,2401,4096,83521,160000,279841,456976,1048576,1500625, %T A135554 2560000,2825761,3748096,4477456,4879681,5764801,6250000,7890481, %U A135554 9834496,11316496,14776336,16777216,20151121,21381376,24010000,28398241,33362176,40960000,54700816 %N A135554 Numbers k such that k is the fourth power of an integer and the sum of digits of k is prime. %C A135554 Intersection of A000583 and A028834. - _Michel Marcus_, Oct 19 2016 %H A135554 G. C. Greubel, <a href="/A135554/b135554.txt">Table of n, a(n) for n = 1..1090</a> %e A135554 a(1)=16 because 2^4=16 and 1+6=7, prime. %t A135554 Select[Range[90]^4,PrimeQ[Total[IntegerDigits[#]]]&] (* _Harvey P. Dale_, Dec 13 2010 *) %o A135554 (PARI) isok(n) = ispower(n,4) && isprime(sumdigits(n)); \\ _Michel Marcus_, Oct 19 2016 %Y A135554 Cf. A000583, A028834, A135555. %K A135554 easy,nonn,base,changed %O A135554 1,1 %A A135554 _Enoch Haga_, Nov 25 2007 %E A135554 Description corrected by _Harvey P. Dale_, Dec 13 2010