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 A103799 #4 Mar 31 2012 10:23:47
%S A103799 0,2,4,6,10,12,14,16,22,24,26,34,36,38,44,46,50,62,64,66,70,74,78,82,
%T A103799 84,90,92,96,104,106,116,118,124,130,132,138,142,144,150,154,162,164,
%U A103799 170,172,176,186,190,194,224,230,242,252,258,262,264,270,274,278,302,308
%N A103799 Indices n such that A019565(n)+2 is prime.
%e A103799 A019565(0)=1, 1+2=3 is prime, so a(1)=0;
%e A103799 A019565(1)=2, 2+2=4 is not prime,
%e A103799 A019565(2)=3, 3+2=5 is prime, so a(2)=2;
%t A103799 A019565 = Function[tn, k1 = tn; o = 1; tt = 1; While[k1 > 0, k2 = Mod[k1, 2]; If[k2 == 1, tt = tt*Prime[o]]; k1 = (k1 - k2)/2; o = o + 1]; tt]; Do[cp = A019565[n] + 2; If[PrimeQ[cp], Print[n]], {n, 0, 1000}]
%Y A103799 Cf. A019565, A103796, A103797.
%K A103799 easy,nonn
%O A103799 1,2
%A A103799 _Lei Zhou_, Feb 22 2005