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!)
A088081 Smallest prime(k) such that for every r = 1 to n, there exist i,j, k >= j > i, such that prime(j)-prime(i) == 0 ( mod r). 3
3, 5, 5, 7, 7, 11, 17, 17, 17, 17, 17, 17, 29, 29, 29, 29, 29, 29, 41, 41, 41, 41, 53, 53, 53, 53, 53, 53, 53, 53, 67, 67, 71, 71, 71, 71, 79, 79, 79, 79, 79, 79, 89, 89, 89, 89, 97, 97, 101, 101, 101, 101, 109, 109, 113, 113, 113, 113, 113, 113, 127, 127, 131, 131, 131 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,1
LINKS
EXAMPLE
a(11) = a(12) = 17, but a(13) = 29 as 29-3 == 0 (mod 13). And we have
5-3 = 2, 11-5 = 2*3, 7-3 = 4, 7-2 = 5, 11-5 = 6, 17-3 = 2*7, 11-3 = 8, 23-5 = 2*9, 13-3 = 10, 13 - 2 = 11, 17-5 = 12, 29-3 = 2*13.
PROG
(PARI) found = vector(500); x = 1; forprime(p = 3, 500, oldX = x; forprime (q = 2, p - 1, v = divisors(p - q); for (i = 1, length(v), found[v[i]] = 1; if (v[i] == x, while (found[x], x++; write1("A088081.txt", p" "))))); if (oldX != x, write1("A088083.txt", p" "); write1("A088082.txt", x - 1" "))); \\ David Wasserman, Jul 11 2005
CROSSREFS
Cf. A088082.
Cf. A088083.
Sequence in context: A087821 A204894 A109258 * A206768 A168322 A138475
KEYWORD
nonn
AUTHOR
Amarnath Murthy, Sep 22 2003
EXTENSIONS
More terms from David Wasserman, Jul 11 2005
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 29 03:51 EDT 2024. Contains 371264 sequences. (Running on oeis4.)