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 A079480 #3 Feb 11 2014 19:05:41
%S A079480 1,2,23,1225,113428,2113253433,1221133328272641,
%T A079480 112221332439252927292834,2132112312141319233733522435243624342725,
%U A079480 121113122112131112111411131119124449343834282634242925352431253324352529
%N A079480 a(1) = 1; a(2) = 2; a(n) = LS(a(n-1)) + LS(a(n-2)) if n > 2, where LS(m) = the "Look and Say" description (A045918) of m.
%e A079480 E.g. a(7) = LS(a(6))+LS(a(5)). LS(a(6)) = LS(2113253433) = 1221131215131423, LS(a(5)) = LS(113428) = 2113141218 -> a(7) = 1221133328272641
%t A079480 RunLengthEncode[x_List] := (Through[{First, Length}[ #1]] &) /@ Split[x]; LS[n_] := FromDigits[ Reverse[ Flatten[ RunLengthEncode[ Reverse[ IntegerDigits[n]]]]]]; a[1] = 1; a[2] = 2; a[n_] := a[n] = LS[a[n - 1]] + LS[a[n - 2]]; Table[a[n], {n, 1, 10}]
%Y A079480 Cf. A005150, A045918.
%K A079480 base,nonn
%O A079480 1,2
%A A079480 _Joseph L. Pe_, Jan 15 2003
%E A079480 More terms from Mark Hudson (mrmarkhudson(AT)hotmail.com), Jan 24 2003
%E A079480 Corrected and edited by _Robert G. Wilson v_, Jan 27 2003