#!/usr/bin/env /friends/.rakudobrew/bin/perl6
use v6;
my $log2 = log(2);
for 0..20 {
    say sprintf "%%.%dg:\t%.{$_}g", $_, $log2;
}