首页
学习
活动
专区
工具
TVP
发布
社区首页 >问答首页 >从github获取R脚本,用于全局会话,从包装器函数中使用?

从github获取R脚本,用于全局会话,从包装器函数中使用?
EN

Stack Overflow用户
提问于 2011-11-23 00:05:13
回答 1查看 2K关注 0票数 20

我可以在github上编写一个R脚本(使用'raw‘文本链接),如下所示:

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

然而,我真正想做的是将其封装在一个函数中。这就是我遇到问题的地方,我怀疑这与脚本的函数有关,这些函数只存在于被调用的函数中。例如,下面是我要做的事情:

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

非常感谢您的宝贵时间。

EN

回答 1

Stack Overflow用户

回答已采纳

发布于 2011-11-23 01:03:30

使用:

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

将结果放入您的默认搜索空间。当然,使用相同的名称覆盖任何其他内容。

票数 18
EN
页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接:

https://stackoverflow.com/questions/8229859

复制
相关文章

相似问题

领券
问题归档专栏文章快讯文章归档关键词归档开发者手册归档开发者手册 Section 归档