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 A138450 #10 Jun 08 2025 19:24:17 %S A138450 2,24,520,3920,59048,160888,804576,1568184,4934512,19827416,29583424, %T A138450 85524168,158336752,210712040,359307104,738811944,1406017672, %U A138450 1717345688,3015279256,4270009296,5044474032,8102914976,10898012216,16566042768 %N A138450 a(n) = ((n-th prime)^6-(n-th prime)^2)/30. %t A138450 a = {}; Do[p = Prime[n]; AppendTo[a, (p^6 - p^2)/30], {n, 1, 50}]; a %t A138450 (#^6-#^2)/30&/@Prime[Range[30]] (* _Harvey P. Dale_, Jan 23 2019 *) %o A138450 (PARI) forprime(p=2,1e3,print1((p^6-p^2)/30", ")) \\ _Charles R Greathouse IV_, Jul 15 2011 %K A138450 nonn,easy %O A138450 1,1 %A A138450 _Artur Jasinski_, Mar 19 2008, Mar 22 2008