pca |>
tidyplot(x = pc1, y = pc2, color = group) |>
add_data_points() |>
add_ellipse()
pca |>
tidyplot(x = pc1, y = pc2, color = group) |>
add_data_points() |>
add_ellipse(level = 0.75)
pca |>
tidyplot(x = pc1, y = pc2, color = group) |>
add_data_points() |>
add_ellipse(type = "norm")
Run the code above in your browser using DataLab