|
Search: id:A093441
|
|
|
| A093441 |
|
Beginning with 3, primes such that a(n) - 1 == 0 (mod a(n - 1) - 1) where a(n) - 1 is a squarefree number. |
|
+0
2
|
|
| 3, 7, 31, 211, 2311, 43891, 1272811, 16546531, 976245271, 36121074991, 1119753324691, 52628406260431, 3526103219448811, 186883470630786931, 7662222295862264131, 743235562698639620611, 54256196077000692304531
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
Distinct from A073918.
|
|
MATHEMATICA
|
(* first do *) Needs["NumberTheory`NumberTheoryFunctions`"] (* then *) a[1] = 3; a[n_] := a[n] = Block[{k = m = a[n - 1] - 1}, k *= 2; While[ !PrimeQ[k + 1] || !SquareFreeQ[k], k += m]; k + 1]; Table[ a[n], {n, 17}] (from Robert G. Wilson v Apr 30 2004)
|
|
CROSSREFS
|
Cf. A073918, A093442.
Cf. A083772. [From R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Sep 05 2008]
Sequence in context: A002585 A103785 A083772 this_sequence A087864 A066676 A073917
Adjacent sequences: A093438 A093439 A093440 this_sequence A093442 A093443 A093444
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Apr 01 2004
|
|
EXTENSIONS
|
a(7) onwards from Robert G. Wilson v (rgwv(AT)rgwv.com), Apr 30 2004
|
|
|
Search completed in 0.002 seconds
|
