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 A279287 #22 Jun 27 2025 17:53:03
%S A279287 1,1,1,2,2,1,3,1,2,1,5,2,6,3,2,8,8,1,9,4,3,5,11,1,20,3,9,2,14,1,15,8,
%T A279287 5,4,6,4,18,9,6,2,20,3,21,10,4,11,23,8,14,10,8,4,26,9,10,3,9,7,29,4,
%U A279287 30,15,6,32,12,5,33,16,11,3,35,2,36,9,20,6,15,3
%N A279287 a(n) = numerator of (phi(n)/tau(n)).
%C A279287 a(n) = numerator of (A000010(n)/A000005(n)).
%C A279287 See A279288 (denominator of (phi(n)/tau(n))) and A063070 (phi(n)-tau(n)).
%C A279287 a(n) = 1 and A279288(n) = 1 for numbers n in A020488; a(n) > A279288(n) for numbers n in A279289.
%H A279287 Jaroslav Krizek, <a href="/A279287/b279287.txt">Table of n, a(n) for n = 1..1000</a>
%e A279287 For n = 6: phi(6)/tau(6) = 2/4 = 1/2; a(6) = 1.
%p A279287 with(numtheory): A279287:=n->numer(phi(n)/sigma(n)): seq(A279287(n), n=1..150); # _Wesley Ivan Hurt_, Dec 11 2016
%t A279287 Table[Numerator[EulerPhi[n]/DivisorSigma[0, n]], {n, 78}] (* _Michael De Vlieger_, Dec 09 2016 *)
%o A279287 (Magma) [Numerator(EulerPhi(n)/NumberOfDivisors(n)): n in[1..1000]];
%o A279287 (PARI) a(n) = numerator(eulerphi(n)/numdiv(n)) \\ _Felix Fröhlich_, Dec 09 2016
%Y A279287 Cf. A000005, A000010, A020488, A020490, A020491, A063070, A279288, A279289.
%K A279287 nonn,frac
%O A279287 1,4
%A A279287 _Jaroslav Krizek_, Dec 09 2016