A384260 Consecutive internal states of the linear congruential pseudo-random number generator 3373*s mod (2^24-3) when started at s=1.

1, 3373, 11377129, 5569986, 13861431, 13291345, 2993549, 14135764, 15869839, 9657477, 10099488, 7830634, 5395220, 11578168, 12586013, 6272959, 2625114, 12918271, 2905922, 3782514, 7737842, 11174851, 11152025, 1268779, 1402252, 15399143, 15835104, 9936813

Offset

1,2

Comments

Periodic with period 2^22-1.

This generator was recommended by Sharp and Bays for 24-bit floating-point.

Links

Sean A. Irvine, Table of n, a(n) for n = 1..10000

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) = 3373 * a(n-1) mod (2^24-3).

Maple

a:= proc(n) option remember; `if`(n<2, n,
      irem(3373*a(n-1), 2^24-3))
    end:
seq(a(n), n=1..28);  # Alois P. Heinz, May 23 2025

Mathematica

NestList[Mod[3373*#, 2^24 - 3] &, 1, 50] (* Paolo Xausa, May 26 2025 *)

Crossrefs

Cf. A096550-A096561 other pseudo-random number generators.

Sequence in context: A052357 A218908 A164521 * A251153 A305500 A250568

Adjacent sequences: A384257 A384258 A384259 * A384261 A384262 A384263

Keyword

nonn,easy

Author

Sean A. Irvine, May 23 2025

Status

approved