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 A107365 #5 Mar 30 2012 17:26:16
%S A107365 1,2,3,4,5,9,13,16,18,21,24,26,48,79,99,110,129,140,187,304,566,670,
%T A107365 798,905,1020,1119,1346,2266,3354,5140,7043,7854,10548,17986,26886,
%U A107365 33861,42373,49100,57393,63954,72099,148934,290510,348529,483751,539780
%N A107365 Indices of primes occurring in A030284.
%F A107365 a(n)=pi(A030284(n))
%t A107365 d=2;b={1};Do[p=Prime[n];If[Intersection@@IntegerDigits/@{d, p}=={}, b=Append[b, n];d=p], {n, 100000000}];b
%Y A107365 Cf. A030284 = Primes whose digits do not appear in previous term.
%K A107365 nonn
%O A107365 1,2
%A A107365 _Zak Seidov_, May 24 2005