为了账号安全,请及时绑定邮箱和手机立即绑定

使用dput()的示例

/ 猿问

使用dput()的示例

茅侃侃 2019-10-21 14:26:57

作为这里的新用户,我的问题由于不可复制而无法得到完全回答。我读了有关产生可复制代码的线程,但还是有用。专门介绍了如何使用dput()函数。


有人可以一步一步地说明如何使用虹膜df使用dput(),例如,这将非常有帮助。


查看完整描述

2 回答

?
哈士奇WWW

iris使用方便地包含在中的数据集,R我们可以看到dput()工作原理:


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

现在我们可以使用来获取整个数据集dput(iris)。在大多数情况下,不需要整个数据集来提供Stackoverflow问题,因为几行相关变量足以作为工作数据示例。


有两件事很方便:该head()函数仅输出数据帧/矩阵的前六行。此外,R(通过方括号)中的索引允许您仅选择特定的列。


因此,我们可以限制dput()使用以下两者的组合的输出:


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")

将为我们提供代码以重现iris数据集第1列和第3列的第一行(最多六行)。


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

如果前几行不够用,我们可以跳过使用,head()而仅依靠索引:


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")

将给我们前二十行:


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


查看完整回答
反对 回复 2019-10-21
?
牧羊人nacy

我仍然不确定,如果要将MWE发布到stackoverflow中,该怎么办。应该只复制并粘贴'structure()'中的内容

查看完整回答
反对 回复 2019-10-21

添加回答

回复

举报

0/150
提交
取消
意见反馈 帮助中心 APP下载
官方微信