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 A096247 #6 Nov 21 2013 12:48:20
%S A096247 0,3,7,3,5,7,0,3,7,0,4,0,5,4,1,9,7,6,0,3,3,0,5,9,8,0,0,6,6,1,3,7,9,4,
%T A096247 6,6,8,8,1,9,8,2,4,1,6,1,9,8,7,2,2,6,8,3,3,5,5,0,4,7,0,6,9,7,7,4,6,0,
%U A096247 0,7,5,7,9,0,8,0,6,9,1,2,1,4,9,5,3,9,2,7,4,1,3,0,8,5,7,3,6,5,1,6,8,3,5,3,4
%N A096247 Decimal expansion of Sum(1/t^t) where t is the lesser of twin prime pairs.
%t A096247 Join[{0},RealDigits[Total[1/#^#&/@Transpose[Select[Partition[ Prime[ Range[200]],2,1],Last[#]-First[#]==2&]][[1]]],10,120][[1]]] (* _Harvey P. Dale_, May 09 2012 *)
%o A096247 (PARI) tptothetp(n) = { local(x,s,a); default(realprecision,200); s=0; forprime(x=3,n,if(isprime(x+2),s+=1./x^x)); a=Vec(Str(s)); for(x=3,n,print1(eval(a[x]),",")); print(); print(s) }
%K A096247 nonn,cons
%O A096247 1,2
%A A096247 _Cino Hilliard_, Jul 31 2004