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 A112588 #15 Feb 16 2025 08:32:59 %S A112588 7,11,13,17,19,21,22,23,25,26,27,29,31,32,33,34,35,37,38,39,41,43,44, %T A112588 45,46,47,49,50,51,52,53,54,55,56,57,58,59,61,62,63,64,65,66,67,68,69, %U A112588 70,71,73,74,75,76,77,78,79,80,81,82,83,85,86,87,88,89,91,92,93,94,95,96 %N A112588 Numbers m such that phi(m) > 2*tau(m), where phi = A000010 and tau = A000005. %C A112588 Complement of A112587. %H A112588 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/TotientFunction.html">Totient Function</a> %H A112588 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/DivisorFunction.html">Divisor Function</a> %F A112588 a(n) = n + 27 for n >= 94. - _Jianing Song_, Jul 28 2018 %t A112588 Select[Range[96], EulerPhi[#]>2DivisorSigma[0,#]&] (* _James C. McMahon_, Jun 04 2024 *) %Y A112588 Cf. A000005, A000010, A112587. %K A112588 nonn %O A112588 1,1 %A A112588 _Reinhard Zumkeller_, Sep 14 2005