R/cpg.everything.character.R

Defines functions cpg.everything.character

Documented in cpg.everything.character

cpg.everything.character <-
function(x,...) {
  Phenotype<-x
  if(!grepl("\\]",Phenotype)) {
    Phenotype<-strsplit(Phenotype,"[:()$:]")[[1]]
    Phenotype<-Phenotype[length(Phenotype)]           
               }
    Phenotype
          }

Try the CpGassoc package in your browser

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

CpGassoc documentation built on May 1, 2019, 8:24 p.m.