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 A079107 #9 Mar 31 2012 10:23:02 %S A079107 3,4,4,5,6,6,6,6,6,7,7,7,7,7,7,8,8,8,8,8,8,8,8,8,9,9,9,9,9,9,9,9,9,9, %T A079107 9,9,9,9,9,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10,10, %U A079107 10,10,10,10,10,11,11,11,11,11,11,11,11,11,11,11,11,11,11,11,11,11,11,11,11 %N A079107 Number of digits of A077722(n) written in base 8. %e A079107 a(5)=6 since A077722(5)=32833, which has an octal form of 100101 (6 digits). %p A079107 s := 0:for n from 1 to 7000 do b := convert(n,base,2): q := sum(b[i]*8^(i-1),i=1..nops(b)): if(isprime(q)) then s := s+1:a[s] := nops(b):fi: od:seq(a[k],k=1..s); %Y A079107 Cf. A077722. %K A079107 nonn,base %O A079107 1,1 %A A079107 Francois Jooste (phukraut(AT)hotmail.com), Dec 23 2002 %E A079107 More terms from _Sascha Kurz_, Feb 10 2003