%I #13 Sep 12 2024 10:47:32
%S 1,2,3,6,4,9,12,18,36,8,24,27,54,72,108,216,16,48,81,144,162,324,432,
%T 648,1296,32,96,243,288,486,864,972,1944,2592,3888,7776,64,192,576,
%U 729,1458,1728,2916,5184,5832,11664,15552,23328,46656,128,384,1152,2187
%N Triangle of divisors of 6^n, each number occurring once.
%H T. D. Noe, <a href="/A194357/b194357.txt">Rows for n = 0..100</a>
%e The triangle has rows beginning with 2^k and ending with 6^k:
%e 1
%e 2, 3, 6
%e 4, 9, 12, 18, 36
%e 8, 24, 27, 54, 72, 108, 216
%e 16, 48, 81, 144, 162, 324, 432, 648, 1296
%t Join[{{1}}, Table[Complement[Divisors[6^n], Divisors[6^(n-1)]], {n, 9}]]
%t DeleteDuplicates[Flatten[Divisors[6^Range[0,10]]]] (* _Harvey P. Dale_, Sep 12 2024 *)
%Y Cf. A194356 (divisors of 10^n), A194358 (divisors of 30^n).
%Y Cf. A003586 (3-smooth numbers).
%K nonn,tabf,changed
%O 0,2
%A _T. D. Noe_, Aug 25 2011