Загрузка dput в R с помощью сценария

При создании воспроизводимый пример, который я часто требуется выводить data.frame или аналогичный с использованием put():Загрузка dput в R с помощью сценария

my_data <- structure(list(pr_id = c("X1626", "X1689", "X1818", "X2044", 
"X1572"), t1 = c("PID", "WRC", "PID", "PID", "PID"), t2 = c("PRO", 
"DEC", "ECV", "PRO", "PRO"), t3 = c("REF", "", "ECV", "SMK", 
"REF"), t4 = c("ECV", "", "ECV", "SMK", "SMK"), t5 = c("SMK", 
"", "ECV", "ECV", "SMK"), t6 = c("SMK", "", "SMK", "", "TEA"), 
t7 = c("DEC", "", "DEC", "", "SMK"), t8 = c("", "", "REF", 
"", "SMK"), t9 = c("", "", "SMK", "", "TEA"), t10 = c("", 
"", "", "", "SMK"), t11 = c("", "", "", "", "SMK"), t12 = c("", 
"", "", "", "SMK"), t13 = c("", "", "", "", "SMK"), t14 = c("", 
"", "", "", "DEC")), .Names = c("pr_id", "t1", "t2", "t3", 
"t4", "t5", "t6", "t7", "t8", "t9", "t10", "t11", "t12", "t13", 
"t14"), row.names = c(NA, 5L), class = "data.frame")

Однако, когда я пытаюсь загрузить данные, которые он просит меня для файла :

my_data_loaded <- dget(my_data) 

Error in parse(file = file, keep.source = keep.source) : 
    'file' must be a character string or connection

Как я могу легко создать dput, а затем загрузить его снова, чтобы создать сценарий, который является воспроизводимым пример? Я хочу избежать сохранения его как файла и просто запустить все как скрипт.

источник

2015-08-24 histelheim

'my_data' - это уже тот объект, который вы пытаетесь загрузить. Если вы хотите сохранить что-то в качестве файла и загрузить его (не как активный объект R), вы можете выполнить 'save (my_data," my_data.rdata ")' и 'load (" my_data.rdata ")' –

.. .или, чтобы использовать 'dput' и' dget', нужно было бы следовать документации и фактически использовать 'dput' для отправки объекта в файл, а не в объект в вашей рабочей области. – joran

Вы слишком усложняете ситуацию - см. Справку и пример для dput().

Его выпуск должен быть скопирован на новое задание. Это может быть так просто:

R> ## let us create an object x 
R> x <- c(a=1.23, b=42.3) 
R> x 
    a  b 
1.23 42.30 
R> dput(x) 
structure(c(1.23, 42.3), .Names = c("a", "b")) 
R> 
R> ## now use the dput() output in an assignment 
R> y <- structure(c(1.23, 42.3), .Names = c("a", "b")) 
R> 
R> ## and lo and behold: 
R> identical(x, y) 
[1] TRUE 
R>

источник

2015-08-26 01:45:43

Загрузка dput в R с помощью сценария

ответ

Смежные вопросы