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 A163926 #7 Jul 16 2015 21:56:46 %S A163926 1,1,3,3,6,4,10,6,8,7,16,6,22,12,11,9,30,9,38,11,17,18,48,11,26,24,20, %T A163926 14,61,13,72,18,28,32,29,13,87,40,33,18,101,17,115,25,26,50,131,19,59, %U A163926 29,44,29,151,23,47,24,52,63,171,20,189,75,40,32,55,27,211,42,66,31,232 %N A163926 Number of nonprime numbers k such that the largest divisor of n*k <= sqrt(n*k) is n. %H A163926 Reinhard Zumkeller, <a href="/A163926/b163926.txt">Table of n, a(n) for n = 1..225</a> %o A163926 (PARI) a(n)=local(r,d);r=0;for(k=n,n^2,if(!isprime(k),d=divisors(n*k);if(n==d[(#d+1)\2],r++)));r %o A163926 (Haskell) %o A163926 a163926 = length . a163925_row -- _Reinhard Zumkeller_, Mar 15 2014 %Y A163926 Row lengths of A163925. %K A163926 nonn %O A163926 1,3 %A A163926 _Franklin T. Adams-Watters_, Aug 06 2009