cp's OEIS Frontend

A334594 Irregular table read by rows: T(n,k) is the binary interpretation of the k-th row of the XOR-triangle with first row generated from the binary expansion of n. 1 <= k <= A070939(n).

%I A334594 #23 May 09 2020 00:51:38
%S A334594 1,2,1,3,0,4,2,1,5,3,0,6,1,1,7,0,0,8,4,2,1,9,5,3,0,10,7,0,0,11,6,1,1,
%T A334594 12,2,3,0,13,3,2,1,14,1,1,1,15,0,0,0,16,8,4,2,1,17,9,5,3,0,18,11,6,1,
%U A334594 1,19,10,7,0,0,20,14,1,1,1,21,15,0,0,0
%N A334594 Irregular table read by rows: T(n,k) is the binary interpretation of the k-th row of the XOR-triangle with first row generated from the binary expansion of n. 1 <= k <= A070939(n).
%C A334594 An XOR-triangle is an inverted 0-1 triangle formed by choosing a top row and having each entry in the subsequent rows be the XOR of the two values above it.
%C A334594 The second column is A038554.
%H A334594 Peter Kagey, <a href="/A334594/b334594.txt">Table of n, a(n) for n = 1..9217</a> (first 1023 rows)
%H A334594 MathOverflow user DSM, <a href="https://mathoverflow.net/q/359138/104733">Number triangle</a>
%H A334594 <a href="/index/Bi#binary">Index entries for sequences related to binary expansion of n</a>
%e A334594 Table begins:
%e A334594    1;
%e A334594    2, 1;
%e A334594    3, 0;
%e A334594    4, 2, 1;
%e A334594    5, 3, 0;
%e A334594    6, 1, 1;
%e A334594    7, 0, 0;
%e A334594    8, 4, 2, 1;
%e A334594    9, 5, 3, 0;
%e A334594   10, 7, 0, 0;
%e A334594   11, 6, 1, 1;
%e A334594 For the 11th row, the binary expansion of 11 is 1011_2, and the corresponding XOR-triangle is
%e A334594   1 0 1 1
%e A334594    1 1 0
%e A334594     0 1
%e A334594      1
%e A334594 Reading the rows of this triangle in binary gives 11, 6, 1, 1.
%t A334594 Array[Prepend[FromDigits[#, 2] & /@ #2, #1] & @@ {#, Rest@ NestWhileList[Map[BitXor @@ # &, Partition[#, 2, 1]] &, IntegerDigits[#, 2], Length@ # > 1 &]} &, 21] // Flatten (* _Michael De Vlieger_, May 08 2020 *)
%o A334594 (PARI) row(n) = {my(b=binary(n), v=vector(#b)); v[1] = n; for (n=1, #b-1, b = vector(#b-1, k, bitxor(b[k], b[k+1])); v[n+1] = fromdigits(b, 2);); v;} \\ _Michel Marcus_, May 08 2020
%Y A334594 Cf. A038554, A070939.
%Y A334594 Cf. A334556, A334591, A334592, A334593, A334595, A334596.
%K A334594 nonn,base,tabf,look
%O A334594 1,2
%A A334594 _Peter Kagey_, May 07 2020