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 A174479 #9 Jun 28 2024 21:10:33 %S A174479 0,0,0,1,0,0,0,1,0,2,0,2,0,2,0,1,0,0,3,0,3,1,0,0,1,0,3,0,0,1,0,2,0,4, %T A174479 0,1,1,1,0,1,0,1,0,1,0,0,2,0,2,0,2,0,2,0,5,1,0,0,1,0,3,0,0,0,5,0,0,1, %U A174479 0,2,0,4,0,1,0,6,0,0,1,2,0,3,0,5,0,2,0,0,0,0,2 %N A174479 Triangle read by rows: T(n,k) = semiprime(n) mod A065516(k), where A065516 are differences between consecutive semiprimes. %e A174479 The triangle starts in row n=1 with columns 1 <= k <= n: %e A174479 0; %e A174479 0, 0; %e A174479 1, 0, 0; %e A174479 0, 1, 0, 2; %e A174479 0, 2, 0, 2, 0; %e A174479 1, 0, 0, 3, 0, 3; %p A174479 A001358 := proc(n) if n= 1 then 4; else for a from procname(n-1)+1 do if numtheory[bigomega](a) = 2 then return a; end if; end do; end if; end proc: %p A174479 A065516 := proc(n) A001358(n+1)-A001358(n) ;end proc: %p A174479 A174479 := proc(n,k) A001358(n) mod A065516(k) ; end proc: %Y A174479 Cf. A001358, A174433. %K A174479 nonn,easy,tabl %O A174479 1,10 %A A174479 _Juri-Stepan Gerasimov_, Nov 28 2010