如何使用两种类型的视觉效果在R ggplot循环中显示标题

library(ggplot2)

# 创建基础图形对象
p <- ggplot(data = iris, aes(x = Sepal.Length, y = Sepal.Width))

# 添加图层和其他设置
p <- p + geom_point() + theme_minimal()

# 添加文本标签
p <- p + labs(title = "Scatter plot of Sepal Length vs. Sepal Width",
              x = "Sepal Length",
              y = "Sepal Width")

# 显示图形
print(p)

library(ggplot2)

# 创建基础图形对象
p <- ggplot(data = iris, aes(x = Sepal.Length, y = Sepal.Width))

# 添加图层和其他设置
p <- p + geom_point()

# 设置主题
p <- p + theme(plot.title = element_text(color = "blue", size = 14, face = "bold"),
               plot.title.position = "plot",
               plot.title.margin = margin(b = 20))

# 显示图形
print(p)