View source: R/NNCTFunctions.R
EV.rct | R Documentation |
Returns a matrix
of same dimension as the RCT, rfct
,
whose entries are the expected cell counts of
the RCT under RL or CSR.
See also (\insertCiteceyhan:NNreflexivity2017;textualnnspat).
EV.rct(rfct, nvec)
rfct |
An RCT |
nvec |
The |
A matrix
of the expected values of cell counts in the RCT.
Elvan Ceyhan
rct
, EV.nnct
and EV.tct
n<-20 #or try sample(1:20,1)
Y<-matrix(runif(3*n),ncol=3)
cls<-sample(1:2,n,replace = TRUE) #or try cls<-rep(1:2,c(10,10))
ipd<-ipd.mat(Y)
nvec<-as.numeric(table(cls))
rfct<-rct(ipd,cls)
EV.rct(rfct,nvec)
#cls as a factor
na<-floor(n/2); nb<-n-na
fcls<-rep(c("a","b"),c(na,nb))
nvec<-as.numeric(table(fcls))
rfct<-rct(ipd,fcls)
EV.rct(rfct,nvec)
#############
n<-40
Y<-matrix(runif(3*n),ncol=3)
cls<-sample(1:4,n,replace = TRUE) #or try cls<-rep(1:2,c(10,10))
ipd<-ipd.mat(Y)
rfct<-rct(ipd,cls)
EV.rct(rfct,nvec)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.