R/getFSR.R

In EBukin/tradeAnalysis-pack: Set of functions for trade data analysis

#' Get list of former soviet republics in the CT countries codes
#' 
getFSR <- 
  function() {
  partners %>% 
    filter(Partner.Code %in% 
             c(112, 643, 498, 804, 268, 51, 31, 398, 417, 762, 860, 795))
  }