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 A102654 #6 Mar 29 2015 16:24:47 %S A102654 0,7,14,8,11,15,8,8,8,12,15,15,15,8,9,8,12,8,12,8,12,15,16,15,8,9,15, %T A102654 8,9,15,8,9,8,12,8,13,8,12,15,16,8,12,15,16,8,12,15,16,15,8,9,15,8,10, %U A102654 15,8,9,8,12,8,13,15,8,9,8,12,8,13,15,8,9,8,12,8,13,8,12,15,16,8,12,15,8,7 %N A102654 Add 7 to each of the preceding digits, beginning with 0. %e A102654 Add 7 to the first "7" gives 14 %e A102654 Add 7 to the "1" of this 14 gives 8; and adding 7 to the "4" of this 14 gives 11. %t A102654 Flatten[ NestList[ Function[x, Flatten[ IntegerDigits[x] + 7]], {0}, 10]] (* _Robert G. Wilson v_, Feb 04 2005 *) %Y A102654 Cf. A103693, A103694, A103695, A103696, A103697, A103698, A103699, A103700. %K A102654 base,easy,nonn %O A102654 0,2 %A A102654 _Alexandre Wajnberg_, Feb 02 2005 %E A102654 More terms from _Robert G. Wilson v_, Feb 04 2005