data <- data.frame(
protein_sequence = c("abcdefghijklmnop", "abcdefghijklmnop"),
pep_stripped_sequence = c("abc", "jklmn")
)
calculate_sequence_coverage(
data,
protein_sequence = protein_sequence,
peptides = pep_stripped_sequence
)
Run the code above in your browser using DataLab