library(ggplot2) 
library(readr)
library(dplyr)

infoTrain = read_csv('../input/ItemInfo_train.csv')
pairTrain = read_csv('../input/ItemPairs_train.csv')

glimpse(pairTrain)

table(pairTrain$isDuplicate)