A112278 a(0) = 1, a(1) = 2; thereafter a(n) = prime(mod(a(n-1),100))+1.

1, 2, 4, 8, 20, 72, 360, 282, 422, 80, 410, 30, 114, 44, 194, 492, 480, 410, 30, 114, 44, 194, 492, 480, 410, 30, 114, 44, 194, 492, 480, 410, 30, 114, 44, 194, 492, 480, 410, 30, 114, 44, 194, 492, 480, 410, 30, 114, 44, 194, 492, 480, 410, 30, 114, 44, 194, 492, 480

Offset

0,2

Comments

Starting with the tenth term, cycles every seven terms. - Robert G. Wilson v, Dec 13 2005

References

Zak Seidov, Posting to Seq Fan mailing list, Nov 28 2005

Links

Table of n, a(n) for n=0..58.

Example

a(2) = prime(2) + 1 = 3+1 = 4, a(3) = prime(4) + 1 = 19+1 = 20, and so on.  But remember to reduce the primes mod 100 when they get large. - N. J. A. Sloane, Feb 24 2023

Mathematica

Join[{1}, NestList[Prime[Mod[#, 100]]+1&, 2, 100]] (* Harvey P. Dale, Feb 24 2023 *)

Crossrefs

Sequence in context: A006407 A100447 A241891 * A309868 A059731 A001315

Adjacent sequences: A112275 A112276 A112277 * A112279 A112280 A112281

Keyword

nonn

Author

N. J. A. Sloane, Nov 24 2005

Extensions

More terms from Robert G. Wilson v, Dec 13 2005

Revised by N. J. A. Sloane, Feb 24 2023

Status

approved