Error in X[, colnames, drop = FALSE] : subscript out of bounds

Question

A.B<-data$x
C.D<-data$y
ef<-data$z
sign<-data.frame(A.B,C.D,ef)

names(sign)<-c("A B","C D","ef")
model<-lrm(ef~.,dat