OFFSET
1,2
COMMENTS
Periodic with period 12960.
Described in Numerical Recipes as a "quick and dirty" generator.
REFERENCES
William H. Press, Saul A. Teukolsky, William T. Vetterling, and Brian P. Flannery, Numerical Recipes in C (2nd ed), Cambridge University Press, 1999 (see p. 285).
LINKS
FORMULA
a(n) = (1741 * a(n-1) + 2731) mod 12960.
MAPLE
a:= proc(n) option remember; `if`(n<2, n,
irem(1741*a(n-1)+2731, 12960))
end:
seq(a(n), n=1..44); # after Alois P. Heinz
MATHEMATICA
NestList[Mod[1741*# + 2731, 12960] &, 1, 50] (* after Paolo Xausa *)
CROSSREFS
KEYWORD
AUTHOR
Sean A. Irvine, Jun 25 2025
STATUS
approved
