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
KEYWORD
easy,nonn
AUTHOR
Benoit Cloitre, Aug 29 2002
EXTENSIONS
a(1) = 0 inserted by Amiram Eldar, May 19 2022
STATUS
approved