login
A383129
Consecutive internal states of the linear congruential pseudo-random number generator (421*s + 54773) mod 259200 when started at 1.
3
1, 55194, 222647, 217960, 59133, 66566, 85459, 4212, 13625, 88498, 246831, 31424, 65077, 236190, 217163, 241996, 69489, 20042, 198055, 232728, 55661, 160054, 45507, 32420, 225193, 253026, 47519, 101872, 174885, 68558, 146491, 37884, 192737, 67450, 198423
OFFSET
1,2
COMMENTS
Periodic with period 259200.
FORMULA
a(n) = (421*a(n-1) + 54773) mod 259200.
MAPLE
a:= proc(n) option remember; `if`(n<2, n,
irem(421*a(n-1)+54773, 259200))
end:
seq(a(n), n=1..45); # after Alois P. Heinz
MATHEMATICA
NestList[Mod[421*# + 54773, 259200] &, 1, 50] (* Paolo Xausa, Jun 18 2025 *)
CROSSREFS
KEYWORD
nonn,look,easy
AUTHOR
Sean A. Irvine, Jun 17 2025
STATUS
approved