сбор всех доступных данных за год в библиотеке "oec" для R

Question

Я пытаюсь собрать все доступные данные о двусторонней торговле по конкретному адресу, используя библиотеку "oec" для R, но функция "getdata" будет возвращать данные только для конкретной пары стран.Я хочу получить все данные по двусторонним за определенный год (данные по всем парам стран).Я попытался написать цикл, чтобы получить то, что хотел, но R занимает слишком много времени, чтобы закончить его.Это код, который я использовал:

x = 1
y = 1
library(oec)
countries <- country_codes()

while(x < 264){
  if(x == y){
    y = y + 1
  }
  else{
    try(table<- rbind(getdata(countries[get("x"),1], countries[get("y"),1], year = 2014)))
    y = y + 1}
  if(y >= 264){
    a = a + 1
    x = x + 1
    y = 1
  }}