function/CHOPseq.ReversePWM.R

# reverse-complement a PWM matrix 
CHOPseq.ReversePWM<-function(pwm) {
x<-pwm[4:1,];
x<-x[, ncol(x):1];
rownames(x)<-rownames(pwm);
colnames(x)<-colnames(pwm);
x;
} 
zhezhangsh/CHOPseq documentation built on Sept. 11, 2019, 9:56 p.m.