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 A107977 #5 Jul 30 2015 23:02:06 %S A107977 9,18,19,27,28,37,39,46,48,56,59,66,69,78,82,88,92,100,105,111,116, %T A107977 125,131,137,143,152,159,167,175,177,185,193,202,204,205,205,205,206, %U A107977 206,211,212,213,214,215,216,222,223,225,230,231,234,235,236,239,246,247 %N A107977 First differences give the same sequence written as a string of individual digits. %e A107977 9.18.19.27.28.37.39.46.48.56 ... <- sequence %e A107977 .9..1..8..1..9..2..7..2..8 ... <- first differences are the sequence's digits. %t A107977 a[1] = 9; a[n_] := a[n] = a[n - 1] + Flatten[ Table[ IntegerDigits[ a[i]], {i, n - 1}]][[n - 1]]; Table[ a[n], {n, 56}] (* _Robert G. Wilson v_, Jun 15 2005 *) %Y A107977 Cf. A100787, A107974, A107975, A107976, A107977 for "seeds" 1, 3, 5, 7 and 9. %K A107977 base,easy,nonn %O A107977 1,1 %A A107977 _Eric Angelini_, Jun 12 2005 %E A107977 Edited and extended by _Robert G. Wilson v_, Jun 15 2005