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 A384780 #14 Jun 11 2025 10:11:37 %S A384780 1,127107890972165,97936613129241,273514721657469,208157768792689, %T A384780 190871074753077,130077535940873,140242115373869,12589906159073, %U A384780 144775771571045,83191635750649,67018942496989,27094905090641,40503495991701,211801672787433,25600309900173 %N A384780 Consecutive states of the linear congruential pseudo-random number generator 127107890972165*s mod 2^48 when started at 1. %C A384780 Periodic with period 2^46. %H A384780 Sean A. Irvine, <a href="/A384780/b384780.txt">Table of n, a(n) for n = 1..10000</a> %H A384780 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 A384780 <a href="/index/Ps#PRN">Index entries for sequences related to pseudo-random numbers</a>. %F A384780 a(n) = 127107890972165 * a(n-1) mod 2^48. %p A384780 a:= proc(n) option remember; `if`(n<2, n, %p A384780 irem(127107890972165*a(n-1), 2^48)) %p A384780 end: %p A384780 seq(a(n), n=1..16); # _Alois P. Heinz_, Jun 09 2025 %t A384780 NestList[Mod[127107890972165*#, 2^48] &, 1, 30] (* _Paolo Xausa_, Jun 11 2025 *) %Y A384780 Cf. A384696, A384746, A384775, A384776, A384778, A384779. %Y A384780 Cf. A384546, A384547, A384548, A384549, A384550, A384551, A384552. %K A384780 nonn,easy %O A384780 1,2 %A A384780 _Sean A. Irvine_, Jun 09 2025