Global oturum kullanımı için github'dan bir R komut dosyasını bir sarıcı işlevinden mi kaynaklamak istiyorsunuz? aşağıdaki gibi

Question

I ('ham' metin bağlantısını kullanarak) github düzenlenen bir R komut olabilir kaynak:

# load package 
require(RCurl) 

# check 1 
ls() 
#character(0) 

# read script lines from website 
u <- "https://raw.github.com/tonybreyal/Blog-Reference-Functions/master/R/bingSearchXScraper/bingSearchXScraper.R" 
script <- getURL(u, ssl.verifypeer = FALSE) 
eval(parse(text = script)) 

# clean-up 
rm("script", "u") 

# check 2 
ls() 
#[1] "bingSearchXScraper" 

Ancak, ne gerçekten yapmak istediğim bir işlevde olduğu kadar tamamlamayı olduğunu. Bu, problemlerle karşılaştığım ve komut dosyasındaki işlevlerin, yalnızca çağrıldığı işlev içinde yerel olarak mevcut olduğundan şüpheleniyorum. Örneğin, burada hedeflediğim bir şey var:

source_github <- function(u) { 
    # load package 
    require(RCurl) 

    # read script lines from website and evaluate 
    script <- getURL(u, ssl.verifypeer = FALSE) 
    eval(parse(text = script)) 
} 

source_github("https://raw.github.com/tonybreyal/Blog-Reference-Functions/master/R/bingSearchXScraper/bingSearchXScraper.R") 

Zaman ayırdığınız için şimdiden çok teşekkürler.

Answer 1

Kullanım:

eval(parse(text = script),envir=.GlobalEnv) 

Varsayılan arama uzaya sonuçlarını sopa. Elbette, aynı isimlere sahip başka bir şeyin üzerine yazarak.