|
|
A343711
|
|
Primes p such that p-1 is a partial sum of A014574.
|
|
2
|
|
|
5, 11, 23, 41, 71, 113, 173, 347, 593, 743, 2333, 3413, 5399, 7919, 9551, 12119, 23627, 27827, 39113, 42773, 44651, 48533, 63113, 67619, 69929, 72269, 77201, 93371, 105263, 114941, 121571, 142151, 149249, 164093, 171863, 204461, 257783, 282281, 308333, 481571, 539267, 554303, 625589, 659237
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
All terms == 5 (mod 6).
|
|
LINKS
|
|
|
EXAMPLE
|
a(8) = 347 is a term because it is prime and 347-1 = 346 = Sum_{i=1..9} A014574(i) = 4+6+12+18+30+42+60+72+102.
|
|
MAPLE
|
P:= {seq(ithprime(i), i=1..10^5)}:
A014574:= sort(convert(map(`+`, P, 1) intersect map(`-`, P, 1), list)):
select(isprime, map(`+`, ListTools:-PartialSums(A014574), 1));
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|