|
%I #12 Dec 05 2013 06:11:07
%S 1,3,8,14,24,48,60,72,78,112,120,144,168,192,234,248,288,336,360,384,
%T 480,504,528,576,620,672,720,840,864,960,1008,1080,1092,1152,1344,
%U 1368,1440,1584,1680,1848,1860,1872,1984,2160,2208,2304,2352,2394,2520,2688
%N Numbers n such that n=phi(x)*sigma(x) for some x<=n.
%H Donovan Johnson, <a href="/A082474/b082474.txt">Table of n, a(n) for n = 1..1000</a>
%o (PARI) isok(n) = {for (x=1, n, if (eulerphi(x)*sigma(x) == n, return (1));); return (0);} \\ _Michel Marcus_, Dec 04 2013
%K nonn
%O 1,2
%A _Benoit Cloitre_, Apr 27 2003
|
