| flip_PCaxes | R Documentation | 
Simply multiply by -1, corresponding scores and rotation vectors for PCA objects. PC orientation being arbitrary, this may help to have a better display.
flip_PCaxes(x, axs)
x | 
 a PCA object  | 
axs | 
 numeric which PC(s) to flip  | 
bp <- bot %>% efourier(6) %>% PCA
bp %>% plot
bp %>% flip_PCaxes(1) %>% plot()
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.