Strips source prefixes (e.g., host-, phage-), the tRNA- prefix,
and the gene-copy suffix (-\d+-\d+) to produce compact labels
suitable for plot axes.
Examples
shorten_trna_names("host-tRNA-Ser-CGT-1-1")
#> [1] "Ser-CGT"
shorten_trna_names(c("phage-tRNA-Glu-TTC-2-1", "tRNA-Ala-AGC-3-1"))
#> [1] "Glu-TTC" "Ala-AGC"