A384236 Consecutive states of the linear congruential pseudo-random number generator (9806*s+1) mod (2^17-1) when started at s=1.
1, 9807, 92400, 111649, 125103, 66530, 52814, 32564, 33629, 122410, 4243, 57352, 99123, 108674, 50015, 110480, 65066, 114640, 94945, 33358, 86404, 34681, 83713, 123077, 122366, 97063, 93248, 38593, 40982, 5807, 58629, 38569, 67780, 120711, 120937, 108886
Offset: 1
References
- William J. Collins, Intermediate Pascal Programming, McGraw-Hill, 1986 (see p. 157).
Links
- Paolo Xausa, Table of n, a(n) for n = 1..10000
- W. E. Sharp and Carter Bays, A review of portable random number generators, Computers and Geosciences, 18, 1 (1982), 79-87.
- Index entries for sequences related to pseudo-random numbers.
Programs
-
Mathematica
NestList[Mod[9806*#, 2^17 - 1] + 1 &, 1, 50] (* Paolo Xausa, May 23 2025 *)
Formula
a(n) = (9806 * a(n-1) mod (2^17-1)) + 1.
Comments