login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A034900 a(n) is square mod a(i), i < n; a(n) prime; a(1) = 2. 2
2, 3, 7, 37, 67, 127, 211, 1999, 3823, 5623, 5779, 12163, 17683, 41227, 180667, 186727, 1901209, 5176711, 5830819, 10593997, 36065149, 66423067, 89635303, 117961621, 121703311, 225511939, 410967463 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,1
LINKS
PROG
(PARI) isok(newp, v, n) = {for (k=1, n, if (!issquare(Mod(newp, v[k])), return (0)); ); return (1); }
lista(nn) = {my(v=vector(nn), lastp=2); v[1] = lastp; for (n=2, nn, my(newp = nextprime(lastp+1)); while (! isok(newp, v, n-1), newp = nextprime(newp+1)); v[n] = newp; lastp = newp; ); v; } \\ Michel Marcus, Sep 24 2020
CROSSREFS
Sequence in context: A165744 A330554 A304524 * A079388 A183605 A000317
KEYWORD
nonn,more
AUTHOR
EXTENSIONS
Name edited by Michel Marcus, Sep 24 2020
STATUS
approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 19 07:21 EDT 2024. Contains 370955 sequences. (Running on oeis4.)