acts=apply(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)
regulators(co)
regulators(co,"A")
regulators(co,"A","coregulators")
activators(co,"A")
activators(co,"A","coregulators")
repressors(co,"A")
repressors(co,"A","coregulators")
targets(co)
targets(co,"a")
targets(co,"a","reg")
targets(co,"a","act")
targets(co,"a","rep")
targets(co,c("a","b"),"act")
Run the code above in your browser using DataLab