login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A273043 Discriminator of sequence A001566. 4
1, 3, 3, 7, 37, 37, 37, 37, 37, 37, 59, 59, 59, 59, 73, 73, 73, 73, 73, 97, 97, 97, 137, 157, 157, 157, 157, 157, 157, 157, 157, 157, 157, 157, 157, 157, 157, 157, 157, 157, 251, 251, 251, 251, 251, 251, 251, 251, 251, 251, 277, 277, 277, 277, 277, 277, 277 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

COMMENTS

The discriminator of a sequence is the least integer k such that the first n terms of the sequence are pairwise incongruent, modulo k.

LINKS

Robert Israel, Table of n, a(n) for n = 1..10000

MAPLE

N:= 1000: # to get a(1)..a(n)

nmax:= 0:

for m from 1 while nmax <= N do

  a:= 3 mod m; A:= {a};

  for n from 1 while nops(A) = n do

    a:= a^2 - 2 mod m;

    A:= A union {a};

  od:

  for k from nmax+1 to n-1 do v[k]:= m od:

  nmax:= max(nmax, n-1);

od:

seq(v[k], k=1..N); # Robert Israel, May 13 2016

CROSSREFS

Cf. A001566.

Sequence in context: A191498 A065747 A232309 * A066142 A232459 A175566

Adjacent sequences:  A273040 A273041 A273042 * A273044 A273045 A273046

KEYWORD

nonn

AUTHOR

Jeffrey Shallit, May 13 2016

EXTENSIONS

a(13)-a(28) from Tom Edgar, May 13 2016

a(29)-a(57) from Robert Israel, May 13 2016

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 September 16 12:41 EDT 2019. Contains 327113 sequences. (Running on oeis4.)