login
A384608
Consecutive states of the linear congruential pseudo-random number generator (129*s+27098671125) mod 2^35 when started at s=1.
2
1, 27098671254, 18133949355, 29915928896, 3603063125, 10857477098, 18963943679, 33905981588, 2923784873, 26309797694, 19448475219, 27691073512, 25834363901, 26836992658, 18737148839, 4649447228, 8402072913, 11454449126, 27253858555, 3793372816, 1047688869
OFFSET
1,2
COMMENTS
Periodic with period 2^35.
The first set of numbers on p. 156 of Hirsh is reproduced by s/2^35 starting with s=4818528277.
REFERENCES
Seymour C. Hirsh, BASIC Programming Self-Taught, Reston Pub Co, Reston, VA, 1980 (see p. 156).
Donald E. Knuth, The Art of Computer Programming, Vol 2: Seminumerical Algorithms (3rd ed.), Addison-Wesley, 1998 (see p. 106).
FORMULA
a(n) = (129*a(n-1) + 27098671125) mod 2^35.
MAPLE
a:= proc(n) option remember; `if`(n<2, n,
irem(129*a(n-1)+27098671125, 2^35))
end:
seq(a(n), n=1..21); # Alois P. Heinz, Jun 04 2025
MATHEMATICA
NestList[Mod[129*# + 27098671125, 2^35] &, 1, 30] (* Paolo Xausa, Jun 12 2025 *)
CROSSREFS
Cf. A096550-A096561 for other pseudo-random number generators.
Sequence in context: A017662 A120322 A324977 * A015414 A252839 A307760
KEYWORD
nonn,easy
AUTHOR
Sean A. Irvine, Jun 04 2025
STATUS
approved