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 A138451 #22 Jun 08 2025 19:24:04 %S A138451 1,12,260,1960,29524,80444,402288,784092,2467256,9913708,14791712, %T A138451 42762084,79168376,105356020,179653552,369405972,703008836,858672844, %U A138451 1507639628,2135004648,2522237016,4051457488,5449006108,8283021384 %N A138451 a(n) = (prime(n)^6-prime(n)^2)/60. %H A138451 Harvey P. Dale, <a href="/A138451/b138451.txt">Table of n, a(n) for n = 1..1000</a> %F A138451 a(n) = A213547(prime(n)-1). - _Robert Israel_, Sep 11 2014 %p A138451 seq((ithprime(n)^6-ithprime(n)^2)/60, n=1..100); # _Robert Israel_, Sep 11 2014 %t A138451 a = {}; Do[p = Prime[n]; AppendTo[a, (p^6 - p^2)/60], {n, 1, 50}]; a %t A138451 (#^6-#^2)/60&/@Prime[Range[30]] (* _Harvey P. Dale_, Sep 11 2014 *) %o A138451 (PARI) forprime(p=2,1e3,print1((p^6-p^2)/60", ")) \\ _Charles R Greathouse IV_, Jul 15 2011 %o A138451 (Magma) [( NthPrime(n)^6-NthPrime(n)^2 )/60: n in [1..30]]; // _Vincenzo Librandi_, Sep 11 2014 %Y A138451 Cf. A000040, A213547. %K A138451 nonn,easy,less %O A138451 1,2 %A A138451 _Artur Jasinski_, Mar 19 2008