login
A384778
Consecutive states of the linear congruential pseudo-random number generator 55151000561141*s mod 2^48 when started at 1.
6
1, 55151000561141, 29815832362105, 55100342394061, 179741519900977, 7132195055845, 74704892394537, 220210368430141, 73887840684897, 135379684698325, 280350175386841, 124994015967405, 227696133324433, 118996703729093, 242320442691209, 24065948923421
OFFSET
1,2
COMMENTS
Periodic with period 2^46.
FORMULA
a(n) = 55151000561141 * a(n-1) mod 2^48.
MAPLE
a:= proc(n) option remember; `if`(n<2, n,
irem(55151000561141*a(n-1), 2^48))
end:
seq(a(n), n=1..16); # Alois P. Heinz, Jun 09 2025
MATHEMATICA
NestList[Mod[55151000561141*#, 2^48] &, 1, 30] (* Paolo Xausa, Jun 11 2025 *)
KEYWORD
nonn,easy
AUTHOR
Sean A. Irvine, Jun 09 2025
STATUS
approved