# NOT RUN {
wrapped <-
wrap_text(
"Lorem ipsum dolor sit amet, ornare justo condimentum",
"et sit lorem! Himenaeos, vel et sodales sit.",
"Eu nulla. Magna ullamcorper nascetur placerat platea.\n\n",
"Eleifend semper velit sed aliquam, ut ligula non commodo.")
cat(wrapped)
#> Lorem ipsum dolor sit amet, ornare justo condimentum et sit lorem!
#> Himenaeos, vel et sodales sit. Eu nulla. Magna ullamcorper
#> nascetur placerat platea.
#>
#> Eleifend semper velit sed aliquam, ut ligula non commodo.
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab