1,2

T. D. Noe, Table of n, a(n) for n=1..1000

C. Kimberling, Fractal sequences

Take[Transpose[ Sort[Flatten[Table[{i + j*(E^(1/E)), i}, {i, 17}, {j, 15}], 1], #1[[1]] < #2[[1]] &]][[2]], 91]

Cf. A073229.

Sequence in context: A167287 A007336 A227539 * A003603 A278118 A255238

Adjacent sequences: A133331 A133332 A133333 * A133335 A133336 A133337

nonn

Gregg Whisler, Oct 19 2007

approved