6

How to make the output of dput be displayed in one line in R?

How to copy to the clipboard the string obtained with dput?

Phil
  • 7,287
  • 3
  • 36
  • 66
Julien
  • 1,613
  • 1
  • 10
  • 26

2 Answers2

5

Take dat <- head(iris) for example:

  1. Make one-line output for dput() displayed in the console:
cat(capture.output(dput(dat)), "\n", sep = "")

Output:

structure(list(Sepal.Length = c(5.1, 4.9, 4.7, 4.6, 5, 5.4),     Sepal.Width = c(3.5, 3, 3.2, 3.1, 3.6, 3.9), Petal.Length = c(1.4,     1.4, 1.3, 1.5, 1.4, 1.7), Petal.Width = c(0.2, 0.2, 0.2,     0.2, 0.2, 0.4), Species = structure(c(1L, 1L, 1L, 1L, 1L,     1L), levels = c("setosa", "versicolor", "virginica"), class = "factor")), row.names = c(NA, 6L), class = "data.frame")
  1. Copy to the clipboard (Windows only):
writeClipboard(paste(capture.output(dput(dat)), collapse = ""))
Darren Tsai
  • 32,117
  • 5
  • 21
  • 51
  • 1
    I like both the question and both answers. But I would like to know in which scenario this could be relevant? Many thanks! – TarJae Aug 17 '22 at 14:01
  • 3
    When providing the data on a Stack Overflow question, it takes less vertical space to put everything in one line – Julien Aug 17 '22 at 14:39
  • 1
    Note that it only works when `dat` is not too big – Julien Aug 26 '22 at 13:18
4

To copy paste directly the output of dput, you can use write.so with write_clip = T from the read.so package:

#devtools::install_github("alistaire47/read.so")
library(read.so)
write.so(head(iris), write_clip = TRUE)

output

iris <- data.frame(
  Sepal.Length = c(5.1, 4.9, 4.7, 4.6, 5, 5.4),
  Sepal.Width = c(3.5, 3, 3.2, 3.1, 3.6, 3.9),
  Petal.Length = c(1.4, 1.4, 1.3, 1.5, 1.4, 1.7),
  Petal.Width = c(0.2, 0.2, 0.2, 0.2, 0.2, 0.4),
  Species = structure(c(1L, 1L, 1L, 1L, 1L, 1L), .Label = c("setosa", "versicolor", "virginica"), class = "factor")
)
Maël
  • 45,206
  • 3
  • 29
  • 67