|
Search: id:A124271
|
|
|
| A124271 |
|
Sum[ (Prime[i]^n - 1) / (Prime[i] - 1), {i,1,n} ]. |
|
+0
5
|
|
| 1, 7, 51, 611, 19839, 603331, 32981935, 1469991559, 108336139407, 17389027481287, 1334783150250945, 222909199163881075, 31099653342061054699, 2994181661163361882651, 387134597481460117602345
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
COMMENT
|
a(n) is prime for n = {2,8,14,...}. Prime a(n) are listed in A124272[n] = {7,1469991559,2994181661163361882651,...}. Primes p that divide a(p) are listed in A124273[n] = {3,7,13,17,19,31,47,59,61,71,101,103,107,109,137,149,151,157,167,197,...}, that almost coincides with A123856[n]. Up to 1000 there are only 3 terms of A123856[n] that are different from the terms of a(n). They are listed in A124275[n] = {2,5,181}. Nonprime n that divide a(n) are listed in A124274[n] = {1,9,15,121,...}.
|
|
FORMULA
|
a(n) = Sum[ (Prime[i]^n - 1) / (Prime[i] - 1), {i,1,n} ].
|
|
MATHEMATICA
|
Table[Sum[(Prime[i]^n-1)/(Prime[i]-1), {i, 1, n}], {n, 1, 20}]
|
|
CROSSREFS
|
Cf. A124272, A124273, A124274, A124275, A123855, A123856.
Sequence in context: A104454 A019472 A081216 this_sequence A138849 A057675 A027542
Adjacent sequences: A124268 A124269 A124270 this_sequence A124272 A124273 A124274
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Alexander Adamchuk (alex(AT)kolmogorov.com), Oct 23 2006
|
|
|
Search completed in 0.002 seconds
|
