search

ManonMartin / limpca

https://manonmartin.github.io/limpca/
1 stars 2 forks source link

lmpLoading2dPlot #9

Open bgovaerts opened 1 year ago

bgovaerts commented 1 year ago

Something should be done for this graphic when the % explained for the 2nd PC is low (or = to 0). Either it is accepted and a little arranged or refused. This should be rediscussed in // to the 2D score plot.
Here is an example

image
ManonMartin commented 1 year ago

food for thoughts:

data('UCH')
resLmpModelMatrix = lmpModelMatrix(UCH)
resLmpEffectMatrices = lmpEffectMatrices(resLmpModelMatrix)
resASCA = lmpPcaEffects(resLmpEffectMatrices)
resASCA$Hippurate$loadings[,2] = 0
resASCA$Hippurate$scores[,2] = 0
lmpLoading2dPlot(resASCA,effectNames = "Hippurate")
lmpLoading1dPlot(resASCA,effectNames = "Hippurate", axes = 1)

lmpScorePlot(resASCA,effectNames = "Hippurate")
plotLine(t(resASCA$Hippurate$scores), rows = 1,
         xaxis_type = "character")