两张图表 - 同一页?(R/LaTeX)

两张图表 - 同一页?(R/LaTeX)

我正在使用 R 创建图表,并且正在写一篇论文,其中我必须放置两个图表,如图所示:

在此处输入图片描述

在 R 中,我的输出如下所示:

y1 <- c(6524, 6701, 6946, 7080, 6920, 6887, 6660, 6746)
y2 <- c(5884, 5749, 6033, 5805, 5643, 5242, 4720, 4324)
x <- c(1, 2, 3, 4, 5, 6, 7, 8)
pdf(file="graph1.pdf",  title="Some", pointsize=7, width=5, height=4, paper="special")
plot(x,y1,type="l",lty="dotted", col="black", ylim = c(4000,7500))
par(new=TRUE)
plot(x,y2,type="l", lty="solid", col="black", ylim = c(4000,7500)) 
dev.off()

y1 <- c(403, 407, 435, 452, 448, 466, 476, 507)
y2 <- c(844, 934, 950, 1111, 1020, 1058, 1026, 1044)
x <- c(1, 2, 3, 4, 5, 6, 7, 8)
pdf(file="graph2.pdf",  title="Some", pointsize=7, width=5, height=4, paper="special")
plot(x,y1,type="l",lty="dotted", col="black", ylim = c(400,1200))
par(new=TRUE)
plot(x,y2,type="l", lty="solid", col="black", ylim = c(400,1200))
dev.off()

在 LaTeX 中我使用 \usepackage{pdfpages} 并写入:

\begin{figure}[H]
\centering
\caption{Graph1 and Graph2}
\includepdf[pages=-, scale=0.3]{graph1.pdf}
\includepdf[pages=-, scale=0.3]{graph2.pdf}
\end{figure}

如果有人能用 R 或 LaTeX 帮助我做到这一点,我会非常高兴。

答案1

使用subfigure

这段代码怎么样:

\usepackage{graphicx}
\usepackage{caption}
\usepackage{subcaption}

\begin{figure}
        \centering
        \begin{subfigure}[b]{0.5\textwidth}
                \includegraphics[width=\textwidth]{pic1}
        \end{subfigure}
        \begin{subfigure}[b]{0.5\textwidth}
                \includegraphics[width=\textwidth]{pic2}
        \end{subfigure}
        \caption{two pictures side by side}
\end{figure}

相关内容