代码，我必须明确取消=IFERROR(INDEX(Sheet1!$A$2:$D$11, SMALL(IF((INDEX(Sheet1!$A$2:$D$11, ,2, 1)>0), MATCH(ROW(Sheet1!$A$2:$D$11), ROW(Sheet1!$A$2:$D$11)), ""), ROWS(Sheet1!A2:$A$2)), , 1),"")
以使用RStudio将一个页面输出到文件系统中，但无法在文件系统目标上获得两个页面
pdf RStudio中的输出：一页
Rscript输出：两页
预期输出：两页
在没有错误的所有地方提示输出
library("ggplot2")
library("datasets")
options(device="pdf") # https://stackoverflow.com/questions/6535927/how-do-i-prevent-rplots-pdf-from-being-generated
filename.pdf <- paste0(getwd(), "/", "Rplots", ".pdf", sep = "")
pdf(file=filename.pdf)
data(iris)
plot(iris)
dat.m <- data("mtcars")
print(head(dat.m))
ggplot(data=mtcars, aes(x=mpg, y=hp, colour=factor(cyl))) + geom_line() # https://stackoverflow.com/a/38278702/54964
# TODO Output nothing so wrong!
print(getwd())
print(warnings())
dev.off() # nenecssary with RStudio