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”).
%I #44 May 31 2024 05:50:50
%S 20,36,60,100,300
%N Numbers k such that tau(k) and phi(k) are the legs of a Pythagorean triple.
%C The sequence is finite since for all large enough n, we have tau(n) < n^(1/4) and phi(n) > n^(3/4) while, if x < y are the legs of a Pythagorean triangle, we always have y < x^2/2. - _Giovanni Resta_, Jul 27 2019
%C From Resta's inequality it can be deduced that phi(n) <= 2304. Then it's easy to see that the sequence is full. - _Max Alekseyev_, May 30 2024
%e 60 is in this sequence because tau(60) = 12 and phi(60) = 16, legs of the Pythagorean triple {12, 16, 20} (12^2 + 16^2 = 20^2).
%t Select[Range[300], IntegerQ@Sqrt[DivisorSigma[0, #]^2 + EulerPhi[#]^2] &] (* _Amiram Eldar_, Jul 26 2019 *)
%o (PARI) for(i = 1, 2000, a = eulerphi(i); b = numdiv(i); if(issquare(a^2 + b^2), print1(i,", ")))
%Y Cf. A000005, A000010, A020488, A062516, A063469, A063470, A112954.
%K nonn,fini,full
%O 1,1
%A _Antonio Roldán_, Jul 14 2019
%E "full" keyword added by _Max Alekseyev_, May 30 2024