Muller's Recurrence

Run Settings
LanguageRaku
Language Version
Run Command
sub rec (\y, \z) { 108 - (815-1500/y)/z } sub pt (::T) { 4, my T $z = 4.25, &rec … Inf } sub fatrat { pt FatRat() } sub rat { pt Rat() } sub flt { pt Num() } for « 1 2 7 8 14 28 39 53 1000 » -> \i { printf "%-4s | %-18s | %-17s | %s\n", i, flt[i], rat[i], fatrat[i] }
Editor Settings
Theme
Key bindings
Full width
Lines