10 PRINT in R

Currently I’m reading 10 PRINT, “a book about a one-line Commodore 64 BASIC program.” I covered the program using R.
repeat cat(ifelse(round(runif(1)),"╱","╲"))
You will need a terminal with Unicode support in order to replicate the output.
cc-by Jonas Schöley