covariateData <- Andromeda::andromeda(
covariates = data.frame(rowId = c(1, 3, 5, 7, 9),
covariateId = c(10, 20, 10, 10, 20),
covariateValue = c(1, 1, 1, 1, 1)),
covariateRef = data.frame(covariateId = c(10, 20),
covariateNames = c("covariateA",
"covariateB"),
analysisId = c(1, 1)))
mappedData <- MapIds(covariateData)
# columnId and rowId are now starting from 1 and are consecutive
mappedData$covariates
Run the code above in your browser using DataLab