|
Search: id:A078494
|
|
|
| A078494 |
|
Primes occurring only once in their decade. |
|
+0 1
|
|
| 97, 113, 127, 149, 181, 211, 241, 293, 307, 367, 397, 419, 421, 457, 479, 487, 557, 587, 631, 661, 683, 691, 719, 727, 743, 773, 787, 797, 809, 811, 839, 863, 877, 907, 929, 937, 953, 967, 983, 1009, 1021, 1049, 1051, 1087, 1117, 1163, 1171, 1193, 1201, 1249
(list; graph; listen)
|
|
|
OFFSET
|
0,1
|
|
|
PROGRAM
|
(PARI) decade1pr(n1, n2) = { forstep(x=n1, n2, 10, if(isprime(x+1) && !isprime(x+3) && !isprime(x+7) && !isprime(x+9), print1(x+1" "); ); if(isprime(x+3) && !isprime(x+1) && !isprime(x+7) && !isprime(x+9), print1(x+3" "); ); if(isprime(x+7) && !isprime(x+1) && !isprime(x+3) && !isprime(x+9), print1(x+7" "); ); if(isprime(x+9) && !isprime(x+1) && !isprime(x+3) && !isprime(x+7), print1(x+9" "); ); ); }
|
|
CROSSREFS
|
Sequence in context: A039490 A033202 A136477 this_sequence A139980 A038133 A073076
Adjacent sequences: A078491 A078492 A078493 this_sequence A078495 A078496 A078497
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
Cino Hilliard (hillcino368(AT)gmail.com), Jan 04 2003
|
|
|
Search completed in 0.002 seconds
|