A292608 a(n) = 2*n + 1 + valuation(n, 2) with valuation(n, 2) = A007814(n).

3, 6, 7, 11, 11, 14, 15, 20, 19, 22, 23, 27, 27, 30, 31, 37, 35, 38, 39, 43, 43, 46, 47, 52, 51, 54, 55, 59, 59, 62, 63, 70, 67, 70, 71, 75, 75, 78, 79, 84, 83, 86, 87, 91, 91, 94, 95, 101, 99, 102, 103, 107, 107, 110, 111, 116, 115, 118, 119, 123, 123, 126

Offset

1,1

Comments

Duplicated terms 11, 27, 43, 59, ... are A106839 (verified with 1000 terms). - Jean-François Alcover, Sep 24 2017 (comment made further to an e-mail from Paul Curtz)

Links

Table of n, a(n) for n=1..62.

Maple

a := n -> 2*n + 1 + padic:-ordp(n, 2): seq(a(n), n=1..62);

Mathematica

a[n_] := 2n + 1 + IntegerExponent[n, 2]; Array[a, 62]

Prog

(PARI) a(n) = 2*n+1+valuation(n, 2); \\ Michel Marcus, Sep 25 2017

Crossrefs

Cf. A007814, A106839.

Sequence in context: A115127 A258354 A164557 * A028754 A028795 A004780

Adjacent sequences: A292605 A292606 A292607 * A292609 A292610 A292611

Keyword

nonn

Author

Peter Luschny, Sep 23 2017

Status

approved