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 A054010 #13 Oct 27 2023 22:00:46
%S A054010 2,3,4,5,6,7,11,13,15,16,17,19,20,21,23,27,29,31,33,37,39,41,42,43,45,
%T A054010 47,50,51,53,56,57,59,61,67,69,70,71,73,75,79,83,87,89,93,97,101,103,
%U A054010 105,107,109,111,113,120,123,127,129,131,132,137,139,141,149,151,154
%N A054010 Numbers n with property that n is divisible by the number of its proper divisors.
%C A054010 All primes are in this sequence, having only one proper divisor. The specifically nonprime members of this sequence are in A055719. - _Carl R. White_, Jul 11 2012
%H A054010 Carl R. White, <a href="/A054010/b054010.txt">Table of n, a(n) for n = 1..10000</a>
%F A054010 Numbers n such that A054009(n) = 0.
%e A054010 There are three proper divisors of 6, {1, 2, 3}, 6 is divisible by 3.
%p A054010 [seq(`if`(i mod (tau(i)-1) = 0,i,print( )), i=2..190)];
%t A054010 Select[Range[2, 100], IntegerQ[ #/(-1+DivisorSigma[0, # ])]&] (* _Wouter Meeussen_, Jun 07 2005 *)
%Y A054010 Cf. A032741, A033950, A054009, A055719.
%K A054010 nonn
%O A054010 1,1
%A A054010 _Asher Auel_, Jan 12 2000