ggplot(mpg, aes(x, y)) + geom_area(fill = "lightblue", color = "black") + ggtitle("Area Plot")
ggplot(df, aes(x, y)) + geom_bar(stat = "identity", fill = "blue") + ggtitle("Bar Chart")
ggplot(df, aes(x, y)) + geom_line(color = "red") + ggtitle("Line Plot")
ggplot(df, aes(x, y)) + geom_point(size = 3, color = "purple") + ggtitle("Scatterplot")
ggplot(df, aes(x, y)) + geom_polygon(fill = "lightgreen", color = "black") + ggtitle("Polygon Plot")
ggplot(df, aes(x, y)) + geom_tile(fill = "orange") + ggtitle("Tile Plot")
ggplot(df, aes(x, y, label = label)) + geom_text(size = 5, color = "black") + ggtitle("Text Plot")