A048169 n is divisible by the cube of the number of unitary divisors of n (A034444).
1, 8, 16, 32, 64, 128, 192, 256, 320, 384, 448, 512, 576, 640, 704, 768, 832, 896, 1024, 1088, 1152, 1216, 1280, 1408, 1472, 1536, 1600, 1664, 1728, 1792, 1856, 1984, 2048, 2176, 2304, 2368, 2432, 2560, 2624, 2752, 2816, 2944, 3008, 3072, 3136, 3200, 3328
Offset: 1
Keywords
Examples
a[ 54 ]=x=3968=128*31 has 4 unitary divisors: {1,3968,128,31} and the cube, 64, divides 3968: q=3968/64=62.
Links
- Amiram Eldar, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
Select[Range[3400], Divisible[#, 8^PrimeNu[#]] &] (* Amiram Eldar, Aug 05 2019 *)