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 A108165 #10 Mar 30 2012 17:34:16
%S A108165 2,5,9,12,15,19,22,26,29,32,36,39,42,46,49,53,56,59,63,66,70,73,76,80,
%T A108165 83,86,90,93,97,100,103,107,110,114,117,120,124,127,130,134,137,141,
%U A108165 144,147,151,154,157,161,164,168,171,174,178,181,185,188,191,195,198,201
%N A108165 a(n)=a(n-1) +A108173(n+1) -A108173(n).
%C A108165 Tribonacci version of A001950 using beta, the positive real root of x^3-x^2-x-1, as the constant.
%t A108165 NSolve[x^3 - x^2 - x - 1 = 0, x] beta = 1.8392867552141612 a[n_] = 1 + Ceiling[(n - 1)*beta^2] (* A007066-like*) aa = Table[a[n], {n, 1, 100}] (*A076662-like*) b = Table[a[n] - a[n - 1], {n, 2, Length[aa]}] F[1] = 2; F[n_] := F[n] = F[n - 1] + b[[n]] (* A000195-like*) c = Table[F[n], {n, 1, Length[b] - 1}]
%Y A108165 Cf. A007066, A076662, A001950.
%K A108165 nonn
%O A108165 1,1
%A A108165 _Roger L. Bagula_, Jun 13 2005
%E A108165 Partially edited by _N. J. A. Sloane_, May 04 2007
%E A108165 Correction of definition and offset by R. J. Mathar, Mar 12 2012