如何在R中更改打印大小？

# 设置图形边距
par(mar = c(5, 4, 4, 2) + 0.1)  # 底部、左侧、顶部、右侧的边距

# 绘制图形
plot(1:10, 1:10)

# 创建一个PDF文件，指定宽度和高度
pdf("myplot.pdf", width = 8, height = 6)

# 绘制图形
plot(1:10, 1:10)

# 关闭图形设备
dev.off()

# 创建一个PNG文件，指定宽度和高度
png("myplot.png", width = 800, height = 600)

# 绘制图形
plot(1:10, 1:10)

# 关闭图形设备
dev.off()

library(ggplot2)

# 创建一个ggplot对象
p <- ggplot(mtcars, aes(x = wt, y = mpg)) + geom_point()

# 保存图形，指定宽度和高度
ggsave("myplot.png", plot = p, width = 8, height = 6)

# 设置控制台输出的宽度
options(width = 100)

# 打印一些数据
print(mtcars)