0

source_urlGitHub からいくつかの関数をロードするために、この呼び出しをベクトル化しようとしています。

library(devtools)
# Find ggnet functions.
fun = c("ggnet.R", "functions.R")
fun = paste0("https://raw.github.com/briatte/ggnet/master/", fun)
# Load ggnet functions.
source_url(fun[1], prompt = FALSE)
source_url(fun[2], prompt = FALSE)

最後の 2 行は 1 回の呼び出しで機能するはずですlapplyが、何らかの理由で、これは Knitr からは機能しません。Rmdドキュメントを HTML に処理するときにこのコードを機能させるには、source_url2 回呼び出す必要があります。

同じエラーがsource_urlfromdevtoolsとfrom で表示されdownloaderます: somehwere in my code, an object of type closureis not subsettable.

これは SHA と関係があると思われます。どんな説明でも大歓迎です。

4

1 に答える 1

1

knitrまたはdevtoolsまたはベクトル化とは関係ありません。これはあなたの (?) コードの単なるエラーであり、 を使用して見つけるのはかなり簡単traceback()です。

> library(devtools)
> # Find ggnet functions.
> fun = c("ggnet.R", "functions.R")
> fun = paste0("https://raw.github.com/briatte/ggnet/master/", fun)
> # Load ggnet functions.
> source_url(fun[1], prompt = FALSE)
SHA-1 hash of file is 2c731cbdf4a670170fb5298f7870c93677e95c7b
> source_url(fun[2], prompt = FALSE)
SHA-1 hash of file is d7d466413f9ddddc1d71982dada34e291454efcb
Error in df$Source : object of type 'closure' is not subsettable
> traceback()
7: which(df$Source == x) at file34af6f0b0be5#14
6: who.is.followed.by(df, "JacquesBompard") at file34af6f0b0be5#19
5: eval(expr, envir, enclos)
4: eval(ei, envir)
3: withVisible(eval(ei, envir))
2: source(temp_file, ...)
1: source_url(fun[2], prompt = FALSE)

dfコードで使用したdf、パッケージ内の関数ですstats(F 分布の密度)。おそらくデータフレームを意味していることは知っていますが、コードでそれを宣言していません。

于 2013-06-20T08:21:27.377 に答える