login
A384293
Consecutive internal states of the pseudo-random number generator (214013*(s mod 2^16)+13523655) mod 2^24 when started at s=1.
2
1, 13737668, 4492923, 1465174, 1188037, 13716600, 8738143, 9934506, 13614793, 13927020, 11895683, 4496446, 458253, 7197856, 2514151, 3121170, 8864401, 3086100, 2844043, 6755878, 2240597, 10706376, 942447, 16495226, 10660697, 5962940, 2184339, 16607502
OFFSET
1,2
COMMENTS
Periodic with period 2^16 (note 1 is not part of the repeating cycle).
This generator was used in IBM BASIC and was an erroneous attempt to implement (214013*s+13523655) mod 2^24 (see A384292).
REFERENCES
G. Sawitzki, Another random number generator which should be avoided, Statistical Software Newsletter, 11 (1985), 81-82.
LINKS
B. D. Ripley, Thoughts on pseudorandom number generators, J of Computational and Applied Mathematics, 31, 1 (1990), 153-163.
W. E. Sharp and Carter Bays, A review of portable random number generators, Computers and Geosciences, 18, 1 (1982), 79-87.
FORMULA
a(n) = (214013 * (s mod 2^16) + 13523655) mod 2^24.
MATHEMATICA
NestList[Mod[214013*Mod[#, 2^16] + 13523655, 2^24] &, 1, 50] (* Paolo Xausa, May 27 2025 *)
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Sean A. Irvine, May 24 2025
STATUS
approved