A384546 Consecutive states of the linear congruential pseudo-random number generator 1732073221*s mod 2^32 when started at s=1.
1, 1732073221, 2616616473, 729251197, 2797858417, 533270325, 3854126857, 3936328237, 2856078817, 3879861349, 3089187065, 2416960477, 1835568721, 733302421, 616573929, 1009912461, 1831411649, 1402287557, 1780547545, 2404171325, 3232723505, 1340662261, 515353801
Offset: 1
Links
- Sean A. Irvine, Table of n, a(n) for n = 1..10000
- George S. Fishman, Multiplicative Congruential Random Number Generators with Modulus 2^beta: An Exhaustive Analysis for beta = 32 and a Partial Analysis for beta = 48, Math. Comp., 54, 189 (1990), 331-344.
- Index entries for sequences related to pseudo-random numbers.
Programs
-
Maple
a:= proc(n) option remember; `if`(n<2, n, irem(1732073221*a(n-1), 2^32)) end: seq(a(n), n=1..23); # Alois P. Heinz, Jun 02 2025
-
Mathematica
NestList[Mod[1732073221*#, 2^32] &, 1, 50] (* Paolo Xausa, Jun 04 2025 *)
Formula
a(n) = 1732073221 * a(n-1) mod 2^32.
Comments