First, ensure you have ggplot2 installed:

install.packages("ggplot2") Now, let's create a simple gallery:

# Create a fourth plot p4 <- ggplot(mtcars, aes(x = wt, y = mpg, color = factor(gear))) + geom_point() + labs(title = "Scatterplot of MPG vs. WT by Gear")

If you're looking to create a gallery of plots, you can use R's base graphics or packages like ggplot2 for more complex and beautiful plots. Below is an example using ggplot2 to create a few plots and then arrange them in a simple gallery.

# Create a first plot p1 <- ggplot(mtcars, aes(x = wt, y = mpg)) + geom_point() + labs(title = "Scatterplot of MPG vs. WT")

# Create a second plot p2 <- ggplot(mtcars, aes(x = cyl, y = mpg)) + geom_bar(stat = "identity") + labs(title = "Barplot of Cylinders vs. MPG")