## ----setup, include = FALSE---------------------------------------------------
knitr::opts_chunk$set(collapse = TRUE, comment = "#>", fig.width = 7, fig.height = 4.2)
library(genevintage)

## ----frac---------------------------------------------------------------------
ids <- c(
  "ENSMUSG00000051951", "ENSMUSG00000089699", "ENSMUSG00000051951",
  "TP53"
)
cand <- detect_species(ids)
head(cand[, c("species", "prefix", "frac")])

## ----violations---------------------------------------------------------------
qmax_violations()

## ----dist---------------------------------------------------------------------
ids2 <- readLines(system.file("extdata", "example_ids.txt.gz",
  package = "genevintage"
))
head(detect_release(ids2), 3)

## ----unordered----------------------------------------------------------------
head(detect_release(c("YAL001C", "YAL002W", "YAL003W"), species = "yeast"), 5)

## ----edge---------------------------------------------------------------------
head(detect_release(c("ENSG00000141510", "ENSG00000012048"), species = "human"), 3)