|
Search: id:A071217
|
|
|
| A071217 |
|
Largest prime factor of sum of successive primes p(m+1)+p(m) is greater than m. |
|
+0
1
|
|
| 1, 9, 11, 12, 19, 23, 24, 29, 31, 32, 51, 54, 58, 63, 67, 71, 75, 76, 77, 84, 86, 87, 93, 95, 97, 103, 108, 110, 124, 128, 136, 151, 158, 159, 164, 169, 188, 191, 192, 200, 202, 205, 208, 210, 211, 216, 227, 232, 241, 243, 245, 246, 247, 252, 265, 273, 278, 282
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
FORMULA
|
A071216(n)>n
|
|
EXAMPLE
|
p(9)+p(10)=23+29=52=2.2.13 and 13>10, so index 9 is here, it is the 2nd term.
|
|
MATHEMATICA
|
pf[x_] := Part[Reverse[Flatten[FactorInteger[x]]], 2] Do[s=pf[Prime[n+1]+Prime[n]]; If[Greater[s, n], Print[n]], {n, 1, 1000}]
|
|
CROSSREFS
|
Cf. A001043, A006530, A071216.
Sequence in context: A031954 A043457 A031078 this_sequence A064930 A070699 A065454
Adjacent sequences: A071214 A071215 A071216 this_sequence A071218 A071219 A071220
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Labos E. (labos(AT)ana.sote.hu), May 17 2002
|
|
|
Search completed in 0.002 seconds
|
