Generates a variant type table
Value
Returns the inputted variant table with variant type ("SBS", "DBS", "INS", "DEL") added as an appended "Variant_Type" column
Examples
data(musica)
variants <- variants(musica)
musicatk:::add_variant_type(variants)
#> chr start end ref alt sample
#> <fctr> <num> <num> <char> <char> <fctr>
#> 1: chr1 11020563 11020563 C A TCGA-94-7557-01A-11D-2122-08
#> 2: chr1 43430030 43430030 G T TCGA-94-7557-01A-11D-2122-08
#> 3: chr1 58682403 58682403 A G TCGA-94-7557-01A-11D-2122-08
#> 4: chr1 109508295 109508295 C G TCGA-94-7557-01A-11D-2122-08
#> 5: chr1 156384826 156384826 A C TCGA-94-7557-01A-11D-2122-08
#> ---
#> 907: chr19 54885292 54885292 G A TCGA-ER-A19O-06A-11D-A197-08
#> 908: chr20 49374328 49374328 A T TCGA-ER-A19O-06A-11D-A197-08
#> 909: chrX 73213768 73213768 T G TCGA-ER-A19O-06A-11D-A197-08
#> 910: chrX 101292834 101292834 G A TCGA-ER-A19O-06A-11D-A197-08
#> 911: chrX 107526690 107526690 C T TCGA-ER-A19O-06A-11D-A197-08
#> Variant_Type
#> <char>
#> 1: SBS
#> 2: SBS
#> 3: SBS
#> 4: SBS
#> 5: SBS
#> ---
#> 907: SBS
#> 908: SBS
#> 909: SBS
#> 910: SBS
#> 911: SBS