A219843 Rows of A219463 seen as numbers in binary representation.

0, 0, 2, 0, 14, 12, 42, 0, 254, 252, 762, 240, 3822, 3276, 10922, 0, 65534, 65532, 196602, 65520, 983022, 851916, 2817962, 65280, 16711422, 16579836, 50002682, 15790320, 250539758, 214748364, 715827882, 0, 4294967294, 4294967292, 12884901882, 4294967280

Offset: 0

Author

Reinhard Zumkeller, Nov 30 2012

Keywords

• nonn
• base

Links

• Reinhard Zumkeller, Table of n, a(n) for n = 0..1000

Programs

Haskell

a219843 = foldr (\u v-> 2*v + u) 0 . map toInteger . a219463_row

Mathematica

A219843[n_]:=FromDigits[Sign[BitAnd[Range[n],-1-n]],2];Array[A219843,50,0] (* Paolo Xausa, Aug 29 2023 *)

Python

def A219843(n): return (1<Chai Wah Wu, May 03 2023

Formula

a(n) = A000225(n+1) - A001317(n);

A000120(a(n)) = A048967(n);

a(A000225(n)) = 0.