Turn target-to-disease rows into a table

Pure. Rows arrive already sorted by score, best first, and that order is kept.

Usage

opentargets_parse_diseases(body, ensembl_id = NA_character_)

Arguments

body

A parsed Open Targets GraphQL response body.

ensembl_id

The Ensembl gene id that was queried, used to build source_url.

Value

A tibble of disease, disease_id, score, and source_url, or NULL when the target is absent or has no associations.

Examples

body <- list(data = list(target = list(
  approvedSymbol = "TP53",
  associatedDiseases = list(count = 1, rows = list(
    list(score = 0.88, disease = list(id = "MONDO_0018875", name = "LFS"))
  ))
)))
opentargets_parse_diseases(body, "ENSG00000141510")
#> # A tibble: 1 × 4
#>   disease disease_id    score source_url                                        
#>   <chr>   <chr>         <dbl> <chr>                                             
#> 1 LFS     MONDO_0018875  0.88 https://platform.opentargets.org/evidence/ENSG000…