數據的輸出
writeClipboard()函數
writeClipboard()函數可以將數據輸出至剪貼板。
例如,將R的內置數據集iris輸出到剪貼板,在進入Excel中點擊"粘貼"。
head(iris) #查看數據集Sepal.Length Sepal.Width Petal.Length Petal.Width Species
1 5.1 3.5 1.4 0.2 setosa
2 4.9 3.0 1.4 0.2 setosa
3 4.7 3.2 1.3 0.2 setosa
4 4.6 3.1 1.5 0.2 setosa
5 5.0 3.6 1.4 0.2 setosa
6 5.4 3.9 1.7 0.4 setosa
由于writeClipboard()函數輸出的是字符串向量,不能直接將數據框輸出的剪貼板。所以可以每次輸出iris數據集的一列數據。
首先輸出花萼長度的數據。
writeClipboard(as.character(iris$Sepal.Length)) #首先輸出花萼長度的數據#使用as.character()轉化為字符串向量
?運行程序后,打開Excel粘貼數據,以下為前10個數據。
?類似的操作,將剩余的數據粘貼到Excel中。
writeClipboard(as.character(iris$Sepal.Width)) #輸出花萼寬度的數據,粘貼到Excel中
writeClipboard(as.character(iris$Petal.Length)) #輸出花瓣長度的數據,粘貼到Excel中
writeClipboard(as.character(iris$Petal.Width)) #輸出花瓣寬度的數據,粘貼到Excel中
writeClipboard(as.character(iris$Species)) #輸出花瓣種類的數據,粘貼到Excel中
?結果如下所示,輸出結果展示前10個數據。
將列名粘貼到Excel中。
writeClipboard(as.character(names(iris))) #輸出列名,粘貼到Excel
最后進行調整,在第1行插入新的一行,將列名轉置粘貼到第一行。?