|
Search: id:A078493
|
|
| |
|
| 90, 110, 120, 140, 180, 210, 240, 290, 300, 360, 390, 410, 420, 450, 470, 480, 550, 580, 630, 660, 680, 690, 710, 720, 740, 770, 780, 790, 800, 810, 830, 860, 870, 900, 920, 930, 950, 960, 980, 1000, 1020, 1040, 1050, 1080, 1110, 1160, 1170, 1190, 1200, 1240
(list; graph; listen)
|
|
|
OFFSET
|
0,1
|
|
|
COMMENT
|
The year 2003 is the only prime year in the 2000 decade.
|
|
PROGRAM
|
(PARI) decade1(n1, n2) = { forstep(x=n1, n2, 10, if(isprime(x+1) && !isprime(x+3) && !isprime(x+7) && !isprime(x+9), print1(x" "); ); if(isprime(x+3) && !isprime(x+1) && !isprime(x+7) && !isprime(x+9), print1(x" "); ); if(isprime(x+7) && !isprime(x+1) && !isprime(x+3) && !isprime(x+9), print1(x" "); ); if(isprime(x+9) && !isprime(x+1) && !isprime(x+3) && !isprime(x+7), print1(x" "); ); ); }
|
|
CROSSREFS
|
Adjacent sequences: A078490 A078491 A078492 this_sequence A078494 A078495 A078496
Sequence in context: A043224 A039401 A044004 this_sequence A135197 A025371 A025362
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
Cino Hilliard (hillcino368(AT)gmail.com), Jan 04 2003
|
|
|
Search completed in 0.002 seconds
|
