OFFSET
0,2
COMMENTS
Row sums of number triangle A127801.
LINKS
Antti Karttunen, Table of n, a(n) for n = 0..16384
MATHEMATICA
Join[{1}, 3*Rest[Table[PadRight[{1}, 2^k, 0], {k, 0, 6}]//Flatten]] (* James C. McMahon, Jan 04 2025 *)
PROG
(Python)
def A127802(n): return 3*int(not(n&(n+1))) if n else 1 # Chai Wah Wu, Jul 06 2022
CROSSREFS
KEYWORD
nonn
AUTHOR
Paul Barry, Jan 29 2007
STATUS
approved
