acts=apply(rbind(rep("z",14),matrix(rep(letters[1:4],7),nrow=2)),2,paste,collapse=" ")[1:13]
reps=apply(matrix(rep(letters[5:8],7),nrow=2),2,paste,collapse=" ")[1:13]
grn=data.frame("Target"= LETTERS[1:26] ,"coact"=c(acts,reps),"corep"= c(reps,acts),"R2"=runif(26),stringsAsFactors=FALSE)
co=coregnet(grn)
coregulators(co)
coregulators(co,maxcoreg=3,minCommonGenes=3)
coregulators(co,adjustMethod="bonferroni")
coregulators(co,alpha=1)
Run the code above in your browser using DataLab