login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo

Thanks to everyone who made a donation during our annual appeal!
To see the list of donors, or make a donation, see the OEIS Foundation home page.

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A096553 Consecutive states of the linear congruential pseudo-random number generator used in function rand() in the Standard C library (VAX C) when started at 1. 1
1, 1103527590, 377401575, 662824084, 1147902781, 2035015474, 368800899, 1508029952, 486256185, 1062517886, 267834847, 180171308, 836760821, 595337866, 790425851, 2111915288, 1149758321, 1644289366, 1388290519, 1647418052, 1675546029 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

COMMENTS

This is also the sequence of internal states of the generator described in Kernighan and Ritchie, which produces output limited to 15bit, see A061364. - A-number corrected by Jean-Claude Arbaut, Oct 05 2015

REFERENCES

Brian W Kernighan and Dennis M. Ritchie, The C Programming Language (Second Edition) Prentice Hall Software Series, 1988.

LINKS

Harvey P. Dale and Alois P. Heinz, Table of n, a(n) for n = 1..10000 (first 1000 terms from Harvey P. Dale)

Index entries for sequences related to pseudo-random numbers.

FORMULA

a(1)=1, a(n) = (1103515245 * a(n-1) + 12345) mod 2^31.

MAPLE

a:= proc(n) option remember; `if`(n<2, n,

      irem(1103515245 *a(n-1)+12345, 2147483648))

    end:

seq(a(n), n=1..30);  # Alois P. Heinz, Jun 10 2014

MATHEMATICA

With[{c=2^31}, NestList[Mod[1103515245#+12345, c]&, 1, 20]] (* Harvey P. Dale, Aug 01 2012 *)

PROG

(PARI) a(n) = if(n<2, 1, (1103515245 * a(n-1) + 12345) % (2^31));

vector(100, n, a(n)) \\ Altug Alkan, Oct 05 2015

(MAGMA) [n eq 1 select 1 else (1103515245 * Self(n-1) + 12345) mod (2^31): n in [1..25]]; // Vincenzo Librandi, Oct 06 2015

CROSSREFS

Cf. A096550-A096561 for other pseudo-random number generators.

Sequence in context: A108322 A108323 A154474 * A104924 A272029 A095425

Adjacent sequences:  A096550 A096551 A096552 * A096554 A096555 A096556

KEYWORD

nonn

AUTHOR

Hugo Pfoertner, Jul 18 2004

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified January 19 18:25 EST 2020. Contains 331051 sequences. (Running on oeis4.)