## Not run:
# text <- "Write to clipboard"
# write_clip(text)
#
# multiline <- c("Write", "to", "clipboard")
# write_clip(multiline)
# # Write
# # to
# # clipboard
#
# write_clip(multiline, breaks = ",")
# # write,to,clipboard
#
# tbl <- data.frame(a=c(1,2,3), b=c(4,5,6))
# write_clip(tbl)
# ## End(Not run)
Run the code above in your browser using DataLab