如何将值转换为可重现的代码

Question

我知道如何手动创建可重现的代码，例如

a<-c(0,1,1,0,0,1)
b<-c("A","B","A","B","A","B")
c<-c(1,1,2,2,3,3)

但是，我想提供代码与我的实际数据（＆gt; 100行）有一种方法来复制＆＃34;将数据帧转换为代码格式而不键入单个值？ （即＆lt; -c（0,1，...代表所有值））

非常感谢！