library(gglite)
p = g2(iris, Sepal.Length ~ Sepal.Width, color = ~ Species)
p |> legend_color(position = 'right')
p |> legend_color(position = 'top')
p |> legend_color(position = 'bottom')
p |> legend_color(position = 'left')
p |> legend_color(FALSE)
p |> legend_color(position = 'right', title = 'Iris Species')