R/paste.table.r

In AndreasFischer1985/TAMirt: Software package for building, analyzing and plotting models from the TAM (Test Analysis Modules) package.

#' Function paste.table
#' 
#' Returns a table from the clipboard.
#' @export


paste.table <- function (head = F) 
{
    f <- file(description = "clipboard", open = "r")
    df <- read.table(f, sep = "\t", header = head)
    close(f)
    return(data.frame(df))
}