|
| |
|
|
A052166
|
|
Primes at which difference pattern X424Y (X and Y >= 6) occurs in A001223.
|
|
1
| |
|
|
37, 223, 307, 457, 853, 877, 1087, 1297, 1423, 1993, 2683, 4513, 4783, 5227, 6823, 7873, 8287, 10453, 13687, 13873, 16183, 17383, 20743, 21313, 23053, 23557, 23623, 24103, 27733, 29017, 31387, 33343, 33613, 35527, 36007, 37987, 40423, 42013
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
EXAMPLE
| 37 is here because 37+4=41,37+4+2=43,37+4+2+4=47 are consecutive primes and prime preceding 37 is 31,following 47 is 53 and the corresponding differences are 6 or 6. Thus the d-pattern "around 37" is {6,4,2,4}.
|
|
|
MATHEMATICA
| okQ[n_List]:=Module[{d=Differences[n]}, Take[d, {2, 4}]=={4, 2, 4} && First[d]>5&&Last[d]>5]; Transpose[Select[ Partition[ Prime[ Range[ 4400]], 6, 1], okQ]][[2]] (* From Harvey P. Dale, Jul 17 2011 *)
|
|
|
CROSSREFS
| A001223, A052160, A052162-A052168, A022008, A047078.
Sequence in context: A141954 A156569 A141984 * A142010 A133958 A088544
Adjacent sequences: A052163 A052164 A052165 * A052167 A052168 A052169
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Labos E. (labos(AT)ana.sote.hu), Jan 26 2000
|
| |
|
|
