LyX中插入可交叉引用knitr图表的简化方法及居中设置问题

更简便的实现方案 #

你当前的操作可行，但可以大幅简化，无需手动插入浮动图片环境和单独配置标签：

• 直接在LyX需要插入图表的位置插入knitr代码块，给代码块设置唯一ID，写在chunk选项的第一部分即可，示例为<<mydotplot, echo=FALSE>>=，其中mydotplot就是块ID
• 给chunk添加fig.cap="你的图标题文本"参数，knitr会自动生成符合LyX交叉引用规则的标签，标签格式为fig:<块ID>，以上述示例为例，生成的标签就是fig:mydotplot
• 直接在LyX的交叉引用工具中选择对应标签即可完成引用，不需要额外手动插入浮动环境、配置标题和标签，也不需要单独插入ERT模块。

图表居中设置 #

只需在knitr代码块的参数中添加fig.align='center'即可实现单张图片居中，如果你需要所有knitr生成的图片默认居中，可以在文档最开头的knitr设置块中添加全局配置：

knitr::opts_chunk$set(fig.align = "center")

注意你当前代码里的windows()语句需要删除，该语句用于调用本地系统窗口显示绘图，会干扰knitr捕获绘图输出，导致无法生成图片。

修正后的示例代码 #

<<mydotplot, echo=FALSE, fig.cap="你的自定义图标题", fig.align='center'>>=
dat <- data.frame(x=rnorm(100), y1=rnorm(100)-1, y2=rnorm(100), y3=rnorm(100)+1) 
plot(y1 ~ x, data=dat, type='n', axes=FALSE, xlab="", ylab="")      
text(dat$x,dat$y1,label=round(runif(100,0,100),0),col='blue', cex = abs(rnorm(100,0,1)))
text(dat$x,dat$y2,label=round(runif(100,0,100),0),col='purple', cex = abs(rnorm(100,0,1)))
text(dat$x,dat$y3,label=round(runif(100,0,100),0),col='red', cex = abs(rnorm(100,0,1)))
@

内容的提问来源于stack exchange，提问作者Diego