X=c("A","B")
S=c("p", "A")
ID= c(1234,1234)
date=c("23/1/2017 9:00","23/1/2017 9:00 ")
a=data.frame(cbind(X,S,ID,date))
C=c(10, 200)
ID= c(1234,1234)
b=data.frame(cbind(C,ID))
X=c("A","B")
S=c("p", "A")
ID= c(1234,1234)
date=c("23/1/2017 9:00","23/1/2017 9:00 ")
C=c(10, 200)
D=a=data.frame(cbind(X,S,ID,date, C))