|
Search: id:A126148
|
|
|
| A126148 |
|
Let p and q be consecutive primes. If pq+p+q is a prime, adjoin p to the sequence. |
|
+0
9
|
|
| 2, 3, 5, 11, 13, 17, 19, 23, 41, 43, 47, 59, 79, 83, 89, 101, 109, 113, 137, 163, 167, 173, 223, 229, 257, 311, 383, 389, 409, 419, 439, 443, 479, 521, 547, 557, 577, 593, 613, 643, 647, 683, 773, 797, 809, 811, 853, 953, 983, 1019, 1049, 1097, 1109, 1151, 1171
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
EXAMPLE
|
Take p = 13 and q = 17: product is 221 and sum is 30; add them to get 251, a prime. So 13 is a member.
|
|
MAPLE
|
a:=proc(n) if isprime(ithprime(n)*ithprime(n+1)+ithprime(n)+ithprime(n+1))=true then ithprime(n) else fi end: seq(a(n), n=1..250); - Emeric Deutsch (deutsch(AT)duke.poly.edu), Mar 08 2007
|
|
MATHEMATICA
|
Prime@Select[Range[200], PrimeQ[Prime[ # ]Prime[ # + 1] + Prime[ # ] + Prime[ # + 1]] &] (*Chandler*)
|
|
CROSSREFS
|
Cf. A096342, A000040, A001043, A006094, A126148, A126199, A096342.
Sequence in context: A040062 A115653 A042997 this_sequence A038933 A042998 A091317
Adjacent sequences: A126145 A126146 A126147 this_sequence A126149 A126150 A126151
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
M. Bergot (thekingfishb(AT)yahoo.ca), Mar 07 2007
|
|
EXTENSIONS
|
Extended by Ray Chandler (rayjchandler(AT)sbcglobal.net), Emeric Deutsch (deutsch(AT)duke.poly.edu) and Robert G. Wilson v (rgwv(AT)rgwv.com), Mar 07 2007
|
|
|
Search completed in 0.002 seconds
|
