OSCR

Probabilistic Joint and Individual Variation Explained (ProJIVE) for Data Integration.

Code ↔ Paper

5 matches between paragraphs of the paper and lines of its authors' code, computed by the harvester (lexical-v1). Click a colored paragraph or line to see its counterpart.

The 5 matches
  1. [1] § Methods › Expectation-Maximization Algorithm for ProJIVE ↔ Simulations/FnRunProJIVE_Simulations_n1000_Feng.R, lines 1–67 · score 0.75 · pPCA, Cholesky decomposition, AJIVE solution, covariance matrix, square, MLE
  2. [2] § Methods › Expectation-Maximization Algorithm for ProJIVE ↔ Simulations/FnRunProJIVE_Simulations_n1000_GG.R, lines 1–64 · score 0.75 · pPCA, Cholesky decomposition, AJIVE solution, covariance matrix, square, MLE
  3. [3] § Methods › Model Identifiability › Theorem 1. ↔ R/GenerateToyData.R, lines 1–55 · score 0.71 · joint variation, individual variation, error variances, joint signal, individual components, variable
  4. [4] § Simulation Study › Simulation Design ↔ R/GenerateToyData.R, lines 1–55 · score 0.67 · individual variation explained, individual ranks, joint signal, attributable, model, blocks
  5. [5] § Methods › Model Identifiability ↔ ProblematicIdentifiabilityExample_v2.Rmd, lines 87–109 · score 0.55 · positive semidefinite, orthogonal transformations, linear, components, Model, matrix

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 · 204 lines · 9.6 KB · other · 2 matches

  1. #' Generates K Simulated Datasets that follow JIVE Model using binary subject scores
  2. #'
  3. #' @param n Sample size.
  4. #' @param p Number of features per block (input as a vector).
  5. #' @param JntVarEx Proportions of joint variation explained (input as a vector).
  6. #' @param IndVarEx Proportions of individual variation explained (input as a vector).
  7. #' @param jnt_rank Joint Rank.
  8. #' @param equal.eig Logical (TRUE/FALSE), which allows the user to specify whether components within a data-blocks joint (or individual) signal should be equally waited. The default is FALSE.
  9. #' @param ind_ranks Individual rank for each block (input as a vector).
  10. #' @param JntVarAdj Logical (TRUE/FALSE): Specify whether signal matrices should be weighted to achieve the desired proportions of variation attributable to the joint signal.
  11. #' @param mix.probs A numerical vector that specifies the number of individual components (ranks) for each data block. Each entry describes the probability in the Gaussian Mixture model for the score. Entries need to add to 1.
  12. #' @param SVD.plots Logical (TRUE/FALSE): Should plots of signal matrix singular values be produced to verify ranks?
  13. #' @param Error Logical (TRUE/FALSE): Should the data be noise-contaminated?
  14. #' @param print.cor logical (TRUE/FALSE), Print the correlation matrix for the scores? (Allows one to assess orthoganility between scores/compnents)
  15. #' @param Loads char: Toy data can be generated with loadings from 'Gaussian', 'Rademacher', or 'Double_Exp' (double exponential) distributions. Loadings can also be fixed at binary (0/1) values assigned to half of the variables with keyword 'Fixed'.
  16. #' @param Scores char: Joint subject scores can be randomly generated from 'Gaussian', 'Binomial', or 'Gaussian_Mixture' distributions. The last refers to a mixture of Gaussians with unit variance, where 20% have mean -4, 50% have mean 0, and 30% have mean 4. In all cases individual scores are standard Gaussian.
  17. #' @param error.variances A numeric vector specifying the variance of the noise for each dataset.
  18. #'
  19. #' @return K simulated datasets that follow JIVE Model.
  20. #' Contains four main elements:
  21. #' - Data Components: A list containing three sub-lists (each of length K), JointSignalMatrices, IndivSignalMatrices, and NoiseMatrices.
  22. #' - Data Blocks: A list of length K, where each element is the final observed dataset (joint + individual + noise) of dimension n x p(k).
  23. #' - Scores: A list with two matrices, Joint (n x jnt_rank) and Indiv (n x sum(ind_ranks)).
  24. #' - Loadings: A list containing Joint and Indiv loadings.
  25. #' @export
  26. #'
  27. #' @examples
  28. #'r.J = 3
  29. #'r.I1 = 2
  30. #'r.I2 = 2
  31. #'n = 1000
  32. #'p1 = 20
  33. #'p2 = 200
  34. #'JntVarEx1 = 0.1
  35. #'JntVarEx2 = 0.1
  36. #'IndVarEx1 = 0.25
  37. #'IndVarEx2 = 0.25
  38. #'ToyDat = GenerateToyData(n = n, p = c(p1, p2), JntVarEx = c(0.1, 0.1),
  39. #'IndVarEx = c(0.25, 0.25), jnt_rank = r.J, ind_ranks = c(r.I1, r.I2))
  40. GenerateToyData <- function(n, p, JntVarEx, IndVarEx, jnt_rank = 1, equal.eig = FALSE, ind_ranks, JntVarAdj = TRUE, mix.probs = NULL,
  41. SVD.plots = TRUE, Error = TRUE, print.cor = TRUE, Loads = "Rademacher", Scores = "Gaussian_Mixture",
  42. error.variances = NULL){
  43. r.J = jnt_rank
  44. r.I = ind_ranks
  45. K = length(p)
  46. Scores.text = ifelse(is.numeric(Scores), "as defined by user", paste("from", Scores, "distributions"))
  47. Loads.text = ifelse(is.list(Loads), "as defined by user.", paste("from", Loads, "distributions."))
  48. cat(paste0("Generating Scores ", Scores.text, " and Loadings ", Loads.text, ". \n"))
  49. if(is.numeric(Scores)){
  50. JntScores = Scores[,1:r.J, drop = FALSE]
  51. IndivScores = Scores[,-(1:r.J), drop = FALSE]
  52. } else if(Scores=="Binomial"){
  53. JntScores = matrix(stats::rbinom(n*r.J, size=1, prob=0.2), nrow = n, ncol = r.J)
  54. b = stats::rbinom(n*sum(r.I), size=1, prob=0.4)
  55. b = 1 - 2*b
  56. IndivScores = matrix(b, nrow = n, ncol = sum(r.I))
  57. } else if (Scores=="Gaussian_Mixture"){
  58. if(is.null(mix.probs)){mix.probs = c(0.2, 0.5, 0.3)}
  59. n.groups = length(mix.probs)
  60. n.vals = (n.groups-1)/2
  61. if(is.integer(length(mix.probs)/2)){
  62. group.means = c(-4*(n.vals:1),4*(1:n.vals))
  63. } else {
  64. group.means = c(-4*(n.vals:1),0,4*(1:n.vals))
  65. }
  66. JointScores.groups = list()
  67. for(l in 1:length(mix.probs)){
  68. JointScores.groups[[l]] =
  69. matrix(stats::rnorm(n*mix.probs[l]*r.J, mean = group.means[l]),
  70. ncol = r.J)}
  71. JntScores = do.call(rbind, JointScores.groups)
  72. IndivScores = matrix(stats::rnorm(n*sum(r.I)), nrow = n, ncol = sum(r.I))
  73. } else if(Scores=="Gaussian"){
  74. JntScores = matrix(stats::rnorm(n*r.J), ncol = r.J)
  75. IndivScores = matrix(stats::rnorm(n*sum(r.I)), nrow = n, ncol = sum(r.I))
  76. } else if (is.numeric(Scores)){
  77. if(nrow(Scores == n) & ncol(Scores) == r.J+sum(r.I)){
  78. JntScores = Scores[,1:r.J]
  79. IndivScores = Scores[,-(1:r.J)]
  80. } else{
  81. cat("Matrix of subject scores must have n rows and jnt_rank+sum(ind_ranks) columns.")
  82. }
  83. } else {
  84. message("Please use one of the following three options to generate data with corresponding subject scores: 1) 'Gaussian' 2) 'Gaussian_Mixture' 3) Binomial.\n")
  85. message("Alternatively, the user can enter a matrix of subject scores with n rows and jnt_rank+sum(ind_ranks) columns.\n")
  86. }
  87. colnames(JntScores) = paste("Jnt Score", 1:r.J)
  88. IndivScores.names = NULL
  89. for(k in 1:K){
  90. IndivScores.names = c(IndivScores.names, paste0("Indiv X", k, " Score ", 1:r.I[k]))
  91. }
  92. colnames(IndivScores) = IndivScores.names
  93. if(print.cor){
  94. cat("The correlation between subject scores is given by")
  95. print(round(stats::cor(cbind(JntScores, IndivScores)),4))
  96. }
  97. Jnt.Loads.All = list()
  98. Indiv.Loads.All = list()
  99. D.I = list()
  100. Noise = Joint.Sigs = Indiv.Sigs = list()
  101. Sig.Mats = Data.Mats = list()
  102. temp.fcn = function(x){x[sample(round(length(x)/2))] = 1; x}
  103. if(is.null(error.variances)){
  104. error.variances = rep(1,K)
  105. } else if(is.numeric(error.variances) & length(error.variances) != K){
  106. cat("The parameter 'error.variances' can be entered as 1) a numeric vector with the same length as 'p' (homoscedastic option) or 2) a list of length 'p' whose kth entry is a numeric vector of length 'p_k'.\n")
  107. } else if(is.list(error.variances) & length(error.variances) != K){
  108. cat("The parameter 'error.variances' can be entered as 1) a numeric vector with the same length as 'p' (homoscedastic option) or 2) a list of length 'p' whose kth entry is a numeric vector of length 'p_k'.\n")
  109. }
  110. for(k in 1:K){
  111. if(length(Loads)==1){
  112. if(Loads == "Gaussian"){
  113. Jnt.Loads.All[[k]] = matrix(stats::rnorm(r.J*p[k]), nrow = r.J, ncol = p[k])
  114. } else if (Loads == "Fixed"){
  115. Jnt.Loads.All[[k]] = matrix(apply(matrix(0, nrow = r.J, ncol = p[k]), 1, temp.fcn), nrow = r.J)
  116. } else if (Loads == "Double_Exp"){
  117. Jnt.Loads.All[[k]] = matrix(extraDistr::rlaplace(p[k]*(r.J)), nrow = r.J)
  118. } else if (Loads == "Rademacher"){
  119. Jnt.Loads.All[[k]] = matrix(extraDistr::rsign(p[k]*(r.J)), nrow = r.J)
  120. }
  121. } else if (is.list(Loads)){
  122. Jnt.Loads.All[[k]] = t(Loads[[1]][[k]])
  123. }
  124. D.J = (1 - equal.eig)*diag(r.J:1) + equal.eig*diag(rep(1,r.J))
  125. # Joint.Sigs[[k]] = JntScores%*%sqrt(D.J[[k]])%*%Jnt.Loads.All[[k]]
  126. Joint.Sigs[[k]] = JntScores%*%D.J%*%Jnt.Loads.All[[k]]
  127. if(SVD.plots){
  128. plot(svd(Joint.Sigs[[k]])$d, ylab = "Singular Values",
  129. main = paste0("SVD of Joint Signal from X", k))
  130. }
  131. temp.IndScores = IndivScores[,(k>1)*sum(r.I[1:(k-1)])+(1:r.I[k])]
  132. if(length(Loads)==1){
  133. if(Loads == "Gaussian"){
  134. Indiv.Loads.All[[k]] = matrix(stats::rnorm(n = p[k]*r.I[k]), nrow = r.I[k], ncol = p[k])
  135. } else if (Loads == "Fixed"){
  136. temp.fcn = function(x){x[sample(round(length(x)/4))] = 1; x}
  137. Indiv.Loads.All[[k]] = matrix(apply(matrix(-1, nrow = r.I[k], ncol = p[k]), 1, temp.fcn), nrow = r.I[k])
  138. } else if (Loads == "Double_Exp"){
  139. Indiv.Loads.All[[k]] = matrix(extraDistr::rlaplace(p[k]*(r.I[k])), nrow = r.I[k])
  140. } else if (Loads == "Rademacher"){
  141. Indiv.Loads.All[[k]] = matrix(extraDistr::rsign(p[k]*(r.I[k])), nrow = r.I[k])
  142. }
  143. } else if (is.list(Loads)){
  144. Indiv.Loads.All[[k]] = t(Loads[[2]][[k]])
  145. }
  146. D.I[[k]] = (1 - equal.eig)*diag(r.I[k]:1) + equal.eig*diag(rep(1,r.I[k]))
  147. Indiv.Sigs[[k]] = temp.IndScores%*%D.I[[k]]%*%Indiv.Loads.All[[k]]
  148. if(SVD.plots){
  149. plot(svd(Indiv.Sigs[[k]])$d, ylab = "Singular Values",
  150. main = paste0("SVD of Individual Signal from X", k))
  151. }
  152. Sig.Mats[[k]] = Joint.Sigs[[k]] + Indiv.Sigs[[k]]
  153. if(is.vector(error.variances) & !is.list(error.variances)){
  154. Noise[[k]] = matrix(stats::rnorm(n*p[k], sd = sqrt(error.variances[k])), nrow = n)
  155. } else if(is.list(error.variances)){
  156. Noise[[k]] = matrix(mvtnorm::rmvnorm(n, sigma = diag(error.variances[[k]])), nrow = n)
  157. }
  158. Data.Mats[[k]] = CJIVE::AdjSigVarExp(Joint.Sigs[[k]], Indiv.Sigs[[k]], Noise[[k]],
  159. JntVarEx[k], IndVarEx[k])
  160. Joint.Sigs[[k]] = Data.Mats[[k]]$J
  161. Indiv.Sigs[[k]] = Data.Mats[[k]]$I
  162. }
  163. Blocks = lapply(Data.Mats, function(x) x[["Data"]])
  164. Dat.Comps = list(Joint.Sigs, Indiv.Sigs, Noise)
  165. names(Dat.Comps) = c("JointSignalMatrices", "IndivSignalMatrices", "NoiseMatrices")
  166. Scores = list(JntScores, IndivScores)
  167. names(Scores) = c("Joint", "Indiv")
  168. Loadings = list(list(),list())
  169. names(Loadings) = c("Joint", "Indiv")
  170. for(k in 1:K){
  171. Loadings[["Joint"]][[k]] = D.J%*%Jnt.Loads.All[[k]]
  172. Loadings[["Indiv"]][[k]] = D.I[[k]]%*%Indiv.Loads.All[[k]]
  173. }
  174. out = list(Dat.Comps, Blocks, Scores, Loadings)
  175. names(out) = c("Data Components", "Data Blocks", "Scores", "Loadings")
  176. return(out)
  177. }

GenerateToyData.R at commit 4b1fbc5, under other · at the source

Overview

Authors: Raphiel J. Murden1, Ganzhong Tian1, Deqiang Qiu2, Benjamin B. Risk1
  1. Department of Biostatistics and Bioinformatics, Rollins School of Public Health, Emory University, Atlanta, GA
  2. Department of Radiology and Imaging Sciences, Emory University School of Medicine, Atlanta, GA
Institutions: Emory University (United States)
Dates: published online 15 June 2026; in print June 2026
Type: Research article · Language: English
License: CC BY-NC-ND
Identifiers: DOI 10.1080/10618600.2026.2639081 · PMID 42368974 · PMCID PMC13308631 · OpenAlex W7135078391
Open access: hybrid, a free copy (OpenAlex)
Status: code verified
Categories: human (organism), Alzheimer's / dementia (population), methods / tools (subfield)
Methods: Statistics, Smoothing, state filtering, decompositions, Machine learning, fMRI & imaging, Preprocessing
Keywords: ADNI, Alzheimer’s Disease, JIVE, Multi-block data analysis, Multimodal data analysis, Probabilistic PCA
Topic: Time Series Analysis and Forecasting (Signal Processing, Computer Science), according to OpenAlex
Funding: NIA NIH HHS (R21 AG064405, R21 AG066970, R01 AG072603, P30 AG066511); NIMH NIH HHS (R01 MH129855)
Citations: not cited yet (Europe PMC); 41 references in the paper

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 5 matches between paragraphs and lines of code.

thebrisklab/ProJIVE

License: other
State: the link answers, verified on 27 September 2026
Evidence: files inventoried
Commit: 4b1fbc556bcc37ab4072a44c1fe9618abc7eb903, 12 August 2026
Languages: R (118), MATLAB (44), Python (31), C++ (1)
Size: 268 files, 194 scripts
Software Heritage: not archived
Found in: the text, “Theorem 1.”
Holds: README, license file, environment (DESCRIPTION, ARCHIVE/DESCRIPTION), tests, documentation, 5 notebooks
Not found: CITATION.cff, continuous integration
Tools: NumPy (31 files), ggplot2 (21 files), tidyverse (21 files), SciPy (19 files), reshape2 (16 files), reticulate (13 files), cowplot (12 files), scikit-learn (5 files), Statistics and Machine Learning Toolbox (3 files), mgcv (1 file), psych (1 file)
Availability: 1 check, the latest on 27 September 2026: the link answers
  • 27 September 2026: the link answers
197 files

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;
  • 194 scripts, each with its path and the digest of its content;
  • 5 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

No dataset and no data link were found in the paper.

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 2, 28 September 2026

  • Publisher: n/a → Taylor & Francis

Version 1, 27 September 2026: the first record

Recorded: type, language, journal, pages, dates, 4 authors, 6 keywords, 2 funders, 37 references.

Cite

This paper

Murden, R. J., Tian, G., Qiu, D., & Risk, B. B. (2026). Probabilistic Joint and Individual Variation Explained (ProJIVE) for Data Integration. Journal of computational and graphical statistics : a joint publication of American Statistical Association, Institute of Mathematical Statistics, Interface Foundation of North America, 10.1080/10618600.2026.2639081. https://doi.org/10.1080/10618600.2026.2639081

BibTeX

@article{murden2026probabilistic,
author = {Murden, Raphiel J. and Tian, Ganzhong and Qiu, Deqiang and Risk, Benjamin B.},
title = {{Probabilistic Joint and Individual Variation Explained (ProJIVE) for Data Integration}},
journal = {Journal of computational and graphical statistics : a joint publication of American Statistical Association, Institute of Mathematical Statistics, Interface Foundation of North America},
year = {2026},
month = jun,
pages = {10.1080/10618600.2026.2639081},
publisher = {Taylor \& Francis},
issn = {1061-8600},
doi = {10.1080/10618600.2026.2639081},
url = {https://doi.org/10.1080/10618600.2026.2639081},
pmid = {42368974},
pmcid = {PMC13308631}
}

RIS

TY - JOUR
AU - Murden, Raphiel J.
AU - Tian, Ganzhong
AU - Qiu, Deqiang
AU - Risk, Benjamin B.
TI - Probabilistic Joint and Individual Variation Explained (ProJIVE) for Data Integration
T2 - Journal of computational and graphical statistics : a joint publication of American Statistical Association, Institute of Mathematical Statistics, Interface Foundation of North America
J2 - J Comput Graph Stat
PY - 2026
DA - 2026/06/15
SP - 10.1080/10618600.2026.2639081
SN - 1061-8600
PB - Taylor & Francis
DO - 10.1080/10618600.2026.2639081
UR - https://doi.org/10.1080/10618600.2026.2639081
LA - en
ER -

CSL-JSON

{
"id": "10.1080/10618600.2026.2639081",
"type": "article-journal",
"title": "Probabilistic Joint and Individual Variation Explained (ProJIVE) for Data Integration",
"container-title": "Journal of computational and graphical statistics : a joint publication of American Statistical Association, Institute of Mathematical Statistics, Interface Foundation of North America",
"author": [
{
"family": "Murden",
"given": "Raphiel J."
},
{
"family": "Tian",
"given": "Ganzhong"
},
{
"family": "Qiu",
"given": "Deqiang"
},
{
"family": "Risk",
"given": "Benjamin B."
}
],
"container-title-short": "J Comput Graph Stat",
"page": "10.1080/10618600.2026.2639081",
"DOI": "10.1080/10618600.2026.2639081",
"PMID": "42368974",
"PMCID": "PMC13308631",
"ISSN": "1061-8600",
"publisher": "Taylor & Francis",
"URL": "https://doi.org/10.1080/10618600.2026.2639081",
"language": "en",
"issued": {
"date-parts": [
[
2026,
6,
15
]
]
}
}

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.7554/elife.103097 [code]
Canonical neurodevelopmental trajectories of structural and functional manifolds.
Journal: eLife
In common: mgcv, reticulate, cowplot, 7 other tools
[2] doi:10.1093/bioinformatics/btag592 [code]
Network-based stratification of allele-specific expression reveals patient subgroups in Huntington's disease.
Journal: Bioinformatics (Oxford, England)
In common: mgcv, reticulate, cowplot, 6 other tools
[3] doi:10.1002/hbm.70605 [code]
BrainEnrich: Revealing Biological Insights for Imaging-Derived Phenotypes Through Transcriptomic Enrichment.
Journal: Human brain mapping
In common: reticulate, cowplot, reshape2, 6 other tools, 1 reference
[4] doi:10.1126/sciadv.aeg3223 [code]
The extreme diversity of retinal amacrine cells has deep evolutionary roots.
Journal: Science advances
In common: reticulate, psych, cowplot, 6 other tools
[5] doi:10.1038/s44320-026-00208-7 [code]
Interpretable deep generative ensemble learning for single-cell omics with Hydra.
Journal: Molecular systems biology
In common: mgcv, reticulate, cowplot, 5 other tools
[6] doi:10.1162/imag.a.1245 [code]
Towards precision EEG connectomics: Evaluating the benefits of dense sampling.
Journal: Imaging neuroscience (Cambridge, Mass.)
In common: psych, cowplot, reshape2, 5 other tools, 1 reference
[7] doi:10.1371/journal.pcbi.1014327 [code]
Supervised deep learning with gene functional annotation for cell classification.
Journal: PLoS computational biology
In common: reticulate, cowplot, reshape2, 5 other tools, Alzheimer's / dementia
[8] doi:10.1038/s44318-026-00818-9 [code]
FAM134B-mediated ER-phagy degrades APP and suppresses Alzheimer's disease pathology.
Journal: The EMBO journal
In common: reticulate, cowplot, reshape2, 5 other tools, Alzheimer's / dementia
[9] doi:10.1016/j.nicl.2026.104012 [code]
Structural-functional multilayer brain network properties and outcome of combined repetitive transcranial magnetic stimulation and psychotherapy for obsessive-compulsive disorder.
Journal: NeuroImage. Clinical
In common: psych, reshape2, Statistics and Machine Learning Toolbox, 5 other tools, 1 reference
[10] doi:10.1038/s41467-026-76939-w [code]
HIPPIE: a generative model for electrophysiological analysis across species, technologies, and modalities.
Journal: Nature communications
In common: reticulate, cowplot, reshape2, 5 other tools, methods / tools

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.

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.