login
A337573
Numbers k such that Sum_{i=1..k} prime(i)*prime(k+i) is prime.
2
2, 6, 26, 34, 38, 60, 102, 112, 116, 122, 140, 230, 236, 270, 300, 330, 366, 386, 418, 426, 430, 486, 488, 508, 530, 534, 548, 556, 568, 576, 600, 674, 680, 688, 696, 710, 720, 764, 772, 798, 802, 804, 824, 852, 870, 884, 906, 982, 996, 1018, 1038, 1056, 1152, 1162, 1190, 1210, 1230, 1252, 1326
OFFSET
1,1
COMMENTS
All terms are even.
Numbers k such that A337574(k) is prime.
LINKS
EXAMPLE
a(2)=6 is in the sequence because 2*17 + 3*19 + 5*23 + 7*29 + 11*31 + 13*37 = 1231 is prime.
MAPLE
P:= <seq(ithprime(i), i=1..6000)>:
select(t -> isprime(P[1..t]^%T . P[t+1..2*t]), 2*[$1..1500]);
MATHEMATICA
Select[Range[1326], PrimeQ@ Sum[Prime[i] Prime[# + i], {i, #}] &] (* Michael De Vlieger, Sep 01 2020 *)
CROSSREFS
Sequence in context: A032479 A029988 A050573 * A331963 A308988 A343753
KEYWORD
nonn
AUTHOR
J. M. Bergot and Robert Israel, Sep 01 2020
STATUS
approved