Comment Lire et Ecrire Facilement les Données du Presse-Papiers dans R



Comment Lire et Ecrire Facilement les Données du Presse-Papiers dans R

Cet article décrit comment lire et écrire des données à partir des presse-papiers en utilisant le paquet R clipr, qui fonctionne bien sur les systèmes Windows, OS X et Unix-like.

Notez que sous Linux, vous devrez installer la configuration requise, soit xclip or xsel. Cela peut se faire, par exemple, en utilisant apt-get install xclip.



Sommaire:

Prérequis

  1. Installer à partir de CRAN
install.packages("clipr")
  1. Charger le package:
library("clipr")

Copier toute donnée dans R

my_data <- read_clip()
my_data

Copier le tableau de données à partir d’Excel et l’importer dans R

La fonction read_clip_tbl() essaiera de transformer directement le contenu du presse-papiers en data frame.

Étape 1. Copier les données d’Excel

Copier les données d’excel vers R

Étape 2. Importer les données du presse-papiers dans R

my_data <- read_clip_tbl()
my_data
## # A tibble: 11 x 6
##   name                mpg   cyl  disp    hp  drat
##   <chr>             <dbl> <int> <dbl> <int> <dbl>
## 1 Mazda RX4          21       6   160   110  3.9 
## 2 Mazda RX4 Wag      21       6   160   110  3.9 
## 3 Datsun 710         22.8     4   108    93  3.85
## 4 Hornet 4 Drive     21.4     6   258   110  3.08
## 5 Hornet Sportabout  18.7     8   360   175  3.15
## 6 Valiant            18.1     6   225   105  2.76
## # … with 5 more rows

Ecrire les données de R dans le presse-papiers

Ecrire une data frame

  1. Ecrire les données dans le presse-papiers:
write_clip(mtcars)
  1. Coller les données dans Excel: ctrl + c

Caractéristiques supplémentaires

clipr renvoie le même objet que celui qui a été passé.

res <- write_clip(c("Text", "for", "clipboard"))
res
## [1] "Text"      "for"       "clipboard"

Pour capturer la chaîne que clipr écrit dans le presse-papiers, spécifiez return_new = TRUE. Les vecteurs de caractères dont la longueur est supérieure à 1 seront regroupés avec des sauts de ligne adaptés au système, sauf indication contraire

cb <- write_clip(c("Text", "for", "clipboard"), return_new = TRUE)
cb
## [1] "Text\nfor\nclipboard"
cb <- write_clip(c("Text", "for", "clipboard"), breaks = ", ", return_new = TRUE)
cb
## [1] "Text, for, clipboard"



Version: English





No Comments

Give a comment

Want to post an issue with R? If yes, please make sure you have read this: How to Include Reproducible R Script Examples in Datanovia Comments