login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A279289
Numbers n such that phi(n) > tau(n).
5
5, 7, 9, 11, 13, 14, 15, 16, 17, 19, 20, 21, 22, 23, 25, 26, 27, 28, 29, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77
OFFSET
1,1
COMMENTS
Numbers n such that A000010(n) > A000005(n).
There are 11 numbers n such that phi(n) <= tau(n) and 7 numbers n such that phi(n) = tau(n); see A020490 and A020488.
For n >= 31; phi(n) - tau(n) >= 1, see A063070.
FORMULA
a(n) = n + 11 for n >= 20.
EXAMPLE
14 is a term because phi(14) = 6 > tau(14) = 4.
MATHEMATICA
Select[Range@ 77, EulerPhi@ # > DivisorSigma[0, #] &] (* Michael De Vlieger, Dec 11 2016 *)
PROG
(Magma) [n: n in[1..1000] | EulerPhi(n) gt NumberOfDivisors(n)]
(PARI) is(n) = eulerphi(n) > numdiv(n) \\ Felix Fröhlich, Dec 09 2016
(PARI) a(n)=if(n<20, select(k -> eulerphi(k)>numdiv(k), [5..29])[n], n+11) \\ Charles R Greathouse IV, Dec 16 2016
CROSSREFS
KEYWORD
nonn
AUTHOR
Jaroslav Krizek, Dec 09 2016
STATUS
approved