Read Data with Header from Clipboard

Shortcut for `read_clipboard(header = TRUE)`. To read headerless data from the clipboard, use read_cp_hl.

read_cb()

See also

Other clipboard functions: copy_cb(), copy_to_clipboard(), read_cb_hl(), read_cb_trbl(), read_clipboard()

Examples

library(tidyverse)

# Test Data
test_data <-
        tibble(A = 1:3,
               B = c("Apples", "Bananas", "Oranges"),
               C = factor(c("Apples", "Bananas", "Oranges")),
               D = runif(3))


# Copy to Clipboard
copy_cb(data = test_data)

# Read Clipboard
read_cb()
#>   A       B       C           D
#> 1 1  Apples  Apples 0.157208442
#> 2 2 Bananas Bananas 0.007399441
#> 3 3 Oranges Oranges 0.466393497

# Check Datatypes
sapply(test_data, FUN = class)
#>           A           B           C           D 
#>   "integer" "character"    "factor"   "numeric" 
sapply(read_cb(), FUN = class) # `read_cb()` function mutates all factors to character before returning
#>           A           B           C           D 
#>   "integer" "character" "character"   "numeric" 

# Read Clipboard Shortcut for Headerless Data
read_cb_hl()
#>   V1      V2      V3                 V4
#> 1  A       B       C                  D
#> 2  1  Apples  Apples  0.157208441523835
#> 3  2 Bananas Bananas 0.0073994412086904
#> 4  3 Oranges Oranges  0.466393497306854

# Read Clipboard as a Tribble for Copy and Paste
read_cb_trbl()
#> tibble::tribble(,
#> ~A,~B,~C,~D,
#> 1, "Apples", "Apples", 0.157208441523835,
#> 2, "Bananas", "Bananas", 0.0073994412086904,
#> 3, "Oranges", "Oranges", 0.466393497306854,
#> )
read_cb_trbl(header = FALSE)
#> tibble::tribble(,
#> ~V1,~V2,~V3,~V4,
#> "A", "B", "C", "D",
#> "1", "Apples", "Apples", "0.157208441523835",
#> "2", "Bananas", "Bananas", "0.0073994412086904",
#> "3", "Oranges", "Oranges", "0.466393497306854",
#> )
read_cb_trbl(quote = "'")
#> tibble::tribble(,
#> ~A,~B,~C,~D,
#> 1, 'Apples', 'Apples', 0.157208441523835,
#> 2, 'Bananas', 'Bananas', 0.0073994412086904,
#> 3, 'Oranges', 'Oranges', 0.466393497306854,
#> )
read_cb_trbl(header = FALSE, quote = "'")
#> tibble::tribble(,
#> ~V1,~V2,~V3,~V4,
#> 'A', 'B', 'C', 'D',
#> '1', 'Apples', 'Apples', '0.157208441523835',
#> '2', 'Bananas', 'Bananas', '0.0073994412086904',
#> '3', 'Oranges', 'Oranges', '0.466393497306854',
#> )