Let’s first load the library
library(tidyverse)
## ── Attaching packages ─────────────────────────────────────── tidyverse 1.3.0 ──
## ✔ ggplot2 3.3.0 ✔ purrr 0.3.4
## ✔ tibble 3.0.1 ✔ dplyr 0.8.99.9003
## ✔ tidyr 1.0.3 ✔ stringr 1.4.0
## ✔ readr 1.3.1 ✔ forcats 0.5.0
## ── Conflicts ────────────────────────────────────────── tidyverse_conflicts() ──
## ✖ dplyr::filter() masks stats::filter()
## ✖ dplyr::lag() masks stats::lag()
Then load the data
nbr1 <- readRDS("./data/nbr1.rds")
nbr2 <- readRDS("./data/nbr2.rds")
Let’s make the whole
nbr <- rbind(nbr1,nbr2)
rm(nbr1)
rm(nbr2)
Let’s check the dimensions
dim(nbr)
## [1] 1312925 66
Names of variables
names(nbr)
## [1] "OFFICECODE" "BE_REG_NO"
## [3] "BE_REG_DATE" "MENIFEST"
## [5] "IDE_TYP_SAD" "PROC"
## [7] "EXPORTER_BIN" "CONSIGNOR_EXPORTER"
## [9] "ITEMS" "TOT_PCK"
## [11] "AGENT_REFERENCE" "PLACE_OF_LOADING"
## [13] "LOCATION_GOODS" "BIN"
## [15] "CONSIGNEE_IMPORTER" "TOT_OTHER_COSTS"
## [17] "AIN" "DECLARANT_AGENT"
## [19] "COUNTRY_EXPORT" "CODE_EXPORT"
## [21] "COUNTRY_ORGIN" "COU_DES"
## [23] "NAME_COUNDES" "NAME_CARRIER_NATIONALITY"
## [25] "DELIVERY_TERMS" "MOT"
## [27] "OFFICE_ENTRY_EXIT" "LOCTION_OF_GOODS"
## [29] "PLACE_OF_LOADING_UNLOADING" "MARKS_NUMBERS"
## [31] "FINE_PENALTY" "NBER_PKGS_ITEM"
## [33] "PKG_COD" "DES_GOODS"
## [35] "CRF_EXP_NO" "UP_UD"
## [37] "A_D" "INV"
## [39] "CURRENCY" "TOTAL_INVOICED_VALUE"
## [41] "EXCHANGE_RATE" "BANK_CODE"
## [43] "BRANCH_CODE" "LC_NO"
## [45] "SECTOR_FUND" "ITEM_NO"
## [47] "HSCODE" "CO_CODE"
## [49] "GROSS_MASS_KG" "AGR_CODE"
## [51] "CPC" "NET_MASS_KG"
## [53] "LINE_NUM_CARGO_LADING_NO" "QUANTITY_UNITS"
## [55] "ITEM_PRICE" "DEC_U_PRICE"
## [57] "ASS_U_PRICE" "ASSESSABLE_VALUE"
## [59] "TOTAL_TAX" "MODOFPAYMENT"
## [61] "ASSESSMENT_NUM" "ASSESSMENT_DAT"
## [63] "RECEIPT_NUM" "RECEIPT_DATE"
## [65] "DF_CV_ITC_FP" "TOTAL_DECLARATION"