I have a list that look like this:
setlist2 <- list(wsb_b6, wsb_id8)
[[1]]
[1] "Gm10116"       "Tpm3-rs7"      "Wdfy1"         "Rps3a2"        "AK157302"      "Gm6563"        
"Gm9825"        "Gm10259"       "Gm6768" 
[[2]]
 [1] "Gm6401"        "Ecel1"         "Hpca"          "Tmem176a"      "Lepr"          
"Baiap3"        "Fam183b"       "Vsx2"          "Vtn"          
I need it to look like this:
$wsb_b6
    [1] "Gm10116"       "Tpm3-rs7"      "Wdfy1"         "Rps3a2"        "AK157302"      "Gm6563"        
    "Gm9825"        "Gm10259"       "Gm6768" 
$wsb_id8
    [1] "Gm6401"        "Ecel1"         "Hpca"          "Tmem176a"      "Lepr"          
"Baiap3"        "Fam183b"       "Vsx2"          "Vtn"
I know that by doing it manually I can achieve it but it is more that 100 each, there's got to be a better way
 
     
     
    