ref_client <- ga4gh_client("http://1kgenomes.ga4gh.org", api_location = "")
## Not run:
#
# library(magrittr)
# ## Find a dataset to search in
# datasets <- ref_client %>% search_datasets() %>% content()
# d_id <- datasets$datasets[[1]]$id
#
# ## Find an rna quantification set to search in
# rna_quantification_sets <- ref_client %>%
# search_rna_quantification_sets(d_id) %>% content()
# rqs_id <- rna_quantification_sets$rnaQuantificationSets[[1]]$id
#
# ## Find an rna quantification to search in
# rna_quantifications <- ref_client %>%
# search_rna_quantifications(rqs_id) %>% content()
# rq_id <- rna_quantifications$rnaQuantifications[[1]]$id
#
# ## Search for expression levels in the rna quantification
# expression_levels <- ref_client %>%
# search_expression_levels(rq_id) %>% content()
# expression_levels
#
# ## End(Not run)
Run the code above in your browser using DataLab