login
A096552
Consecutive internal states of the linear congruential pseudo-random number generator MTH$RANDOM that is used in the VAX VMS Library.
1
0, 1, 69070, 475628535, 3277404108, 772999773, 3877832058, 3821835443, 1662200408, 2044158073, 3788989926, 797919023, 2743624612, 1156259413, 1059494674, 584849259, 786050992, 3369345009, 3077427454, 1200308583, 2654771836, 1692139853, 4052415402, 1850655011
OFFSET
1,3
COMMENTS
This generator is a variant of A096551.
FORMULA
a(1)=0, a(n) = (69069*a(n-1)+1) mod 2^32. The sequence is periodic with period length 2^32. [Corrected based on a comment from Kevin Ryde, Nov 13 2024]
MAPLE
a:= proc(n) option remember; `if`(n<2, 0,
irem(69069 *a(n-1)+1, 4294967296))
end:
seq(a(n), n=1..30); # Alois P. Heinz, Jun 10 2014
MATHEMATICA
NestList[Mod[#*69069 + 1, 2^32] &, 0, 50] (* Paolo Xausa, Aug 29 2024 *)
CROSSREFS
Cf. A096550-A096561 for other pseudo-random number generators.
Sequence in context: A250500 A354194 A096551 * A031663 A105010 A190379
KEYWORD
nonn
AUTHOR
Hugo Pfoertner, Jul 18 2004
STATUS
approved