A158456 Signature sequence for log(3)/log(2).

1, 2, 1, 3, 2, 4, 1, 3, 5, 2, 4, 1, 6, 3, 5, 2, 7, 4, 1, 6, 3, 8, 5, 2, 7, 4, 1, 9, 6, 3, 8, 5, 2, 10, 7, 4, 1, 9, 6, 3, 11, 8, 5, 2, 10, 7, 4, 12, 1, 9, 6, 3, 11, 8, 5, 13, 2, 10, 7, 4, 12, 1, 9, 6, 14, 3, 11, 8, 5, 13, 2, 10, 7, 15, 4, 12, 1, 9, 6, 14, 3, 11, 8, 16, 5, 13, 2, 10, 7, 15, 4, 12, 1, 9, 17

Offset

1,2

Comments

Not the same as A191475. - Zak Seidov, Aug 31 2012

Links

Franklin T. Adams-Watters, Table of n, a(n) for n=1..1000

Formula

a(n) = A022328(n) + 1.

Mathematica

Take[Transpose[Sort[Flatten[Table[{i + j*(Log[3]/Log[2]), i}, {i, 17}, {j, 12}], 1], #1[[1]] < #2[[1]] &]][[2]], 100] (* Robert G. Wilson v, Aug 20 2012 *)

Crossrefs

Cf. A022328, A134583, A191475.

Sequence in context: A058933 A087470 A191475 * A084531 A023129 A007337

Adjacent sequences: A158453 A158454 A158455 * A158457 A158458 A158459

Keyword

nonn

Author

Franklin T. Adams-Watters, Mar 19 2009

Extensions

Added 1 to all the terms so as to match the b-file. - N. J. A. Sloane, Aug 31 2009

Status

approved