This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A174793 #20 Sep 01 2023 20:17:48
%S A174793 0,0,0,0,1,1,0,0,0,0,0,1,1,1,1,0,0,0,2,0,2,0,1,1,3,1,3,1,0,0,0,0,0,0,
%T A174793 0,0,0,1,1,1,1,1,1,1,1,0,0,0,2,0,2,0,2,2,2,0,1,1,3,1,3,1,3,3,3,1,0,0,
%U A174793 0,0,0,0,0,4,0,0,0,4,0,1,1,1,1,1,1,5,1,1,1,5,1,0,0,0,2,0,2,0,6,2,2,0,6,0,2
%N A174793 Triangle read by rows: R(n,k) = n mod 2^Omega(k), where Omega( ) is number of prime divisors counted with multiplicity and 1 <= k <= n.
%e A174793 Triangle begins
%e A174793 0;
%e A174793 0, 0;
%e A174793 0, 1, 1;
%e A174793 0, 0, 0, 0;
%e A174793 0, 1, 1, 1, 1;
%e A174793 0, 0, 0, 2, 0, 2;
%t A174793 Omega[n_] := If[n<2, 0, Plus@@Transpose[FactorInteger[n]][[2]]]; Flatten[Table[Mod[n, 2^Omega[k]], {n, 15}, {k, n}]]
%Y A174793 Cf. A001222, A174624.
%K A174793 nonn,tabl
%O A174793 1,19
%A A174793 _Juri-Stepan Gerasimov_, Nov 30 2010