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 A122139 #6 Sep 15 2024 20:23:53 %S A122139 2,13,19,29,29,79,47,73,163,359,5233,20477,811,13859,2203,75997,3331, %T A122139 4457,239087,58061,159097,116041,7487,17929,4547,152657,408787,58313, %U A122139 5563,4783,226199,13729,676763,204641,119293,283979,2210983,7121,433 %N A122139 Primes from A122136 corresponding to the indices A122138. %F A122139 a(n) = A122136(A122138(n)). %t A122139 Select[Table[Numerator[Sum[Prime[k]^2,{k,1,n}]/Product[Prime[k],{k,1,n}]],{n,1,200}],PrimeQ[ #1]&] %Y A122139 Cf. A122136, A122138, A024450, A002110. %K A122139 nonn %O A122139 1,1 %A A122139 _Alexander Adamchuk_, Aug 21 2006