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
#
# ## Search for bio samples in the dataset
# bio_samples <- ref_client %>% search_bio_samples(d_id) %>% content()
# bio_samples
#
# ## End(Not run)
Run the code above in your browser using DataLab