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

Content added Content deleted
(Added 11l)
m (→‎{{header|Raku}}: remove redundant routine)
Line 1,295: Line 1,295:


<lang perl6>use Lingua::EN::Numbers;
<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;
my @po6 = ^Inf .map: *.exp: 6;