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 A127048 #8 Mar 25 2020 06:51:18
%S A127048 2,3,5,11,13,17,37,41,53,83,127,131,137,139,149,151,389,397,401,409,
%T A127048 419,421,431,433,439,443,733,739,743,751,757,761,769,773,787,797,809,
%U A127048 811,853,857,859,863,877,881,883,887,929,967,1091,1093,1097,1103,1109,1151
%N A127048 Primes p such that denominator of Sum_{k=1..p-1} 1/k^5 is a fifth power.
%H A127048 Amiram Eldar, <a href="/A127048/b127048.txt">Table of n, a(n) for n = 1..10000</a>
%t A127048 d[n_] := Module[{}, su = 0; a = {}; For[i = 1, i <= n, i++, su = su + 1/ i^5; If[PrimeQ[i + 1], If[IntegerQ[(Denominator[su])^(1/5)], AppendTo[a, i + 1]]]]; a]; d[2000]
%Y A127048 Cf. A061002, A034602, A127029, A127042, A127046, A127047.
%K A127048 nonn
%O A127048 1,1
%A A127048 _Artur Jasinski_, Jan 03 2007