|
|
|
|
103, 101, 97, 197, 229, 109, 281, 233, 167, 607, 233, 349, 821, 307, 631, 1093, 853, 373, 1597, 1009, 439, 643, 503, 2111, 983, 769, 1811, 569, 2423, 3823, 3581, 2027, 941, 677, 997, 691, 1753, 3539, 1193, 5381, 4289, 2411, 2063, 1307, 919, 8311, 2719, 3187, 6373, 1459, 3331, 9431
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Equivalently, A186102(n) for those n where neither n nor n+prime(n) is prime.
|
|
LINKS
|
|
|
EXAMPLE
|
A186102(8) = 103 > 8 + prime(8)= 27, so a(1) = 103.
|
|
MAPLE
|
A186102 := proc(n) local p , pn; p := 2 ; pn := ithprime(n) ; while modp(p, pn) <> modp(n, pn) do p := nextprime(p) end do: return p ; end proc:
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|