Sex and life experience shape locus coeruleus pretangle tau pathology.
The 8 matches
- [1] § RESULTS › snRNA‐seq identifies major hippocampal cell types and regionally distinct neuronal subpopulations ↔ ex_subclsuters.ipynb, lines 31–33 · score 0.90 · Camk2d, Htr2c, Mgat4c, Sema5a, Arhgap12, Cpne4
- [2] § RESULTS › snRNA‐seq identifies major hippocampal cell types and regionally distinct neuronal subpopulations ↔ hippo_allcelltypes.ipynb, lines 29–30 · score 0.89 · Inpp5d, Slc17a7, Slc1a2, Slc1a3, Arhgap15, Ctss
- [3] § RESULTS › Sex‐ and experience‐dependent transcriptomic remodeling of hippocampal neurons and glia induced by LC pretangle tau › Excitatory neurons ↔ excitatory_go.R, lines 126–188 · score 0.84 · axon ensheathment, cellular stress, synaptic signaling, protein regulation, myelination, neurodevelopmental
- [4] § METHODS › Single‐nucleus RNA sequencing › Gene ontology analysis ↔ OligoAstroMicro_go.R, lines 27–72 · score 0.82 · enrichGO, keyType, compareCluster, db, readable, rn
- [5] § METHODS › Single‐nucleus RNA sequencing › Gene ontology analysis ↔ excitatory_go.R, lines 26–71 · score 0.82 · enrichGO, keyType, compareCluster, db, readable, rn
- [6] § RESULTS › snRNA‐seq identifies major hippocampal cell types and regionally distinct neuronal subpopulations ↔ hippo_allcelltypes.ipynb, lines 71–88 · score 0.64 · low quality cells, inhibitory neurons, excitatory neurons, Endo, OPCs, LQCs
- [7] § RESULTS › Sex‐ and experience‐dependent transcriptomic remodeling of hippocampal neurons and glia induced by LC pretangle tau › Inhibitory neurons ↔ excitatory_go.R, lines 73–124 · score 0.61 · electron transport chain, mitochondrial energy, excitatory, clusters
- [8] § RESULTS › Sex‐ and experience‐dependent transcriptomic remodeling of hippocampal neurons and glia induced by LC pretangle tau › Inhibitory neurons ↔ excitatory_go.R, lines 126–188 · score 0.55 · synaptic signaling, RNA processing, calcium, mitochondrial, excitatory, regulated
Paper
Loaded from Europe PMC by your browser, not stored by OSCR: doi.org · Europe PMC
The paper is loaded when this pane is shown.
The authors' code
R · 275 lines · 9.3 KB · no license · 4 matches
- library(clusterProfiler)
- library(enrichplot)
- library(org.Rn.eg.db)
- library(ggnewscale)
- library(RColorBrewer)
- # ------------------------------ Parameters ------------------------------------
- deg_dir <- "~/your_file_path/ex_G0_DEGs_c012"
- pval_thr <- 0.05
- logfc_thr <- 0.5
- topN <- 10
- # Faceting (clusters) and x-axis ordering
- cluster_order <- c("C0","C1","C2") # facets you want to show
- base_order <- c("cE14F","cE14M","eSTRF","eSTRM","eERF","eERM","lSTRF","lSTRM","lERF","lERM")
- # ---------------------------- Helper functions --------------------------------
- strip_ver <- function(x) gsub("\\.\\d+$", "", x) # remove Ensembl version suffix
- norm <- function(x) {
- x |>
- stringr::str_replace_all("[\u2010-\u2015\u2212]", "-") |> # normalize dashes
- stringr::str_squish() |>
- stringr::str_to_lower()
- }
- # ---------------------- 1) Load DEGs and split UP/DOWN ------------------------
- deg_files <- list.files(deg_dir, pattern = "\\.csv$", full.names = TRUE)
- combined_up <- list()
- combined_down <- list()
- for (file in deg_files) {
- condition <- tools::file_path_sans_ext(basename(file)) # e.g., "cE14F_C0"
- df <- read.csv(file, check.names = FALSE)
- gene_col <- dplyr::case_when(
- "Gene" %in% names(df) ~ "Gene",
- "gene_names" %in% names(df) ~ "gene_names",
- TRUE ~ NA_character_
- )
- if (is.na(gene_col)) next
- up_genes <- df %>%
- filter(p_val_adj < pval_thr, logFC > logfc_thr) %>%
- pull(!!sym(gene_col)) %>% unique()
- dn_genes <- df %>%
- filter(p_val_adj < pval_thr, logFC < -logfc_thr) %>%
- pull(!!sym(gene_col)) %>% unique()
- combined_up[[condition]] <- up_genes
- combined_down[[condition]] <- dn_genes
- }
- # Strip Ensembl version suffixes (if present)
- combined_up <- lapply(combined_up, strip_ver)
- combined_down <- lapply(combined_down, strip_ver)
- # ------------------- 2) Build compareCluster input & run ----------------------
- gene_sets <- c(
- setNames(combined_up, paste0(names(combined_up), "_UP")),
- setNames(combined_down, paste0(names(combined_down), "_DOWN"))
- )
- go_all <- compareCluster(
- geneCluster = gene_sets,
- fun = "enrichGO",
- OrgDb = org.Rn.eg.db,
- keyType = "ENSEMBL",
- ont = "BP",
- readable = TRUE
- )
- # ---------------- 3) Tidy results: parse sample & cluster ---------------------
- go_raw <- as_tibble(go_all@compareClusterResult)
- # Cluster names look like "<SampleBase>_C#_UP" or "_DOWN"
- go_df <- go_raw %>%
- mutate(
- Regulation = if_else(grepl("_UP$", Cluster), "Up", "Down"),
- Sample = sub("_(UP|DOWN)$", "", Cluster), # "<SampleBase>_C#"
- Cluster3 = sub("^.*_(C\\d+)$", "\\1", Sample), # allow any C#
- SampleBase = sub("_(C\\d+)$", "", Sample), # prefix before _C#
- negLog10Padj = -log10(p.adjust + 1e-300)
- ) %>%
- filter(!is.na(Cluster3), p.adjust < 0.05, Count >= 3) %>%
- mutate(
- Cluster3 = factor(Cluster3, levels = cluster_order),
- SampleBase = factor(SampleBase, levels = base_order),
- Regulation = factor(Regulation, levels = c("Up","Down"))
- ) %>%
- droplevels()
- #for topN GO terms run 4A # for your selected terms run 4B # then continue from step 5
- # ---------------- 4A) Option: keep topN per panel (default) -------------------sel <- go_df %>%
- group_by(Regulation, Cluster3, Sample) %>%
- slice_min(order_by = p.adjust, n = topN, with_ties = FALSE) %>%
- ungroup()
- global_levels <- sel %>%
- group_by(Description) %>%
- summarise(median_padj = median(p.adjust, na.rm = TRUE), .groups = "drop") %>%
- arrange(median_padj) %>%
- pull(Description)
- plot_df <- go_df %>%
- filter(Description %in% global_levels) %>%
- mutate(Description = factor(Description, levels = rev(global_levels))) %>%
- droplevels()
- # ---------------- 4B) Option: selcted GO term from top list for main figure-> GO IDs -----------
- keep_terms <- c(
- # ——— Mitochondria Energy Production
- "oxidative phosphorylation",
- "aerobic respiration",
- "cellular respiration",
- "ATP synthesis coupled electron transport",
- "respiratory electron transport chain",
- "mitochondrial ATP synthesis coupled electron transport",
- "proton transmembrane transport",
- "proton motive force-driven mitochondrial ATP synthesis",
- "NADH dehydrogenase complex assembly",
- "mitochondrial respiratory chain complex I assembly",
- # ——— RNA/Protein Regulation
- "ribosome biogenesis",
- "ribonucleoprotein complex biogenesis",
- "protein-RNA complex organization",
- "ribosome assembly",
- "rRNA processing",
- "rRNA metabolic process",
- "cytoplasmic translation",
- "translational elongation",
- "protein folding",
- "proteasomal protein catabolic process",
- # ——— Synaptic Signaling Plasticity and Learning
- "regulation of synaptic vesicle recycling",
- "vesicle-mediated transport in synapse",
- "presynaptic endocytosis",
- "postsynapse organization",
- "regulation of postsynaptic membrane neurotransmitter receptor levels",
- "chemical synaptic transmission, postsynaptic",
- "receptor localization to synapse",
- "dendritic spine organization",
- "regulation of synaptic plasticity",
- "regulation of long-term synaptic potentiation",
- "learning or memory",
- "long-term memory",
- # ——— Cellular Stress Calcium Signaling
- "cellular response to reactive oxygen species",
- "reactive oxygen species metabolic process",
- "response to endoplasmic reticulum stress",
- "endoplasmic reticulum calcium ion homeostasis",
- "negative regulation of calcium-mediated signaling",
- "regulation of intrinsic apoptotic signaling pathway by p53 class mediator",
- "mitochondrial outer membrane permeabilization",
- "regulation of mitochondrial membrane permeability involved in apoptotic process",
- # ——— Neurodevelopment Axonal Transport
- "hippocampus development",
- "limbic system development",
- "midbrain development",
- "neural nucleus development",
- "axonal transport",
- "retrograde axonal transport",
- "myelination",
- "axon ensheathment",
- "axon regeneration",
- "axonogenesis"
- )
- keep_tbl <- tibble(
- keep_term_raw = keep_terms,
- keep_term_clean = norm(keep_terms),
- keep_order = seq_along(keep_terms)
- )
- all_terms <- as_tibble(go_all@compareClusterResult) %>%
- distinct(ID, Description) %>%
- mutate(Desc_clean = norm(Description))
- join_ids <- keep_tbl %>%
- inner_join(all_terms, by = c("keep_term_clean" = "Desc_clean")) %>%
- arrange(keep_order)
- keep_ids <- join_ids$ID
- # Filter go_df by these IDs
- plot_df <- go_df %>%
- filter(ID %in% keep_ids)
- desc_levels <- join_ids$Description # in your keep_terms order
- plot_df <- plot_df %>%
- mutate(Description = factor(Description, levels = rev(desc_levels))) %>% # rev() puts first at top
- droplevels()
- # ---------------- 5) Pad empty samples so ticks stay visible ------------------
- pad_grid <- tidyr::expand_grid(
- Cluster3 = factor(cluster_order, levels = cluster_order),
- SampleBase = factor(base_order, levels = base_order)
- )
- pad_df <- pad_grid %>%
- mutate(
- Description = factor(NA, levels = levels(plot_df$Description)),
- Count = NA_integer_,
- Regulation = factor("Up", levels = c("Up","Down")),
- negLog10Padj = NA_real_
- )
- plot_df_pad <- bind_rows(plot_df, pad_df) %>%
- mutate(SampleBase = factor(SampleBase, levels = base_order))
- # ---------------------------- 6) Plot figure ----------------------------------
- down_df <- filter(plot_df_pad, Regulation == "Down")
- up_df <- filter(plot_df_pad, Regulation == "Up")
- p_go <- ggplot(plot_df_pad) +
- # DOWN (Blues)
- geom_point(
- data = down_df,
- aes(x = SampleBase, y = Description, size = Count, fill = negLog10Padj),
- shape = 21, color = "#08519C", stroke = 0.6, alpha = 0.95, na.rm = TRUE
- ) +
- scale_fill_gradientn(
- name = "Down: -log10(adj p)",
- colours = brewer.pal(9, "Blues"),
- na.value = NA
- ) +
- ggnewscale::new_scale_fill() +
- # UP (Reds)
- geom_point(
- data = up_df,
- aes(x = SampleBase, y = Description, size = Count, fill = negLog10Padj),
- shape = 21, color = "#A50F15", stroke = 0.6, alpha = 0.95, na.rm = TRUE
- ) +
- scale_fill_gradientn(
- name = "Up: -log10(adj p)",
- colours = brewer.pal(9, "Reds"),
- na.value = NA
- ) +
- scale_size(name = "Gene Count", range = c(2, 8)) +
- guides(size = guide_legend(order = 1)) +
- facet_grid(. ~ Cluster3, scales = "free_x", space = "free_x") +
- scale_x_discrete(limits = base_order, drop = FALSE) +
- scale_y_discrete(drop = FALSE) +
- labs(
- #title = "GO BP enrichment per sample (excitatory clusters)",#
- x = "Samples", y = "GO terms"
- ) +
- theme_bw() +
- theme(
- axis.text.x = element_text(angle = 90, vjust = 0.5, hjust = 1, size = 8),
- axis.text.y = element_text(size = 7),
- strip.text = element_text(face = "bold"),
- panel.grid.major.y = element_line(size = 0.2, linetype = 3)
- )
- p_go
- # ---------------------------- 7) Save outputs ---------------------------------
- saveRDS(go_all, file = "excitatory_GO_up_down_compareCluster.rds")
- raw_df <- as.data.frame(go_all@compareClusterResult)
- write.csv(raw_df, file = "excitatory_GO_BP_results_raw.csv", row.names = FALSE)
- write.csv(go_df, file = "excitatory_GO_BP_results_tidy.csv", row.names = FALSE)
- write.csv(plot_df, file = "excitatory_GO_BP_results_plotdf.csv", row.names = FALSE)
- ggsave("excitatory_GO_BP_selected.pdf", plot = p_go, width = 12, height = 10, units = "in")
- ggsave("excitatory_GO_BP_plot.svg", plot = p_go, width = 11, height = 8.5, units = "in", bg = "transparent")
- ggsave("excitatory_GO_BP_plot.jpg", plot = p_go, width = 11, height = 8.5, units = "in", dpi = 300)
excitatory_go.R at commit fcb73f0, no license · at the source
Overview
- Biomedical Sciences Faculty of Medicine Memorial University of Newfoundland St. John's Newfoundland and Labrador Canada
- Department of Psychology Faculty of Science Memorial University of Newfoundland St. John's Newfoundland and Labrador Canada
Abstract
The abstract is not reproduced here: the paper's license (CC BY-NC-ND) does not allow it. Read it in the paper, at the publisher or on Europe PMC.
Repository
Its files are read in the Code ↔ Paper reader above, with 8 matches between paragraphs and lines of code.
ziahasanz/hippocampus_paper
fcb73f0d996def9ef20082f919c3238e6fd9f2e5, 14 May 2026Availability: 1 check, the latest on 30 September 2026: the link answers
- 30 September 2026: the link answers
9 files
- OligoAstroMicro_go.R, R, 269 lines, 1 match
- OligoAstroMicro_upset.R, R, 116 lines
- ex_in_upset.R, R, 117 lines
- ex_subclsuters.ipynb, Jupyter, 177 lines, 1 match
- excitatory_go.R, R, 275 lines, 4 matches
- hippo_allcelltypes.ipynb
, Jupyter, 221 lines, 2 matches - in_subclsuters.ipynb, Jupyter, 179 lines
- volcano_plot.R, R, 198 lines
- README.md, Text, 30 lines
The paper's code and data availability statement is in the Data section.
Tracing map
Proposed by the machine: these links were found in the paper and verified at the source, without human review. The map will receive a Zenodo DOI once one of the paper's authors has validated it with their ORCID.
What the map holds:
- 1 repository of the authors' code, each at its verified commit, with its license and how the link was found in the paper;
- 8 scripts, each with its path and the digest of its content;
- 8 matches between paragraphs of the paper and lines of the code (method lexical-v1);
- neither the text of the paper nor the code itself.
Its JSON (tracing-map.json) is deposited on Zenodo with its DOI once the map is validated.
Data
Datasets cited
- zenodo:16944126, at Zenodo; found in “DATA AVAILABILITY STATEMENT”
Code and data availability statement
The paper has a code and data availability statement. Its license (CC BY-NC-ND) does not allow reproducing it here; in short, from what the harvester recognized in it:
- it points to a dataset: Zenodo 16944126
- it points to the authors' code: ziahasanz/
hippocampus_paper
Read it in the paper: doi.org/10.1002/alz.71285.
Versions
The history of this record: each version stored by the harvester or made by a correction of its authors or of the maintainers of its code, and what changed in its facts. The texts of the paper (its abstract, its availability statements) are not part of it; versions that changed only those are not listed.
Version 1, 30 September 2026: the first record
Recorded: type, language, journal, volume, issue, pages, dates, 11 authors, 8 keywords, 14 MeSH terms, 2 funders, 74 references.
Cite
This paper
Hasan, Z., Torraville, S. E., Omoluabi, T., Maziar, A., Belolise, O. N., MacGowan, L. A., Flynn, C. M., Reinhardt, C., Walling, S. G., Benoukraf, T., & Yuan, Q. (2026). Sex and life experience shape locus coeruleus pretangle tau pathology. Alzheimer's & dementia : the journal of the Alzheimer's Association, 22(3), e71285. https://
BibTeX
@article{hasan2026sex,
author = {Hasan, Zia and Torraville, Sarah E. and Omoluabi, Tamunotonye and Maziar, Aida and Belolise, Onyedikachi N. and MacGowan, Lauren A. and Flynn, Cassandra M. and Reinhardt, Camila and Walling, Susan G. and Benoukraf, Touati and Yuan, Qi},
title = {{Sex and life experience shape locus coeruleus pretangle tau pathology}},
journal = {Alzheimer's \& dementia : the journal of the Alzheimer's Association},
year = {2026},
month = mar,
volume = {22},
number = {3},
pages = {e71285},
publisher = {Wiley},
issn = {1552-5260},
doi = {10.1002/
url = {https://
pmid = {41804725},
pmcid = {PMC12973150}
}
RIS
TY - JOUR
AU - Hasan, Zia
AU - Torraville, Sarah E.
AU - Omoluabi, Tamunotonye
AU - Maziar, Aida
AU - Belolise, Onyedikachi N.
AU - MacGowan, Lauren A.
AU - Flynn, Cassandra M.
AU - Reinhardt, Camila
AU - Walling, Susan G.
AU - Benoukraf, Touati
AU - Yuan, Qi
TI - Sex and life experience shape locus coeruleus pretangle tau pathology
T2 - Alzheimer's & dementia : the journal of the Alzheimer's Association
J2 - Alzheimers Dement
PY - 2026
DA - 2026/
VL - 22
IS - 3
SP - e71285
SN - 1552-5260
PB - Wiley
DO - 10.1002/
UR - https://
LA - en
ER -
CSL-JSON
{
"id": "10.1002/
"type": "article-journal",
"title": "Sex and life experience shape locus coeruleus pretangle tau pathology",
"container-title": "Alzheimer's & dementia : the journal of the Alzheimer's Association",
"author": [
{
"family": "Hasan",
"given": "Zia"
},
{
"family": "Torraville",
"given": "Sarah E."
},
{
"family": "Omoluabi",
"given": "Tamunotonye"
},
{
"family": "Maziar",
"given": "Aida"
},
{
"family": "Belolise",
"given": "Onyedikachi N."
},
{
"family": "MacGowan",
"given": "Lauren A."
},
{
"family": "Flynn",
"given": "Cassandra M."
},
{
"family": "Reinhardt",
"given": "Camila"
},
{
"family": "Walling",
"given": "Susan G."
},
{
"family": "Benoukraf",
"given": "Touati"
},
{
"family": "Yuan",
"given": "Qi"
}
],
"container-title-short":
"volume": "22",
"issue": "3",
"page": "e71285",
"DOI": "10.1002/
"PMID": "41804725",
"PMCID": "PMC12973150",
"ISSN": "1552-5260",
"publisher": "Wiley",
"URL": "https://
"language": "en",
"issued": {
"date-parts": [
[
2026,
3,
1
]
]
}
}
The tracing map gets a citation of its own once an author has validated it and it has a DOI.
Similar papers
The papers with a page that share the most with this one: the tools found in their code, their categories, datasets, cited references and authors, the rarest counting most.
- [1] doi:10.1016/j.celrep.2026.117073 [code]
- Single-cell epigenomics uncovers heterochromatin instability and transcription factor dysfunction during mouse brain aging.Journal: Cell reportsIn common: clusterProfiler, Scanpy, patchwork, 5 other tools, genetics / omics, cellular / molecular, 2 references
- [2] doi:10.1038/s41586-026-10629-x [code]
- Whole-genome duplication shaped cell-type evolution in the vertebrate brain.Journal: NatureIn common: clusterProfiler, Scanpy, patchwork, 5 other tools, genetics / omics, cellular / molecular, 1 reference
- [3] doi:10.1126/sciadv.aeg3223 [code]
- The extreme diversity of retinal amacrine cells has deep evolutionary roots.Journal: Science advancesIn common: clusterProfiler, Scanpy, patchwork, 5 other tools, genetics / omics, cellular / molecular, 1 reference
- [4] doi:10.1101/gr.280436.125 [code]
- Cell type-specific gene regulatory atlas prioritizes drug targets and repurposable medicines in Alzheimer's disease.Journal: Genome researchIn common: Scanpy, seaborn, tidyverse, 3 other tools, Alzheimer's / dementia, genetics / omics, cellular / molecular, 3 references
- [5] doi:10.1038/s41467-026-69944-6 [code]
- Multi-modal dissection of cell-type specific TDP-43 pathology in the motor cortex.Journal: Nature communicationsIn common: clusterProfiler, Scanpy, patchwork, 4 other tools, genetics / omics, 2 references
- [6] doi:10.1002/advs.77986 [code]
- DUET-seq: An Open-Source Droplet Platform for High-Fidelity Joint Chromatin and Transcriptome Profiling Reveals Temporal Regulatory Decoupling in Single Cells.Journal: Advanced science (Weinheim, Baden-Wurttemberg, Germany)In common: clusterProfiler, Scanpy, patchwork, 5 other tools, genetics / omics, 1 reference
- [7] doi:10.1038/s41586-026-10214-2 [code]
- Multidimensional profiling of heterogeneity in supratentorial ependymomas.Journal: NatureIn common: clusterProfiler, Scanpy, patchwork, 5 other tools, genetics / omics, 1 reference
- [8] doi:10.1016/j.cell.2026.05.026 [code]
- The critical role of the endogenous immune compartment after CAR T cell therapy in recurrent GBM.Journal: CellIn common: clusterProfiler, Scanpy, patchwork, 5 other tools, genetics / omics, 1 reference
- [9] doi:10.1126/sciadv.aed2952 [code]
- Activation of transposable elements is linked to a region- and cell type-specific interferon response in Parkinson's disease.Journal: Science advancesIn common: clusterProfiler, Scanpy, patchwork, 5 other tools, cellular / molecular, 1 reference
- [10] doi:10.1038/s41398-026-04200-5 [code]
- Postmortem brain single-nucleus and bulk gene expression analyses identify shared and distinct abnormalities in bipolar disorder and major depressive disorder.Journal: Translational psychiatryIn common: clusterProfiler, Scanpy, patchwork, 3 other tools, genetics / omics, cellular / molecular, 2 references
Contribute
The authors of this paper can claim it, correct its record and validate its tracing map, and the maintainers of its code (its owner, or a public member of its organization) correct what it says of their repository; anyone signed in can ask for its removal. Every request goes to OSCR's own machine, which answers it; your account page follows them.
Sign in with ORCID to claim this paper as one of its authors, correct its record or validate its tracing map: when the paper's metadata lists your ORCID iD, you are recognized at once. Maintainers of its code: sign in with GitHub, then claim the repository on your account page.
Claim this paper
Correct its record
Say what each link of this record is, remove the ones that are not the paper's, add the ones that are missing. The correction becomes a new version of the record, in its Versions section.
Validate its tracing map
You validate the map as this page shows it: 1 repository of the authors' code, each at its verified commit and with its license, 8 scripts, and 8 matches between paragraphs and code (see the Code and Map sections). It then receives a DOI on Zenodo, with you (your ORCID iD) and OSCR as its creators; the code itself is not deposited.
The map's fingerprint: sha256:666d58a6641a271e…
Add the badge to its README
The badge links the code to this page. Copy one of these into the README of the paper's code: only you decide where it goes, and nothing is changed for you.
Markdown
[, paste the snippet at the top, then “Commit changes…” and, to review it first, “Create a new branch and start a pull request”. You open the pull request; OSCR asks for no permission.
Request its removal
To ask OSCR to remove this record, the copies of its authors' scripts or its tracing map, use the removal request page: signed in, you say who you are, what to remove and why, then review and confirm the request. Published rules decide every request (how).
Discussion, reproductions, activity
Discussion: questions and error reports about this paper and its code, from signed-in readers and its authors. It opens with sign-in.
Reproductions: reports from readers who ran the authors' code: what they reproduced, with which environment, commit and data. It opens with sign-in.
Activity: what happens around this paper: new versions of its record, its map's validation, discussions and reproductions. It opens with sign-in.
