Example of using dput()

by

Using the iris dataset, which is handily included into R, we can see how dput() works:

data(iris)
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

Now we can get the whole dataset using dput(iris). In most situations, a whole dataset is unnecessary to provide for a Stackoverflow question, as a few lines of the relevant variables suffice as a working data example.

Two things come in handy: The head() function outputs only the first six rows of a dataframe/matrix. Also, the indexing in R (via brackets) allows you to select only specific columns.

Therefore, we can restrict the output of dput() using a combination of these two:

dput(head(iris[, c(1, 3)]))

structure(list(Sepal.Length = c(5.1, 4.9, 4.7, 4.6, 5, 5.4), 
    Petal.Length = c(1.4, 1.4, 1.3, 1.5, 1.4, 1.7)), .Names = c("Sepal.Length", 
"Petal.Length"), row.names = c(NA, 6L), class = "data.frame")

will give us the code to reproduce the first (up to) six rows of column 1 and 3 of the iris dataset.

df <- structure(list(Sepal.Length = c(5.1, 4.9, 4.7, 4.6, 5, 5.4), 
    Petal.Length = c(1.4, 1.4, 1.3, 1.5, 1.4, 1.7)), .Names = c("Sepal.Length", 
"Petal.Length"), row.names = c(NA, 6L), class = "data.frame")

> df
  Sepal.Length Petal.Length
1          5.1          1.4
2          4.9          1.4
3          4.7          1.3
4          4.6          1.5
5          5.0          1.4
6          5.4          1.7

If the first rows do not suffice, we can skip using head() and rely on indexing only:

dput(iris[1:20, c(1, 3)])

structure(list(Sepal.Length = c(5.1, 4.9, 4.7, 4.6, 5, 5.4, 4.6, 
5, 4.4, 4.9, 5.4, 4.8, 4.8, 4.3, 5.8, 5.7, 5.4, 5.1, 5.7, 5.1
), Petal.Length = c(1.4, 1.4, 1.3, 1.5, 1.4, 1.7, 1.4, 1.5, 1.4, 
1.5, 1.5, 1.6, 1.4, 1.1, 1.2, 1.5, 1.3, 1.4, 1.7, 1.5)), .Names = c("Sepal.Length", 
"Petal.Length"), row.names = c(NA, 20L), class = "data.frame")

will give us the the first twenty rows:

df <- structure(list(Sepal.Length = c(5.1, 4.9, 4.7, 4.6, 5, 5.4, 4.6, 
5, 4.4, 4.9, 5.4, 4.8, 4.8, 4.3, 5.8, 5.7, 5.4, 5.1, 5.7, 5.1
), Petal.Length = c(1.4, 1.4, 1.3, 1.5, 1.4, 1.7, 1.4, 1.5, 1.4, 
1.5, 1.5, 1.6, 1.4, 1.1, 1.2, 1.5, 1.3, 1.4, 1.7, 1.5)), .Names = c("Sepal.Length", 
"Petal.Length"), row.names = c(NA, 20L), class = "data.frame")

> df
   Sepal.Length Petal.Length
1           5.1          1.4
2           4.9          1.4
3           4.7          1.3
4           4.6          1.5
5           5.0          1.4
6           5.4          1.7
7           4.6          1.4
8           5.0          1.5
9           4.4          1.4
10          4.9          1.5
11          5.4          1.5
12          4.8          1.6
13          4.8          1.4
14          4.3          1.1
15          5.8          1.2
16          5.7          1.5
17          5.4          1.3
18          5.1          1.4
19          5.7          1.7
20          5.1          1.5

More Related Contents:

  1. Fully reproducible parallel models using caret
  2. Forecasting by ID and Product in R [closed]
  3. Reshaping multiple sets of measurement columns (wide format) into single columns (long format)
  4. Group by multiple columns and sum other multiple columns
  5. Fastest way to replace NAs in a large data.table
  6. Plot labels at ends of lines
  7. Generate list of all possible combinations of elements of vector
  8. Using functions of multiple columns in a dplyr mutate_at call
  9. Number of months between two dates
  10. How to set up conda-installed R for use with RStudio?
  11. How to combine two RMarkdown (.Rmd) files into a single output?
  12. Replace multiple strings in one gsub() or chartr() statement in R?
  13. Get values and positions to label a ggplot histogram
  14. How can I order the months chronologically in ggplot2 short of writing the months out?
  15. How to find the difference in value in every two consecutive rows in R?
  16. How to subset data in R without losing NA rows?
  17. Using grep to help subset a data frame
  18. Delete duplicate rows in two columns simultaneously [duplicate]
  19. Should I use a data.frame or a matrix?
  20. How to change the now deprecated dplyr::funs() which includes an ifelse argument?
  21. Error in new.session() : Could not establish session after 5 attempts
  22. rolling joins data.table in R
  23. Split dataframe using two columns of data and apply common transformation on list of resulting dataframes
  24. How do you read a password protected excel file into r?
  25. Error in R: (Package which is only available in source form, and may need compilation of C/C++/Fortran)
  26. ggplot: Boxplot of multiple column values [duplicate]
  27. Specify height and width of ggplot graph in Rmarkdown knitr output
  28. how to debug “factor has new levels” error for linear model and prediction [duplicate]
  29. group by two columns in ggplot2
  30. Convert latitude and longitude coordinates to country name in R

Leave a Comment