2015-02-09 3 views
1

Я пытаюсь прочитать суть содержащего dput от Github:Чтение dput() лог из GitHub в R

library(RCurl) 
data <- getURL("https://gist.githubusercontent.com/aronlindberg/848b8efef154d0e7fdb4/raw/5bf4bb864cc4c1db0f66da1be85515b4fa19bf6b/pull_lists") 
pull_lists <- dget(textConnection(data)) 

Это создает:

Error: '\U' used without hex digits in character string starting ""@@ -1,7 +1,9 @@ 
module ActionDispatch 
    module Http 
    module URL 
-  # Returns the complete \U" 

который я думаю, что это сообщение Ruby ошибки а не ошибка R. Теперь рассмотрим следующее:

data <- getURL("https://gist.githubusercontent.com/aronlindberg/b6b934b39e3c3378c3b2/raw/9b1efe9340c5b1c8acfdc90741260d1d554b2af0/data") 
pull_lists2 <- dget(textConnection(data)) 

Это похоже на работу. Бывший смысл довольно большой, 1.7mb. Может быть, поэтому я не могу прочитать его из Гитуба. Если нет, то почему?

+1

Вы посмотрели функцию 'source_gist()' в пакете 'devtools'? И чтобы быть понятным, вы получаете эту ошибку только с помощью вызова 'getURL'? или вы получаете данные в своей переменной «данные»? – MrFlick

+0

@MrFlick: Я попробовал 'source_gist (« https://gist.github.com/aronlindberg/b6b934b39e3c3378c3b2 »)', который должен загрузить второй принцип, который работает с моим подходом. Однако с 'source_gist()' это, похоже, не работает: 'Ошибка: нет файлов R, найденных в gist' – histelheim

ответ

2

Сущность, которую вы создали, не содержит в ней файла .R, так как pull_lists не имеет расширения. Я разветвил your gist до this one и добавил расширение. Теперь можно указать суть и сохранить ее в значении.

library("devtools") 
pull_lists <- source_gist("a7b157cec3b9259fc5d1") 
Смежные вопросы