This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A343451 #10 May 07 2025 10:41:31 %S A343451 29,41543,230849,267667,895571,1440449,3171593,3400087,9305809, %T A343451 9790127,10811683,11905679,17067151,19353953,20161963,25516163, %U A343451 77893657,82199893,96107729,131707319,164721871,171958543,211522679,266929763,337603949,361747937,393590563,420428507,635794961,752500141 %N A343451 Primes in A014342. %C A343451 Primes of the form Sum_{i=1..n} prime(i) * prime(n+1-i). %H A343451 Robert Israel, <a href="/A343451/b343451.txt">Table of n, a(n) for n = 1..1500</a> %e A343451 For n=3, a(3) = 230849 = A014342(47) is prime. %p A343451 G:= expand(add(ithprime(i)*x^i,i=1..2000)^2): %p A343451 select(isprime,[seq(coeff(G,x,i),i=2..2001)]); %t A343451 Select[Table[With[{p=Prime[Range[n]]},ListConvolve[p,p]],{n,500}]//Flatten,PrimeQ] (* _Harvey P. Dale_, May 07 2025 *) %Y A343451 Cf. A014342. %K A343451 nonn %O A343451 1,1 %A A343451 _J. M. Bergot_ and _Robert Israel_, Apr 15 2021