A073632 Numbers k such that floor((3/2)^k) = A002379(k) is odd.

0, 1, 3, 4, 5, 6, 7, 8, 10, 12, 14, 15, 17, 18, 20, 21, 22, 25, 27, 30, 32, 33, 34, 35, 38, 42, 45, 46, 48, 52, 53, 55, 57, 58, 59, 61, 62, 63, 64, 65, 69, 71, 74, 76, 82, 83, 85, 89, 90, 93, 96, 97, 98, 100, 104, 106, 107, 109, 110, 112, 113, 114, 116, 117, 118, 119, 120

Offset

1,3

Links

Amiram Eldar, Table of n, a(n) for n = 1..10000

Mathematica

Select[Range[0, 120], OddQ[Floor[(3/2)^#]] &] (* Jayanta Basu, Jul 03 2013 *)

Prog

(PARI) isok(k) = floor((3/2)^k) % 2; \\ Michel Marcus, May 19 2022

Crossrefs

Cf. A002379, A073633, A073634 (complement).

Sequence in context: A117346 A158648 A039078 * A066378 A125684 A207669

Adjacent sequences: A073629 A073630 A073631 * A073633 A073634 A073635

Keyword

easy,nonn

Author

Benoit Cloitre, Aug 29 2002

Extensions

a(1) = 0 inserted by Amiram Eldar, May 19 2022

Status

approved