Удалить часть строки после «.»

Я работаю с номерами доступа NCBI Reference Sequence, такими как переменная a:

a <- c("NM_020506.1","NM_020519.1","NM_001030297.2","NM_010281.2","NM_011419.3", "NM_053155.2")  

Чтобы получить информацию из пакета biomart, мне нужно удалить .1, .2и т. д. после инвентарных номеров. Обычно я делаю это с помощью следующего кода:

b <- sub("..*", "", a)

# [1] "" "" "" "" "" ""

Но, как видите, это неправильный способ для этой переменной. Может ли кто-нибудь помочь мне с этим?