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

Author

Benoit Cloitre, Aug 29 2002

Keywords

• easy
• nonn

Links

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

Crossrefs

Cf. A002379, A073633, A073634 (complement).

Programs

Mathematica

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

PARI

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

Extensions

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