R/insertDashLine.R

In VLucet/Rdash: A RStudio Addin to insert a commented dash line into a script

insertLine <- function(dashnb) {
  # Build the dash line
  line = paste0("#", paste0(rep("-",dashnb), collapse = ""))
  # Insert the line into current script
  rstudioapi::insertText(line)
}

insertDashLine <- function(){
  insertLine(79)
}