Можно ли включить код из внешнего R-скрипта в.Rmd и одновременно запустить код, отобразить код и отобразить его результаты в выходном файле.HTML? Например, если у меня есть
x <- 1
y <- 3
z <- x + y
z
in external.R
. В выходном документе я хочу увидеть код выше вместе с результатом z
, т.е. 4. По сути, я хочу, чтобы это эквивалентно тому, что произойдет, если я скопирую/вставил то, что было выше в фрагменте R. Я хочу
'''{r}
some.library::some.function("external.R")
'''
быть эквивалентом
'''{r}
x <- 1
y <- 3
z <- x + y
z
'''
В выходном HTML файле. Я пробовал такие вещи, как knitr::read_chunk('external.R)
и source('external.R
) ', но они не отображают код. Я что-то пропустил?
РЕДАКТИРОВАТЬ
Я обнаружил, что source('external.R', echo = TRUE)
создаст то, что я прошу, но каждая строка выводимого кода/результатов добавляется в ##
. Любой способ заставить его выглядеть так, как если бы код был просто скопирован/вставлен в кусок в.Rmd?