You can join the two datasets together like this:
library(dplyr)
left_join(X2, X1, by="size")
Example with the Iris dataset:
I2<-data.frame(Species=c("setosa", "versicolor", "virginica"),
myData=c(1,2,3))
left_join(iris, I2, by="Species")
与恶龙缠斗过久,自身亦成为恶龙;凝视深渊过久,深渊将回以凝视…