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 A096182 #2 Mar 30 2012 17:31:02
%S A096182 1,2,4,6,8,10,13,16,19,22,26,30,34,38,42,46,51,56,61,66,71,76,82,88,
%T A096182 94,100,106,112,118,124,130,136,142,148,155,162,169,176,183,190,197,
%U A096182 204,211,218,225,232,240,248,256,264,272,280,288,296,304,312,320,328,336
%N A096182 Index of first occurrence of n in A095773.
%t A096182 a[1] = 1; a[n_] := a[n] = 1 + a[n - a[a[a[n - 1]]]]; f[n_] := Block[{k = 1}, While[a[k] != n, k++ ]; k]; Table[ f[n], {n, 60}]
%Y A096182 Cf. A095773.
%K A096182 nonn
%O A096182 1,2
%A A096182 _Robert G. Wilson v_, Jun 19 2004