Best way to extract a single letter from each row and create a new column in R?

Question

Below is an excerpt of the data I\'m working with. I am having trouble finding a way to extract the last letter from the sbp.id column and using the results to add a new col