figure チャンクを使って図を挿入するのは記述が面倒くさい。そこで，以下のような関数を作っておき，results=tex を使って作図した結果を挿入する。 xfigure <- function(src, fn, caption="", label=fn, size=320, width=6, height=6, mgp=c(1.8, 0.6, 0),…