cat(autoline("This is a long text that may not fit into a single line", 8))
text <- factor(c("First value", "Second value", "First value"),
levels = c("First value", "Second value")
)
autoline(text, 1)
path <- file.path(R.home("doc"), "THANKS")
text <- paste(readLines(path), collapse = " ")
cat(autoline(text))
Run the code above in your browser using DataLab