plot PCA results.
draw_specific_pca(pca, component_1, component_2, legend = TRUE)
PCA data obtained from compute_pca function.
First component to plot
Second component to plot
Display legend on the plot.
data("abiotic_stresses")
pca <- compute_pca(abiotic_stresses$normalized_counts)
draw_specific_pca(pca, 1, 2)