|
|
A110954
|
|
a(1) = 1; a(n) = nextprime(2.5*a(n-1)) for n > 1.
|
|
0
|
|
|
1, 3, 11, 29, 73, 191, 479, 1201, 3011, 7529, 18839, 47111, 117779, 294461, 736159, 1840429, 4601099, 11502779, 28756957, 71892397, 179730997, 449327503, 1123318769, 2808296923, 7020742321, 17551855831, 43879639613, 109699099033
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
EXAMPLE
|
a(6) = nextprime(2.5*a(5)) = nextprime(2.5*73) = nextprime(182.5) = 191.
|
|
MATHEMATICA
|
<<NumberTheory`; p = 1; Print[p]; Do[p = NextPrime[p*2.5]; Print[p], {n, 2, 30}]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|