|
%I #21 Aug 07 2019 04:59:58
%S 1,625,6561,21952,32768,64000,98304,117649,163840,229376,360448,
%T 425984,557056,622592,753664,950272,1015808,1212416,1343488,1362944,
%U 1409024,1540096,1736704,1933312,1998848,2195456,2326528,2392064,2588672
%N Numbers k such that d(k)^3 divides k.
%C Proper subset of both A033950 and A046754. If two terms in the sequence are coprime then their product is also in the sequence.
%H Amiram Eldar, <a href="/A046755/b046755.txt">Table of n, a(n) for n = 1..10000</a> (terms 1..1000 from Donovan Johnson)
%e If k = 21952, d(k) = sigma(0,k) = 28. Its 3rd power is 21952, which divides k.
%e a(103) = 14385152 = (2^15)*439 with 32 divisors and 14385152/(32^3) = 439; 2^15*prime is a typical form of terms in the sequence that have 32 divisors.
%t Select[ Range[ 1, 14500000 ], IntegerQ[ #/(DivisorSigma[ 0, # ])^3 ]& ]
%Y Cf. A033950, A046754, A046756.
%K nonn
%O 1,2
%A _Labos Elemer_
|
