R/calData.R

Defines functions calData

Documented in calData

calData <-function(data) 
{
        
    n<-ncol(data)
    i<-2:n
    datas<-data[,i]
    a<-sapply(data,prod,margin=1)
    b<-a^(1/nrow(data))
        
    return(b)
        
}

Try the EasyqpcR package in your browser

Any scripts or data that you put into this service are public.

EasyqpcR documentation built on Nov. 8, 2020, 5:36 p.m.