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 A129701 #20 Sep 08 2022 08:45:30 %S A129701 19,98,218,988,866,2716,1946,5308,12222,5402,20862,18268,10586,24316, %T A129701 45054,56502,21602,73782,57148,31106,104022,78748,133182,207704, %U A129701 117628,62426,132316,69986,147868,605486,199708,323262,114266,622330,135002 %N A129701 Difference between successive primes cubed: a(n) = prime(n+1)^3 - prime(n)^3. %H A129701 Harvey P. Dale, <a href="/A129701/b129701.txt">Table of n, a(n) for n = 1..1000</a> %F A129701 a(n) = A030078(n+1) - A030078(n). - _Michel Marcus_, Sep 04 2013 %e A129701 a(3) because the fourth prime is 7, cubed 343, the third prime is 5, cubed 125, 343-125=218. %p A129701 last:=8;for i from 3 to 30 do > while isprime(i)=false do > i:=i + 1; > end do; > r:= i^3 - last; > last:=i^3; > end do; %t A129701 Table[Prime[n+1]^3 - Prime[n]^3, {n, 1, 40}] (* _Stefan Steinerberger_, Jun 05 2007 *) %t A129701 Last[#]-First[#]&/@(Partition[Prime[Range[40]],2,1]^3) (* _Harvey P. Dale_, Oct 13 2012 *) %o A129701 (PARI) {a(n) = prime(n+1)^3 - prime(n)^3}; \\ _G. C. Greubel_, May 19 2019 %o A129701 (Magma) [NthPrime(n+1)^3 - NthPrime(n)^3: n in [1..40]]; // _G. C. Greubel_, May 19 2019 %o A129701 (Sage) [nth_prime(n+1)^3 - nth_prime(n)^3 for n in (1..40)] # _G. C. Greubel_, May 19 2019 %Y A129701 Cf. A030078 (cubes of primes). %K A129701 nonn %O A129701 1,1 %A A129701 _Ben Paul Thurston_, Jun 01 2007 %E A129701 More terms from _Stefan Steinerberger_, Jun 05 2007