symbol_to_symbol {mgi.report.reader}

Update marker symbols

Description

symbol_to_symbol() remaps old marker symbols to, in-use, most up to date symbols.

Usage

symbol_to_symbol(x, report_file = NULL, n_max = Inf)

Arguments

x

A character vector of marker symbols to be remapped.

report_file

The path to a MRK_List1.rpt file. Leave this as NULL and the function will automatically download the report from https://www.informatics.jax.org/downloads/reports/MRK_List1.rpt.

n_max

Maximum number of lines to read from the report_file.

Value

A character vector of most up to date symbols.

Examples

rpt_ex01 <- report_example("MRK_List1-EX01.rpt")
read_report(report_file = rpt_ex01, report_type = "MRK_List1") |>
  dplyr::select("marker_status", "marker_symbol", "marker_symbol_now")

# NB:
#   - "1700024N20Rik" has two conflicting mappings, so maps to `NA`.
#   - "Hes1" is not present in MRK_List1-EX01.rpt, so maps to `NA`.
#   - "Plpbp" (official) and "Prosc" (withdrawn) both map to "Plpbp"

marker_symbols <- c("2200002F22Rik", "Plpbp", "Prosc", "1700024N20Rik", "Hes1")
symbol_to_symbol(x = marker_symbols, report_file = rpt_ex01)