R/toPep.R

toPep <-
function(vec, frame=0){
  
    res=apply(t(apply(vec,1,s2c)),1,translate,frame=frame)
  
    if(!(is.null(dim(res)))){
        res=apply(res,2,c2s)
    }
    return(res)
}

Try the DCODE package in your browser

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

DCODE documentation built on May 1, 2019, 6:49 p.m.