# NOT RUN {
text <- c(
paste(
"Identify baseline single nucleotide polymorphisms (SNPs)[SO:0000694]",
"(insertions)[SO:0000667], and (deletions)[SO:0000045] that correlate",
"with reduced (ledipasvir)[pubchem.compound:67505836] antiviral drug",
"efficacy in (Hepatitis C virus subtype 1)[taxonomy:31646]"
),
paste(
"Identify treatment emergent amino acid (substitutions)[SO:1000002]",
"that correlate with antiviral drug treatment failure"
),
paste(
"Determine whether the treatment emergent amino acid",
"(substitutions)[SO:1000002] identified correlate with treatment",
"failure involving other drugs against the same virus"
)
)
text %>%
compose_usability() %>%
convert_json()
# }
Run the code above in your browser using DataLab