Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/74.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181

Warning: file_get_contents(/data/phpspider/zhask/data//catemap/7/user-interface/2.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R 创建使用Pandoc更改PDF文件中PDF页边距宽度的函数_R_Markdown_Knitr_Pandoc - Fatal编程技术网

R 创建使用Pandoc更改PDF文件中PDF页边距宽度的函数

R 创建使用Pandoc更改PDF文件中PDF页边距宽度的函数,r,markdown,knitr,pandoc,R,Markdown,Knitr,Pandoc,我正在使用Pandoc从R内将降价文档转换为PDF。Pandoc输出的PDF的默认边距太大 在这篇文章中,给出了以下代码来更改PDF的边距宽度: pandoc -V geometry:margin=1in -o output.pdf input.md 我在R中的函数中使用了这段代码 makePDF <- function(name) { library(knitr) knit(paste0(name, ".Rmd"), encoding = "utf-8") system(p

我正在使用Pandoc从R内将降价文档转换为PDF。Pandoc输出的PDF的默认边距太大

在这篇文章中,给出了以下代码来更改PDF的边距宽度:

pandoc -V geometry:margin=1in -o output.pdf input.md
我在R中的函数中使用了这段代码

makePDF <- function(name) {
  library(knitr)
  knit(paste0(name, ".Rmd"), encoding = "utf-8")
  system(paste0("pandoc -o -V geometry:margin=1in ", name, ".pdf ", name, ".md"))
}

我如何在R中创建一个函数来改变PDF的边距宽度?

您的问题是您的
paste0
构造并没有创建您想要的内容。您的错误消息也没有反映您提供的代码

name <- 'name'
paste0("pandoc -o -V geometry:margin=1in ", name, ".pdf ", name, ".md")
## [1] "pandoc -o -V geometry:margin=1in name.pdf name.md"

我知道你错过了
-o
部分,但如果你也能分享准确的错误信息,那将是一个巨大的帮助。问题现已编辑:我发布了错误,我还尝试使用-0你的错误提到了
docx
文件!你从哪里弄来的?
name <- 'name'
paste0("pandoc -o -V geometry:margin=1in ", name, ".pdf ", name, ".md")
## [1] "pandoc -o -V geometry:margin=1in name.pdf name.md"
callformat <-"pandoc -V geometry:margin=1in  %s.md -o %s.pdf"
sprintf(callformat, name,name)
## [1] "pandoc -V geometry:margin=1in  name.md -o name.pdf"