|
%I #18 Nov 28 2019 06:11:50
%S 1,11,26,34,43,62,111,126,134,143,162,216,223,232,261,289,298,314,322,
%T 341,368,386,413,431,449,466,494,612,621,638,646,664,683,829,836,863,
%U 892,928,944,982,1111,1126,1134,1143,1162,1216,1223,1232,1261,1289,1298
%N Numbers k such that the product of digits of k is a power of 12.
%H Alois P. Heinz, <a href="/A316315/b316315.txt">Table of n, a(n) for n = 1..64235</a>
%e 466 is in the sequence because 4*6*6 = 144 = 12^2.
%t FromDigits /@ Select[Join @@ Map[Tuples[{1, 2, 3, 4, 6, 8, 9}, #] &, Range@4], IntegerQ@Log[12, Times @@ #] &]
%Y Cf. A284375, A002275, A028846, A174813, A284323, A276037, A276038, A276039, A284324, A284295, A328560.
%K base,nonn
%O 1,2
%A _Isaac Weiss_ and _Henry Potts-Rubin_, Jun 29 2018
%E Two duplicate terms removed by _Alois P. Heinz_, Oct 20 2019
|
