R/functions/GetClockGenes.R

In jakeyeung/SleepDepModelSelection:

GetClockGenes <- function(){
  # return clock genes
  clockgenes <- c('Nr1d1','Dbp', 'Arntl', 'Npas2', 'Nr1d2',
                  'Bhlhe41', 'Nfil3', 'Cdkn1a', 'Lonrf3',
                  'Tef', 'Hlf', 'Usp2', 'Wee1', 'Dtx4',
                  'Clock', 'Per1', 'Per2', 'Per3', 'Cry2', 'Cry1')
  return(clockgenes)
}