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 A335304 #11 Jun 01 2020 09:51:56 %S A335304 2,3,5,34543 %N A335304 Primes k such that k divides sum of k-th twin prime pair. %C A335304 Primes in A335303. %C A335304 a(5) > 2*10^11, if it exists. - _Giovanni Resta_, Jun 01 2020 %H A335304 Chris K. Caldwell and G. L. Honaker, Jr., <a href="https://primes.utm.edu/curios/page.php?curio_id=38144">Prime Curio for 34543</a> %e A335304 34543 is a term because sum of 34543th twin prime pair is 5388707 + 5388709 = 8*3*13*34543. %t A335304 l={};c=0;Do[If[PrimeQ[Prime[n]+2],c=c+1;If[IntegerQ[(2*Prime[n]+2)/c]&&PrimeQ[c], AppendTo[l,c]]],{n,2,10^6}];l %o A335304 (PARI) is(n) = {!bittest(n, 0)&&isprime(n\2-1)&&isprime(n\2+1)}; \\ A054735 %o A335304 lista(nn) = {my(nb=0); for (n=1, nn, if (is(n), nb++; if (isprime(nb) && ((n % nb) == 0), print1(nb, ", "));););} \\ _Michel Marcus_, Jun 01 2020 %Y A335304 Cf. A001097, A001359, A006512, A054735, A077800, A335303. %K A335304 nonn,bref,more %O A335304 1,1 %A A335304 _Metin Sariyar_, May 31 2020