A138412 a(n) = p^5*(p-1) where p = prime(n).
32, 486, 12500, 100842, 1610510, 4455516, 22717712, 44569782, 141599546, 574312172, 858874530, 2496382452, 4634248040, 6174354606, 10549870322, 21746165636, 41465609342, 50675778060, 89108257062, 126296054570
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..167
- Index to sequences related to prime powers
Programs
-
Mathematica
a = {}; Do[p = Prime[n]; AppendTo[a, p^6 - p^5], {n, 1, 50}]; a -
PARI
forprime(p=2,1e3,print1(p^6-p^5", ")) \\ Charles R Greathouse IV, Jun 16 2011
Formula
a(n) = A000010(prime(n)^6). - R. J. Mathar, Oct 15 2017