cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Showing 1-3 of 3 results.

A385341 Consecutive states of the linear congruential pseudo-random number generator (1021*s + 25673) mod 121500 when started at s=1.

Original entry on oeis.org

1, 26694, 64247, 11860, 106233, 111566, 89059, 72912, 110825, 61498, 121131, 13424, 2077, 80790, 13763, 105196, 24789, 63242, 79255, 26028, 113261, 118654, 35907, 115220, 53293, 5826, 20519, 77572, 8685, 23558, 21391, 117384, 75737, 79150, 40323, 6956, 80749
Offset: 1

Views

Author

Sean A. Irvine, Jun 25 2025

Keywords

Comments

Periodic with period 121500.
Described in Numerical Recipes as a "quick and dirty" generator.

Links

Crossrefs

Cf. A383126, A385340.

Programs

  • Maple
    a:= proc(n) option remember; `if`(n<2, n,
      irem(1021*a(n-1)+25673, 121500))
    end:
seq(a(n), n=1..44);  # after Alois P. Heinz
  • Mathematica
    NestList[Mod[1021*# + 25673, 121500] &, 1, 50] (* after Paolo Xausa *)

Formula

a(n) = (1021 * a(n-1) + 25673) mod 121500.

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

Original entry on oeis.org

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

Views

Author

Sean A. Irvine, Jun 26 2025

Keywords

Comments

Periodic with period 117128.
Described in Numerical Recipes as a "quick and dirty" generator.

Links

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.

A385363 Consecutive states of the linear congruential pseudo-random number generator (3613*s + 45289) mod 214326 when started at s=1.

Original entry on oeis.org

1, 48902, 123591, 138514, 45161, 109896, 167785, 138566, 18711, 135442, 90977, 183432, 89113, 92906, 80151, 76426, 120539, 42264, 145009, 150062, 188841, 128164, 157661, 210300, 73519, 119522, 11385, 28702, 11831, 139818, 41341, 25100, 71691, 159064, 135515
Offset: 1

Views

Author

Sean A. Irvine, Jun 26 2025

Keywords

Comments

Periodic with period 214326.
Described in Numerical Recipes as a "quick and dirty" generator.

Links

Crossrefs

Cf. A383126, A385340.

Programs

  • Maple
    a:= proc(n) option remember; `if`(n<2, n,
      irem(3613*a(n-1)+45289, 214326))
    end:
seq(a(n), n=1..44);  # after Alois P. Heinz
  • Mathematica
    NestList[Mod[3613*# + 45289, 214326] &, 1, 50] (* after Paolo Xausa *)

Formula

a(n) = (3613 * a(n-1) + 45289) mod 214326.
Showing 1-3 of 3 results.

Started in 1964 by Neil J. A. Sloane | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement.