|
| |
|
|
A092522
|
|
a(n) = p modulo prime(n+1), where p is the least prime greater than 4 and not congruent to any previous a(k) modulo prime(k+1).
|
|
0
| |
|
|
2, 2, 6, 8, 5, 9, 4, 4, 21, 10, 15, 29, 27, 41, 29, 35, 8, 63, 18, 14, 14, 48, 78, 56, 66, 1, 31, 37, 31, 104, 96, 1, 85, 97, 12, 151, 151, 151, 133, 139, 163, 145, 145, 139, 187, 54, 211, 217, 18, 32, 26, 36, 235, 217, 211, 259, 54, 72, 86, 108, 128, 72, 74, 78, 92, 222, 192
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
PROG
| (PARI) { p=vector(1000, i, prime(i+1)); p[1]=0; cp=3; while (cp<500, i=1; while (p[i]==0, i++); x=p[i]%cp; print1(", "x); for (j=1, 1000, if (p[j]%cp==x, p[j]=0)); cp=nextprime(cp+1)) }
|
|
|
CROSSREFS
| Sequence in context: A106166 A101343 A134457 * A116542 A142243 A091441
Adjacent sequences: A092519 A092520 A092521 * A092523 A092524 A092525
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Jon Perry (perry(AT)globalnet.co.uk), Apr 06 2004
|
|
|
EXTENSIONS
| Edited by Don Reble (djr(AT)nk.ca), Nov 07 2005
|
| |
|
|
