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 A193671 #8 Jul 13 2013 12:04:14 %S A193671 1,2,3,4,5,6,7,8,9,11,12,13,15,16,17,18,19,21,23,25,27,29,30,31,32,33, %T A193671 35,37,39,41,42,43,44,45,47,49,51,52,53,54,55,56,57,59,61,64,65,66,67, %U A193671 68,69,71,72,73,75,76,77,78,79,81,83,85,87,88,89,90,91 %N A193671 Numbers such that the last of the differences of divisors is > 0. %C A193671 A187202(a(n)) > 0. %H A193671 Reinhard Zumkeller, <a href="/A193671/b193671.txt">Table of n, a(n) for n = 1..10000</a> %o A193671 (Haskell) %o A193671 import Data.List (findIndices) %o A193671 a193671 n = a193671_list !! (n-1) %o A193671 a193671_list = map (+ 1) $ findIndices (> 0) $ map a187202 [1..] %Y A193671 Cf. A187204, A193672. %K A193671 nonn %O A193671 1,2 %A A193671 _Reinhard Zumkeller_, Aug 02 2011