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

Author

Sean A. Irvine, Jun 02 2025

Keywords

• nonn
• easy

Comments

Periodic with period 2^30.

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.

Crossrefs

Cf. A384489, A384534, A384547, A384548, A384549, A384550, A384551, A384552.

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.