A249184 A249183 seen as binary numbers.
1, 7, 27, 119, 427, 1799, 6939, 30583, 109227, 458759, 1769499, 7798903, 27984299, 117901063, 454761243, 2004318071, 7158278827, 30064771079, 115964117019, 511101108343, 1833951035819, 7726646167303, 29802778073883, 131352984844151, 469126392949419
Offset: 0
Keywords
Links
- Reinhard Zumkeller, Table of n, a(n) for n = 0..1000
Programs
-
Haskell
a249184 = foldr (\b v -> 2 * v + b) 0 . a249133_row
-
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 *)
Comments