myscratchpad

# クリップボードへ
write.table(dat, "clipboard", sep="\t", row.names=FALSE, quote=FALSE)

# タブ区切りテキスト
write.table(dat, file="dattxt.txt", sep="\t", row.names=FALSE, quote=FALSE)

# タブ区切りcsv
write.csv(dat, file="datcsv.csv")

## fileのところにfile.choose() とすればダイアログで場所を選べる
write.csv(dat, file.choose())

# Excelファイルで保存
library(xlsReadWrite)
write.xls(iris, file.choose())