OFFSET
0,2
COMMENTS
Appears to be basically the same as A048711. - R. J. Mathar, Nov 16 2014
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 0..1000
FORMULA
MATHEMATICA
a[n_] := FromDigits[Mod[Riffle[Binomial[n, Range[0, n]], Binomial[n - 1, Range[0, n - 1]]], 2], 2]; Array[a, 25, 0] (* Amiram Eldar, Jul 28 2023 *)
PROG
(Haskell)
a249184 = foldr (\b v -> 2 * v + b) 0 . a249133_row
CROSSREFS
KEYWORD
nonn
AUTHOR
Reinhard Zumkeller, Nov 14 2014
STATUS
approved