### R代码从vignette源的LatexStyle2。Rnw ' ################################################### ### 代码块1号:风格 ################################################### BiocStyle:乳胶 () ################################################### ### 代码块2号:无花果 ################################################### 票面价值(mar = c(4 4、0.5、0.5))(汽车 ) ################################################### ### 代码块3号:widefig ################################################### 票面价值(mar = c(4 4、0.5、0.5))(汽车 ) ################################################### ### 代码块数量4:smallfig ################################################### 票面价值(mar = c(4 4、0.5、0.5))(汽车 ) ################################################### ### 代码块5号:squarefig ################################################### 票面价值(mar = c(4 4、0.5、0.5))(汽车 ) ################################################### ### 代码块6号:figureexample ################################################### 票面价值(mar = c(4 4、0.5、0.5))v = seq(0 60我长度= 1000)情节(abs (v) * exp (v),类型=“l”,上校= "宝蓝色 ") ################################################### ### 代码块7号:sessionInfo ################################################### toLatex (sessionInfo ()) ################################################### ### 代码块8号:latexPkgs ################################################### bioconductor。猪圈= readline (BiocStyle::: bioconductor.sty)模式= " ^ \ \ \ \ RequirePackage (\\[.*\\])?\\{([[: alnum:]] +) \ \}。*" PKGS = sub(模式，"\\2"，grep(模式，生物导体。sty, value = TRUE)) #添加未被regex捕获的hyperref pkgs = c(pkgs， "hyperref") #列出已排序且唯一的名称pkgs = sort(unique(pkgs)) latexpkgs = paste0("\\\\latex{"， pkgs， "}"， collapse="， ")