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 A077164 #13 Oct 06 2018 19:51:30 %S A077164 2,3,5,7,8,10,11,13,15,17,18,19,21,22,23,25,29,31,35,37,41,43,44,45, %T A077164 46,47,48,50,51,53,55,57,59,61,63,65,67,68,70,71,73,74,76,77,79,81,83, %U A077164 87,89,91,93,97,99,101,103,104,105,106,107,108,109,111,112,113,114,115,119 %N A077164 Triangle in which n-th row gives n numbers relatively prime to n and greater than all earlier terms in the triangle. %F A077164 a(n) = A071977(n) for n>1. - _Georg Fischer_, Oct 06 2018 %e A077164 Triangle begins %e A077164 2; %e A077164 3, 5; %e A077164 7, 8, 10; %e A077164 11, 13, 15, 17; %e A077164 18, 19, 21, 22, 23; %e A077164 ... %p A077164 b[1,1]:=2:r:=3:for n from 2 to 15 do for i from 1 to n do while(gcd(r,n)>1) do r:=r+1:od:b[i,n]:=r:r:=r+1:od:od:seq( seq(b[k,j],k=1..j),j=1..15); # _Sascha Kurz_, May 09 2004 %Y A077164 Cf. A077165, A077166, A077167. %K A077164 nonn,tabl %O A077164 1,1 %A A077164 _Amarnath Murthy_, Oct 31 2002 %E A077164 Corrected and extended by _Sascha Kurz_, May 09 2004