A385358 Consecutive states of the linear congruential pseudo-random number generator (741*s + 66037) mod 312500 when started at s=1.

1, 66778, 173535, 217972, 20789, 158186, 94363, 301520, 54857, 90074, 248371, 46448, 109005, 213742, 11359, 45556, 73033, 120990, 32127, 122144, 262241, 11618, 237475, 97512, 134929, 48426, 12203, 45960, 59897, 74714, 116611, 224788, 71445, 194282, 278999

Offset: 1

Author

Sean A. Irvine, Jun 26 2025

Keywords

• nonn
• easy

Comments

Periodic with period 312500.

Described in Numerical Recipes as a "quick and dirty" generator.

Links

• Sean A. Irvine, Table of n, a(n) for n = 1..10000
• Index entries for sequences related to pseudo-random numbers.
• Index entries for linear recurrences with constant coefficients, order 312500.

Crossrefs

Cf. A383127, A385357.

Programs

Maple

a:= proc(n) option remember; `if`(n<2, n,
      irem(741*a(n-1)+66037, 312500))
    end:
seq(a(n), n=1..44);  # after Alois P. Heinz

Mathematica

NestList[Mod[741*# + 66037, 312500] &, 1, 50] (* after Paolo Xausa *)

Formula

a(n) = (741 * a(n-1) + 66037) mod 312500.