OFFSET
1,2
LINKS
FORMULA
a(1)=0, a(n)=(a(n-1) * 214013 + 2531011) mod 2^32. The sequence is periodic with period length 2^32.
MAPLE
a:= proc(n) option remember; `if`(n<2, 0,
irem(214013 *a(n-1) +2531011, 4294967296))
end:
seq(a(n), n=1..30); # Alois P. Heinz, Jun 10 2014
MATHEMATICA
NestList[Mod[#*214013 + 2531011, 2^32] &, 0, 50] (* Paolo Xausa, Aug 29 2024 *)
PROG
(PARI) A096557(n)=lift((Mod(214013, 2^34)^(n-1)-1)*13129821757)>>2 \\ M. F. Hasler, May 14 2015
CROSSREFS
KEYWORD
nonn
AUTHOR
Hugo Pfoertner, Jul 21 2004
STATUS
approved