swh:1:snp:0c004a03453a29b80f921a24433f7e780b9ceb53
Tip revision: c1069ff942f364c8bbda771405176d5f6173b3c8 authored by vobencha on 30 October 2018, 15:54:39 UTC
bump x.y.z versions to odd y after creation of RELEASE_3_8 branch
bump x.y.z versions to odd y after creation of RELEASE_3_8 branch
Tip revision: c1069ff
probeDataset.R
probeDataset <- function (es, query) {
exprsIndices <- query$exprs;
fDataQuery <- query$fData;
response <- list()
response[['dims']] <- dim(exprs(es))
response[['fvarLabels']] <- colnames(fData(es))
response[['probe']] <- exprs(es)[exprsIndices]
response[['fdata']] <- list()
for(i in seq_len(nrow(fDataQuery))) {
row <- fDataQuery[i,]
response[['fdata']][[row$name]] <- fData(es)[[row$name]][row$indices[[1]]]
}
jsonlite::toJSON(response)
}