data-raw/palettes.R

In neuroconductor-devel-releases/ggsegExtra: Plotting tool for brain atlases

brain_pals = list(
  dkt = ggseg::brain_pals$dkt,
  aseg = ggseg::brain_pals$aseg,
  yeo7 = c(visual = "#a153a2",
           somatomotor = "#6fabd2",
           `dorsal attention`= "#2c8b4b",
           `ventral attention` = "#b77fb4",
           limbic = "#e7edca",
           frontoparietal = "#edaf5e",
           default = "#e27283"
  ),
  yeo17 = c(`visual peripheral` = "#762284",
            `visual central` = "#fc2a1c",
            `somatomotor A` = "#4984b2",
            `somatomotor B` = "#36cca5",
            `dorsal attention A` = "#4d9a42",
            `dorsal attention B` = "#0d7418",
            `ventral attention` = "#c145f6",
            `salience` = "#fd9bd4",
            `limbic A` = "#ddf7a9",
            `limbic B` = "#798639",
            `control C` = "#778daf",
            `control A` = "#e39333",
            `control B` = "#86334a",
            `default D` = "#143efa",
            `default C` = "#041b80",
            `default A` = "#fff937",
            `default B` = "#cb4051"
  ),
  midsagittal = c(`3rd ventricle` =	"#CCB68E",
                  `4th ventricle` =	"#2ACCA4",
                  `brain stem` = "#779FB0",
                  `CC anterior` ="#0000FF",
                  `CC central` = "#0000A0",
                  `CC mid anterior`	= "#0000D0",
                  `CC mid posterior` = "#000070",
                  `CC posterior` = "#000040",
                  `cerebellum cortex`	= "#E69422",
                  `cerebellum white matter`	= "#DCF8A4",
                  `cerebral cortex`	= "#CD3E4E"
  ),
  glasser = c(
    V1 = "#3F05FF",
    MST = "#366781",
    V6 = "#3E4EB2",
    V2 = "#1732E9",
    V3 = "#0F28E2",
    V4 = "#0E1CD6",
    V8 = "#1A2FC9",
    `4` = "#21B214",
    `3b` = "#23CD15",
    FEF = "#868F89",
    PEF = "#8DA698",
    `55b` = "#3E582F",
    V3A = "#0739F6",
    RSC = "#994085",
    POS2 = "#BA56BC",
    V7 = "#1246C3",
    IPS1 = "#3972A0",
    FFC = "#395975",
    V3B = "#192FCE",
    LO1 = "#0031B8",
    LO2 = "#1221B5",
    PIT = "#222BAB",
    MT = "#1F5668",
    A1 = "#EB132F",
    PSL = "#7A4F38",
    SFL = "#1F3116",
    PCV = "#8A8099",
    STV = "#8E574C",
    `7Pm` = "#95B5BC",
    `7m` = "#2A1F2C",
    POS1 = "#513662",
    `23d` = "#7F385B",
    v23ab = "#1D000E",
    d23ab = "#3F112F",
    `31pv` = "#360B2A",
    `5m` = "#30A330",
    `5mv` = "#99AC88",
    `23c` = "#CDBEC2",
    `5L` = "#409A40",
    `24dd` = "#45A12C",
    `24dv` = "#779F42",
    `7AL` = "#73C286",
    SCEF = "#6E9256",
    `6ma` = "#90B387",
    `7Am` = "#B8F3E0",
    `7PL` = "#A9F6ED",
    `7PC` = "#44B16C",
    LIPv = "#3F719E",
    VIP = "#328189",
    MIP = "#88CECC",
    `1` = "#14BF26",
    `2` = "#30B03E",
    `3a` = "#2FD816",
    `6d` = "#1A9E20",
    `6mp` = "#409F26",
    `6v` = "#47A832",
    p24pr = "#92886B",
    `33pr` = "#816A67",
    a24pr = "#B08582",
    p32pr = "#A38E79",
    a24 = "#430C19",
    d32 = "#5A2932",
    `8BM` = "#695351",
    p32 = "#5F2034",
    `10r` = "#190C01",
    `47m` = "#604B42",
    `8Av` = "#35362B",
    `8Ad` = "#3F4330",
    `9m` = "#2B2312",
    `8BL` = "#222714",
    `9p` = "#262B1C",
    `10d` = "#262318",
    `8C` = "#655554",
    `44` = "#58583E",
    `45` = "#3C3F2A",
    `47l` = "#33311F",
    a47r = "#4D4C42",
    `6r` = "#B2D697",
    IFJa = "#7E775F",
    IFJp = "#89A084",
    IFSp = "#616257",
    IFSa = "#BCC9B2",
    `p9-46v` = "#8A9586",
    `46` = "#CFD9C8",
    `a9-46v` = "#917080",
    `9-46d` = "#8C7583",
    `9a` = "#37342D",
    `10v` = "#0E230E",
    a10p = "#624B59",
    `10pp` = "#373E3A",
    `11l` = "#816A76",
    `13l` = "#523C45",
    OFC = "#28231F",
    `47s` = "#422321",
    LIPd = "#9BB4CA",
    `6a` = "#79C088",
    `i6-8` = "#5A6253",
    `s6-8` = "#585C49",
    `43` = "#918A40",
    OP4 = "#729D31",
    OP1 = "#639E23",
    `OP2-3` = "#917F34",
    `52` = "#D04842",
    RI = "#B23D17",
    PFcm = "#BE9059",
    PoI2 = "#837C53",
    TA2 = "#822A1B",
    FOP4 = "#B69481",
    MI = "#9D746A",
    Pir = "#5A4241",
    AVI = "#8D4853",
    AAIC = "#55232C",
    FOP1 = "#A09958",
    FOP3 = "#AF8963",
    FOP2 = "#639C33",
    PFt = "#81DE86",
    AIP = "#88DCA6",
    EC = "#313023",
    PreS = "#563953",
    H = "#3C3928",
    ProS = "#573BB0",
    PeEc = "#3D3E33",
    STGa = "#3A2A1A",
    PBelt = "#C31E05",
    A5 = "#632706",
    PHA1 = "#45324B",
    PHA3 = "#606671",
    STSda = "#4D3322",
    STSdp = "#493927",
    STSvp = "#473B39",
    TGd = "#232217",
    TE1a = "#0B0E00",
    TE1p = "#60665E",
    TE2a = "#43403A",
    TF = "#404838",
    TE2p = "#698075",
    PHT = "#D9FCDF",
    PH = "#5883A3",
    TPOJ1 = "#7D5A40",
    TPOJ2 = "#9CA28A",
    TPOJ3 = "#799491",
    DVT = "#7870BE",
    PGp = "#9BBEE4",
    IP2 = "#B0A6AE",
    IP1 = "#767980",
    IP0 = "#70A0CF",
    PFop = "#BBCD91",
    PF = "#FFFFE2",
    PFm = "#856972",
    PGi = "#353E2E",
    PGs = "#3E4339",
    V6A = "#2959A6",
    VMV1 = "#3E3D9B",
    VMV3 = "#31359F",
    PHA2 = "#585A59",
    V4t = "#0E4F80",
    FST = "#5C9D99",
    V3CD = "#0F2EB6",
    LO3 = "#365EA0",
    VMV2 = "#433EA1",
    `31pd` = "#38162D",
    `31a` = "#8F6985",
    VVC = "#353D7C",
    `25` = "#24180E",
    s32 = "#2E2315",
    pOFC = "#4C3035",
    PoI1 = "#A46861",
    Ig = "#6E7B24",
    FOP5 = "#A36669",
    p10p = "#59404C",
    p47r = "#7E7B70",
    TGv = "#2E332A",
    MBelt = "#BB1E18",
    LBelt = "#E9121B",
    A4 = "#982704",
    STSva = "#282116",
    TE1m = "#3B2D2B",
    PI = "#7A3232",
    a32pr = "#823F57",
    p24 = "#7B234A"
  ),
  jhu = c(
    `Anterior thalamic radiation` = "#cf7bc7",
    `Corticospinal tract` = "#83b74d",
    `Cingulum (cingulate gyrus)` = "#bb6639",
    `Cingulum (hippocampus)` = "#56b772",
    `Forceps major` = "#563686",
    `Forceps minor` =  "#c79f3a",
    `Inferior fronto-occipital fasciculus` = "#6781d8",
    `Inferior longitudinal fasciculus` = "#748434",
    `Superior longitudinal fasciculus` = "#b2457c",
    `Uncinate fasciculus` = "#43c9b0",
    `Superior longitudinal fasciculus (temporal part)` = "#b8434e",
    `Cerebral spinal fluid` = "grey20"
  ),  
  tracula = c(
    `Anterior thalamic radiation` = "#d9d933",
    `Corticospinal tract` = "#D296FB",
    `Cingulum (cingulate gyrus)` = "#009A9B",
    `Cingulum (angular bundle)` = "#98CA07",
    `Forceps major` = "#AA7484",
    `Forceps minor` =  "#C96963",
    `Inferior longitudinal fasciculus` = "#949C2E",
    `Superior longitudinal fasciculus` = "#9f9bc7",
    `Uncinate fasciculus` = "#6996FE",
    `Superior longitudinal fasciculus (temporal part)` = "#98FCFF",
    `Cerebral spinal fluid` = "grey20"
  ),
  chenAr = c(
    `posterolateral temporal` = "#fca500",
    `superior temporal` = "#01f6f2", 
    `dorsolateral prefrontal` = "#f7c7b7", 
    `motor-premotor` = "#0600ff", 
    `superior parietal` = "#009d00", 
    `orbitofrontal` = "#ff46c6", 
    `occipital` = "#ff0400", 
    `anteromedial temporal` = "#660099", 
    `inferior parietal` = "#d3fd6d", 
    `pars opercularis,subcentral` = "#e2a4fe", 
    `dorsomedial frontal` = "#ffff00", 
    `precuneus` = "#9a1300"
  ),
  chenTh = c(
    `temporal pole` = "#590089", 
    `dorsolateral prefrontal` = "#f7c7b7",
    `motor-premotor-supplementary motor area` = "#0600ff", 
    `ventral frontal` = "#fc30ac", 
    `occipital` = "#ff0400", 
    `superior parietal` = "#009d00", 
    `medial temporal` = "#01f3f0",
    `medial prefrontal` = "#ffff00",
    `middle temporal` = "#dc9f00", 
    `perisylvian` = "#e6adf3", 
    `inferior parietal` = "#d3fd6d", 
    `ventromedial occipital` = "#7f0900"
  )
)
usethis::use_data(brain_pals, internal = FALSE, overwrite = TRUE)