In ShixiangWang/UCSCXenaTools: Download and Explore Datasets from UCSC Xena Data Hubs

library(UCSCXenaTools)

df =  XenaData %>%
    dplyr::group_by(XenaHostNames) %>%
    dplyr::summarise(count = dplyr::n())
df

urls = dplyr::tibble(
    name = as.character(.xena_hosts),
    url = names(.xena_hosts)
)
urls

data = dplyr::left_join(
    df, urls, by = c("XenaHostNames"="name")
) %>% dplyr::arrange(dplyr::desc(count))


colnames(data) = c("Data hub", "Dataset count", "URL")
data

knitr::kable(data, format = "markdown")

ShixiangWang/UCSCXenaTools documentation built on Jan. 17, 2024, 2:19 a.m.