OFFSET
1,2
COMMENTS
Periodic with period 2^16.
LINKS
Sean A. Irvine, Table of n, a(n) for n = 1..10000
Lee Stewart, RND and RAND: Pseudorandom Number Generation by TI Basic, 2018.
FORMULA
a(n) = (28645 * a(n-1) + 31417) mod 2^16.
MAPLE
a:= proc(n) option remember; `if`(n<2, n,
irem(28645*a(n-1)+31417, 2^16))
end:
seq(a(n), n=1..38); # Alois P. Heinz, May 22 2025
MATHEMATICA
NestList[Mod[28645*# + 31417, 2^16] &, 1, 50] (* Paolo Xausa, May 23 2025 *)
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Sean A. Irvine, May 22 2025
STATUS
approved