A385038 Consecutive internal states of the linear congruential pseudo-random number generator (1366*s + 1283) mod 6075 when started at 1.

1, 2649, 5192, 4030, 2313, 1841, 1039, 5082, 5645, 3178, 4881, 4454, 4372, 1710, 4343, 4621, 1644, 5312, 3925, 4683, 1286, 2284, 4752, 4415, 5773, 1851, 2549, 2242, 2055, 1763, 3841, 5364, 2057, 4495, 5703, 3431, 4204, 3072, 5885, 2968, 3546, 3344, 787, 1050

Offset: 1

Author

Sean A. Irvine, Jun 13 2025

Keywords

• nonn
• look
• easy

Comments

Periodic with period 6075.

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

References

• William H. Press, Saul A. Teukolsky, William T. Vetterling, and Brian P. Flannery, Numerical Recipes in C (2nd ed), Cambridge University Press, 1999 (see p. 285).

Links

• Sean A. Irvine, Table of n, a(n) for n = 1..6075
• W. E. Sharp and Carter Bays, A review of portable random number generators, Computers and Geosciences, 18, 1 (1982), 79-87.
• Index entries for sequences related to pseudo-random numbers.

Crossrefs

Cf. A384113, A384114, A384126, A384152, A384158, A384196, A384971, A385037.

Programs

Maple

a:= proc(n) option remember; `if`(n<2, n,
      irem(1366*a(n-1)+1283, 6075))
    end:
seq(a(n), n=1..45);  # after Alois P. Heinz

Mathematica

NestList[Mod[1366*# + 1283, 6075] &, 1, 50] (* Paolo Xausa, Jun 16 2025 *)

Formula

a(n) = (1366*a(n-1) + 1283) mod 6075.