ma(d,partition,ht,hp,hs,ufp)n x m data frame containing n observations of m variables
for which the maximal joint/marginal likelihood ratio score is required.
list(c(m),c(1:m-1)) where m = ncol(d)
which indicates explaining the
last variable by means of all the other variables in the data set.
ht = 43.6978644.
hp = 0.8120818.
hs = 6.0049711.
FALSE.
LR statistic, required for computing p values.rwt function from the matie package.
This estimate is usually conservative (ie low) and a small-samples hyperbolic
correction is applied by adding an offset, os,
to the joint likelihood given by:
os = ( 1 - 1 / (1 + A * ht) ) * ( n ^ (hp) / hs )
before the likelihood ratio is re-computed.
As the dimension of the data set increases so does the under-estimation
of A even with the hyperbolic correction.
rwt
pd
sbd
shpd
std
# bivariate association
d <- shpd(n=1000,m=2,Rsq=0.9)
ma(d)$A
#
# multivariate association (the proportion of variance in "Salary"
# explained by "Hits" and "Years")
data(baseballData)
ma(baseballData,partition=list(11,c(2,7)))$A
Run the code above in your browser using DataLab