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.
%I A384779 #15 Jun 11 2025 10:11:44 %S A384779 1,68909602460261,267986871311321,40223525715613,170906480868849, %T A384779 105934630117909,220872133340233,58531276790477,54428804463841, %U A384779 144397689558725,44956117505465,810057454589,86145210100945,204213264588917,259238501435433,238216607930925 %N A384779 Consecutive states of the linear congruential pseudo-random number generator 68909602460261*s mod 2^48 when started at 1. %C A384779 Periodic with period 2^46. %H A384779 Sean A. Irvine, <a href="/A384779/b384779.txt">Table of n, a(n) for n = 1..10000</a> %H A384779 George S. Fishman, <a href="https://doi.org/10.2307/2008698">Multiplicative Congruential Random Number Generators with Modulus 2^beta: An Exhaustive Analysis for beta = 32 and a Partial Analysis for beta = 48</a>, Math. Comp., 54, 189 (1990), 331-344. %H A384779 <a href="/index/Ps#PRN">Index entries for sequences related to pseudo-random numbers</a>. %F A384779 a(n) = 68909602460261 * a(n-1) mod 2^48. %p A384779 a:= proc(n) option remember; `if`(n<2, n, %p A384779 irem(68909602460261*a(n-1), 2^48)) %p A384779 end: %p A384779 seq(a(n), n=1..16); # _Alois P. Heinz_, Jun 09 2025 %t A384779 NestList[Mod[68909602460261*#, 2^48] &, 1, 30] (* _Paolo Xausa_, Jun 11 2025 *) %Y A384779 Cf. A384696, A384746, A384775, A384776, A384778, A384780. %Y A384779 Cf. A384546, A384547, A384548, A384549, A384550, A384551, A384552. %K A384779 nonn,easy %O A384779 1,2 %A A384779 _Sean A. Irvine_, Jun 09 2025