View source: R/Basic_functions.r
aveM | R Documentation |
Average Mj for Mx and My Here subjects are by rows, columns correspond to components
aveM(mjX, mjY)
mjX |
n x rj |
mjY |
n x rj |
a new Mj
#get simulation data
data(exampledata)
data=exampledata
# To get n.comp value, we can use NG_number function.
# use JB statistic as the measure of nongaussianity to run lngca with df=0
output_JB=singR(dX=exampledata$dX,dY=exampledata$dY,
df=0,rho_extent="small",distribution="JB",individual=TRUE)
est.Mj = aveM(output_JB$est.Mjx,output_JB$est.Mjy)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.