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 A133538 #23 Sep 08 2022 08:45:32 %S A133538 2315,80312,901668,20310714,82235688,473087190,1304210412,4298697186, %T A133538 20654701756,44762490420,122444491244,289686151014,466572884988, %U A133538 778441731570,1681334260300,3663362624656,5631394320840,9203454441344,15155831763714,20142518677488 %N A133538 Sum of seventh powers of two consecutive primes. %H A133538 Muniru A Asiru, <a href="/A133538/b133538.txt">Table of n, a(n) for n = 1..4000</a> %F A133538 a(n) = A092759(n) + A092759(n+1). - _Michel Marcus_, Nov 09 2013 %e A133538 a(1)=2315 because 2^7 + 3^7 = 2315. %p A133538 seq(add(ithprime(n+k)^7,k=0..1),n=1..20); # _Muniru A Asiru_, Aug 22 2018 %t A133538 e = 7; Table[Prime[n]^e + Prime[n + 1]^e, {n, 1, 100}] %t A133538 Total/@Partition[Prime[Range[20]]^7,2,1] (* _Harvey P. Dale_, Oct 16 2014 *) %o A133538 (PARI) a(n) = prime(n)^7 + prime(n+1)^7; \\ _Michel Marcus_, Aug 22 2018 %o A133538 (Magma) [NthPrime(n)^7 + NthPrime(n+1)^7: n in [1..25]]; // _Vincenzo Librandi_, Aug 23 2018 %Y A133538 Cf. A034963, A133524, A133525, A133526, A133527, A133528, A133529, A133530, A133531, A133532, A069484, A133534, A133535, A133536, A133537. %K A133538 nonn %O A133538 1,1 %A A133538 _Artur Jasinski_, Sep 14 2007