powered by
calculate fold change among different samples.
fold(x)
dataframe
a dataframe with mean values and fold changes
# NOT RUN { vars <- 1000 samples <- 50 groups <- 3 dat <- replicate(vars, runif(n = samples)) f <- rep_len(1:groups, samples) f <- LETTERS[f] dat <- data.frame(dat, group = f) ret <- fold(dat) # }
Run the code above in your browser using DataLab