Skip to main content
Code Golf

Return to Answer

deleted 3 characters in body
Source Link
Galen Ivanov
Galen Ivanov
  • 21.2k
  • 3
  • 24
  • 61

Red, 141 111112 bytes

func[n][until[s: collect[loopcopy""loop n[keepn[append s random/only"LRK"]]parseonly"LRK"]parse
rejoin[s s][any[copy t skip opt t ahead not t]]]s]

Try it online!Try it online!

Red, 141 111 bytes

func[n][until[s: collect[loop n[keep random/only"LRK"]]parse
rejoin[s s][any[copy t skip opt t ahead not t]]]s]

Try it online!

Red, 141 112 bytes

func[n][until[s: copy""loop n[append s random/only"LRK"]parse
rejoin[s s][any[copy t skip opt t ahead not t]]]s]

Try it online!

added 3 characters in body
Source Link
Galen Ivanov
Galen Ivanov
  • 21.2k
  • 3
  • 24
  • 61

Red, 141 112111 bytes

func[n][until[s: copy""loop n[appendcollect[loop sn[keep random/only"LRK"]parseonly"LRK"]]parse
rejoin[s s][any[copy t skip opt t ahead not t]]]s]

Try it online!Try it online!

Red, 141 112 bytes

func[n][until[s: copy""loop n[append s random/only"LRK"]parse
rejoin[s s][any[copy t skip opt t ahead not t]]]s]

Try it online!

Red, 141 111 bytes

func[n][until[s: collect[loop n[keep random/only"LRK"]]parse
rejoin[s s][any[copy t skip opt t ahead not t]]]s]

Try it online!

deleted 44 characters in body
Source Link
Galen Ivanov
Galen Ivanov
  • 21.2k
  • 3
  • 24
  • 61

Red, 141141 112 bytes

func[n][until[s: copy""loop n[append/dup s
  random/only"LRK"random 2]clear at s n + 1only"LRK"]parse
parse rejoin[s s][any[copy t skip opt t ahead not t]]]s]

Try it online!Try it online!

Red, 141 bytes

func[n][until[s: copy""loop n[append/dup s
 random/only"LRK"random 2]clear at s n + 1
parse rejoin[s s][any[copy t skip opt t ahead not t]]]s]

Try it online!

Red, 141 112 bytes

func[n][until[s: copy""loop n[append s random/only"LRK"]parse
rejoin[s s][any[copy t skip opt t ahead not t]]]s]

Try it online!

Source Link
Galen Ivanov
Galen Ivanov
  • 21.2k
  • 3
  • 24
  • 61