Как выполнить выборочную rbind для наборов данных в R

Я пытаюсь использовать rbind для добавления разных наборов данных по странам. Список наборов данных

data <- c('a1','a2','a3','b1','b2','bu3','bu4','c1','c3')
code <- c('a','b','bu',c)

Структура данных примерно такая:

countrya1 <- c("a","a","a")
yeara1 <- c("1","1","1")
inca1 <- c("1","2","3")
a1 <- data.frame(countrya1,yeara1,inca1)
countrya2 <- c("a","a","a")
yeara2 <- c("2","2","2")
inca2 <- c("1","4","3")
a2 <- data.frame(countrya2,yeara2,inca2)
countryb1 <- c("b","b","b")
yearb1 <- c("1","1","1")
incb1 <- c("1","2","7")
b1 <- data.frame(countryb1,yearb1,incb1)
countryb2 <- c("b","b","b")
yearb2 <- c("2","2","2")
incb2 <- c("6","2","3")
b2 <- data.frame(countryb2,yearb2,incb2)

Код, который я использовал для объединения всех наборов данных, выглядит следующим образом:

df=NULL
for (i in length(data)){
df1 <-read.dta(data[i])
df <-rbind(df,df1)
} 

Это связывает все наборы данных вместе в df. Есть ли способ связать a1,a2,a3 вместе и b1,b2,b3 вместе и так далее. Короче говоря, я хочу связать наборы данных по «коду». Есть ли способ сделать это в R? Заранее спасибо за помощь.