## Copies to Clipboard a time stamp with NO SECONDS
##    eg:  20140227_0749

frmt <- "%Y%m%d_%H%M"
ts   <- format(Sys.time(), format=frmt)


con <- pipe("pbcopy", "w")
ret <- writeLines(ts, con, sep="")
close(con)
invisible(ret)