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 A122191 #13 Mar 03 2018 23:39:18 %S A122191 1,1,1,1,2,1,1,1,2,1,1,2,2,3,1,1,1,1,1,2,1,1,2,2,3,2,4,1,1,1,2,1,2,2, %T A122191 2,1,1,2,1,3,2,2,2,4,1,1,1,2,1,1,2,2,1,3,1,1,2,2,3,2,4,2,4,3,4,1,1,1, %U A122191 1,1,2,1,2,1,1,2,2,1,1,2,2,3,2,4,2,4,3,4,2,6,1,1,1,2,1,2,2,1,1,3,2,2,2,2,1 %N A122191 Triangle read by rows: T(n,m) = number of positive divisors of m that are coprime to n. %t A122191 Flatten@Table[ Count[GCD[Divisors[m], n], 1], {n, 14}, {m, n}] (* _Ray Chandler_, Aug 29 2006 *) %o A122191 (PARI) A122191(n,m) = {local(s);s=0;fordiv(m,d,s=s+(gcd(d,n)==1));s} \\ _Michael B. Porter_, Mar 01 2010 %Y A122191 Cf. A116477. %K A122191 nonn,tabl %O A122191 1,5 %A A122191 _Leroy Quet_, Aug 24 2006 %E A122191 Extended by _Ray Chandler_, Aug 29 2006