Vereinfachter dput () in R

Ich vermisse eine Möglichkeit, einer SO-Antwort Daten auf transparente Weise hinzuzufügen. Meine Erfahrung ist, dass diestructure Objekt ausdput() manchmal verwirrt unerfahrene Benutzer unnötig. Ich habe jedoch nicht die Geduld, es jedes Mal in einen einfachen Datenrahmen zu kopieren / einzufügen und möchte es automatisieren. Sowas ähnlichesdput(), aber in einer vereinfachten Version.

Sagen wir, ich habe durch Kopieren / Einfügen und einige andere HOS Daten wie diese,

Df <- data.frame(A = c(2, 2, 2, 6, 7, 8),
                 B = c("A", "G", "N", NA, "L", "L"),
                 C = c(1L, 3L, 5L, NA, NA, NA))

sieht aus wie das,

Df
#>   A    B  C
#> 1 2    A  1
#> 2 2    G  3
#> 3 2    N  5
#> 4 6 <NA> NA
#> 5 7    L NA
#> 6 8    L NA

Innerhalb einer ganzen Zahl, eines Faktors und eines numerischen Vektors

str(Df)
#> 'data.frame':    6 obs. of  3 variables:
#>  $ A: num  2 2 2 6 7 8
#>  $ B: Factor w/ 4 levels "A","G","L","N": 1 2 4 NA 3 3
#>  $ C: int  1 3 5 NA NA NA

Nun möchte ich dies auf SO teilen, aber ich habe nicht immer dieorginal&nbsp;Datenrahmen kam es aus. Meistens ichpipe()&nbsp;Es ist in der Form SO und der einzige Weg, wie ich es herausbekomme, istdput(). Mögen,

dput(Df)
#> structure(list(A = c(2, 2, 2, 6, 7, 8), B = structure(c(1L, 2L, 
#> 4L, NA, 3L, 3L), .Label = c("A", "G", "L", "N"), class = "factor"), 
#> C = c(1L, 3L, 5L, NA, NA, NA)), .Names = c("A", "B", "C"), row.names = c(NA, 
#> -6L), class = "data.frame")

aber wie gesagt oben diesestructures kann ziemlich verwirrend aussehen. Aus diesem Grund suche ich einen Weg, um zu komprimierendput()'s Ausgabe in irgendeiner Weise. Ich stelle mir eine Ausgabe vor, die ungefähr so ​​aussieht,

dput_small(Df)
#> data.frame(A = c(2, 2, 2, 6, 7, 8), B = c("A", "G", "N", NA, "L", "L"),
#> C = c(1L, 3L, 5L, NA, NA, NA))

Ist das möglich? Mir ist klar, dass es noch andere Klassen gibtlists, tbl, tbl_df, usw.