SleepDepModelSelection:

GetSwitchHash <- function(){
  switch.hash <- hash("Gm129", "Ciart")
  # Maret has many missing genes
  switch.hash[["Homer1a"]] <- "Homer1"
  switch.hash[["Armet"]] <- "Manf"
  switch.hash[["Dcamkl1"]] <- "Dclk1"
  switch.hash[["Hnrpc"]] <- "Hnrnpc"
  switch.hash[["Ppm2c"]] <- "Pdp1"
  switch.hash[["D230005D02Rik"]] <- "Enox1"
  switch.hash[["Hsp110"]] <- "Hsph1"
  switch.hash[["Hnrpdl"]] <- "Hnrnpdl"
  # switch.hash[["Tnrc15"]] <- "Gigyf2"
  switch.hash[["1110064P04Rik"]] <- "Ahsa2"
  switch.hash[["BC005471"]] <- "Zfp810"
  switch.hash[["Hnrpdl"]] <- "Hnrnpdl"
  switch.hash[["G430041M01Rik"]] <- "Tra2a"
  switch.hash[["A930031D07Rik"]] <- "Mfsd4"
  switch.hash[["1200016B10Rik"]] <- "Swt1"
  switch.hash[["BF642829"]] <- "Slc5a3"
  switch.hash[["AW493225"]] <- "Zkscan2"
  switch.hash[["Fxr1h"]] <- "Fxr1"
  switch.hash[["D3Ertd300e"]] <- "Supt20"
  switch.hash[["Ak3l1"]] <- "Ak3"
  switch.hash[["Sfrs7"]] <- "Srsf7"
  switch.hash[["1500034J01Rik"]] <- "Dda1"
  switch.hash[["Bxdc2"]] <- "Brix1"
  switch.hash[["Zfp483"]] <- "Zkscan16"
  switch.hash[["Sfrs3"]] <- "Srsf3"
  switch.hash[["2310008M10Rik"]] <- "Ostc"
  switch.hash[["Sfrs3 /// LOC632248"]] <- "Srsf3"
  switch.hash[["Cbfa2t3h"]] <- "Cbfa2t3"
  switch.hash[["Tmem10"]] <- "Opalin"
  switch.hash[["2410014A08Rik"]] <- "Mlec"
  switch.hash[["0910001A06Rik"]] <- "Fam49b"
  switch.hash[["1810057P16Rik"]] <- "Mxra7"
  switch.hash[["D4Wsu53e"]] <- "Rrsp1"
  switch.hash[["Rutbc2"]] <- "Sgsm1"
  switch.hash[["3110001A13Rik"]] <- "Fam107b"
  switch.hash[["D7Wsu128e"]] <- "Ubfd1"
  switch.hash[["BC010801"]] <- "Slc25a38"
  switch.hash[["Sfrs6"]] <- "Srsf6"
  switch.hash[["Hnrpm"]] <- "Hnrnpm"
  switch.hash[["1110005A03Rik"]] <- "Mettl23"
  switch.hash[["0710005M24Rik"]] <- "Ralyl"
  switch.hash[["Ga17"]] <- "Eif3m"
  switch.hash[["AI428795"]] <- "Tct28"
  switch.hash[["1500001M20Rik"]] <- "Tamm41"
  switch.hash[["2010111I01Rik"]] <- "Aopep"
  switch.hash[["6530401C20Rik"]] <- "Amz1"
  switch.hash[["BC021442"]] <- "Zfp758"
  switch.hash[["4921520P21Rik"]] <- "Dmrtc1a"
  switch.hash[["1700013G20Rik"]] <- "Ttc32"
  switch.hash[["D10Ertd322e"]] <- "Mrpl42"
  switch.hash[["A930016P21Rik"]] <- "Fam173b"
  switch.hash[["2310061J03Rik"]] <- "Zbtb11os1"
  switch.hash[["Ubxd2"]] <- "Ubxn4"
  switch.hash[["A730098D12Rik"]] <- "Ythdc1"
  switch.hash[["Thoc4"]] <- "Alyref"
  switch.hash[["Ptdsr"]] <- "Jmjd6"
  switch.hash[["Surb7"]] <- "Med21"
  switch.hash[["2510005D08Rik"]] <- "Eef1akmt1"
  switch.hash[["Ubxd7"]] <- "Ubxn7"
  switch.hash[["4732435N03Rik"]] <- "Csgalnact1"
  switch.hash[["Jtv1"]] <- "Aimp2"
  switch.hash[["2310028O11Rik"]] <- "Minos1"
  switch.hash[["Ddx39"]] <- "Ddx39a"
  switch.hash[["C630007B19Rik"]] <- "Fam19a1"
  switch.hash[["A830031M15Rik"]] <- "Ctps2"
  switch.hash[["BC007180"]] <- "Erich3"
  switch.hash[["Sfrs5"]] <- "Srsf5"
  switch.hash[["Sfrs5"]] <- "Srsf5"
  switch.hash[["Sfrs5 /// LOC622469"]] <- "Srsf5"
  switch.hash[["Thoc4 /// Refbp2"]] <- "Alyref2"
  # Mongrain Missing genes
  switch.hash[["4933437F05Rik"]] <- "Noxred1"
  switch.hash[["Snf1lk2"]] <- "Sik2"
  switch.hash[["Mett10d"]] <- "Mettl16"
  switch.hash[["ler5"]] <- "Ier5"
  switch.hash[["Plkfb3"]] <- "Pfkfb3"
  return(switch.hash)
}