Smallest power of 6 whose decimal expansion contains n: Difference between revisions

m
→‎{{header|Raku}}: remove redundant routine
(Added 11l)
m (→‎{{header|Raku}}: remove redundant routine)
Line 1,295:
 
<lang perl6>use Lingua::EN::Numbers;
 
sub super ($n) { $n.trans(<0 1 2 3 4 5 6 7 8 9> => <⁰ ¹ ² ³ ⁴ ⁵ ⁶ ⁷ ⁸ ⁹>) }
 
my @po6 = ^Inf .map: *.exp: 6;
10,327

edits