A385357 Consecutive states of the linear congruential pseudo-random number generator (1277*s + 24749) mod 117128 when started at s=1.

1, 26026, 112727, 26816, 67405, 11854, 52795, 95364, 108585, 8242, 8263, 35080, 79013, 77142, 30435, 3748, 8697, 3658, 10895, 116560, 2181, 115942, 32891, 94732, 4289, 113914, 19951, 85400, 34381, 6286, 87267, 75980, 69225, 110562, 73183, 11296, 42997, 116014

Offset: 1

Author

Sean A. Irvine, Jun 26 2025

Keywords

• nonn
• easy

Comments

Periodic with period 117128.

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 117128.

Crossrefs

Cf. A385340, A385341.

Programs

Maple

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

Mathematica

NestList[Mod[1277*# + 24749, 117128] &, 1, 50] (* after Paolo Xausa *)

Formula

a(n) = (1277 * a(n-1) + 24749) mod 117128.