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,2

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.

Formula

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

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 *)

Crossrefs

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

Sequence in context: A235446 A235750 A235813 * A394260 A225023 A251162

Adjacent sequences: A385035 A385036 A385037 * A385039 A385040 A385041

Keyword

nonn,look,easy

Author

Sean A. Irvine, Jun 13 2025

Status

approved