|
Search: id:A051634
|
|
|
| A051634 |
|
Strong primes: p(n)>(p(n-1)+p(n+1))/2. |
|
+0
25
|
|
| 11, 17, 29, 37, 41, 59, 67, 71, 79, 97, 101, 107, 127, 137, 149, 163, 179, 191, 197, 223, 227, 239, 251, 269, 277, 281, 307, 311, 331, 347, 367, 379, 397, 419, 431, 439, 457, 461, 479, 487, 499, 521, 541, 557, 569, 587, 599
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
REFERENCES
|
A. Murthy, Smarandache Notions Journal, Vol. 11 N. 1-2-3 Spring 2000
|
|
LINKS
|
T. D. Noe, Table of n, a(n) for n=1..1000
|
|
EXAMPLE
|
11 belongs to the sequence because 11>(7+13)/2
|
|
MATHEMATICA
|
Transpose[Select[Partition[Prime[Range[10^2]], 3, 1], #[[2]]>(#[[1]]+#[[3]])/2 &]][[2]] (from Vladimir Orlovsky (4vladimir(AT)gmail.com), May 01 2008) s=""; For[i=1, i<10^2, If[Prime[i+1]>(Prime[i]+Prime[i+2])/2, s=s<>ToString[Prime[i+1]]<>", "(*Print[Prime[i + 1]]*)]; i++ ]; Print[s]
|
|
CROSSREFS
|
Cf. A006562, A051635.
Sequence in context: A120139 A110055 A105886 this_sequence A038918 A166307 A128464
Adjacent sequences: A051631 A051632 A051633 this_sequence A051635 A051636 A051637
|
|
KEYWORD
|
nice,nonn
|
|
AUTHOR
|
Felice Russo (felice.russo(AT)katamail.com), Nov 15 1999
|
|
|
Search completed in 0.002 seconds
|
