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 A094663 #22 Jun 27 2024 01:40:49 %S A094663 2,19,3023,3469898586979325623,2502544963063007045084611872632077 %N A094663 Prime numerators of the sums of the ratios of consecutive primes. %C A094663 The next term is too large to include. %C A094663 Prime terms of A091852. %C A094663 Sum of reciprocals = 0.5577902661277818841795751911... %H A094663 Amiram Eldar, <a href="/A094663/b094663.txt">Table of n, a(n) for n = 1..9</a> %e A094663 3023 is a term since 2/3 + 3/5 + 5/7 + 7/11 = 3023/1155 and 3023 is prime. %t A094663 Select[Numerator/@Accumulate[First[#]/Last[#]&/@ Partition[Prime[ Range[50]],2,1]],PrimeQ] (* _Harvey P. Dale_, Apr 23 2011 *) %o A094663 (PARI) consecpr2(n) = {my(s=0, y=0, z); forprime(x=2,n, y+=x/nextprime(x+1); z=numerator(y); s+=1./z; if(isprime(z),print1(z", ")) ); print(); print(s) } %Y A094663 Cf. A091852. %K A094663 nonn %O A094663 1,1 %A A094663 _Cino Hilliard_, Jun 06 2004 %E A094663 Offset corrected by _Amiram Eldar_, Jun 26 2024