在R中以.pdf格式打印输出数据(数据帧/矩阵)和曲线图

install.packages("ggplot2")  # 安装ggplot2包
library(ggplot2)  # 加载ggplot2包

# 创建示例数据帧/矩阵
data <- data.frame(x = c(1, 2, 3, 4, 5), y = c(2, 4, 6, 8, 10))

# 创建曲线图
plot <- ggplot(data, aes(x = x, y = y)) + geom_line()

# 可以根据需要进行其他图形设置，例如添加标题、坐标轴标签等
plot <- plot + labs(title = "示例曲线图", x = "X轴", y = "Y轴")

# 打印输出数据帧/矩阵和曲线图
print(data)
print(plot)

# 设置输出文件路径和文件名
output_file <- "output.pdf"

# 使用pdf()函数创建.pdf文件
pdf(output_file)

# 打印输出数据帧/矩阵和曲线图
print(data)
print(plot)

# 关闭.pdf文件
dev.off()