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 A138452 #18 Dec 29 2023 10:38:27
%S A138452 28,351,7750,58653,885115,2412306,12066328,23519511,74011861,
%T A138452 297399466,443736945,1282837878,2375017660,3160641771,5389555753,
%U A138452 11082106126,21090164131,25760073690,45229040703,64049963005,75666918636
%N A138452 a(n) = ((n-th prime)^6-(n-th prime)^3)/2.
%H A138452 Vincenzo Librandi, <a href="/A138452/b138452.txt">Table of n, a(n) for n = 1..1000</a>
%F A138452 a(n) = binomial(prime(n)^3, 2) = A000217(A030078(n)). - _Jon Maiga_, Nov 14 2018
%F A138452 a(n) = (A030078(n) * A006093(n) * A060800(n))/2. - _Vincenzo Librandi_, Nov 14 2018
%t A138452 a = {}; Do[p = Prime[n]; AppendTo[a, (p^6 - p^3)/2], {n, 1, 24}]; a
%o A138452 (PARI) forprime(p=2,1e3,print1((p^6-p^3)/2", ")) \\ _Charles R Greathouse IV_, Jul 15 2011
%o A138452 (Magma) [(p^6 - p^3) / 2: p in PrimesUpTo(100)]; // _Vincenzo Librandi_, Nov 14 2018
%Y A138452 Cf. A000217, A006093, A030078, A060800.
%K A138452 nonn,easy
%O A138452 1,1
%A A138452 _Artur Jasinski_, Mar 22 2008