比较2日期日期列时出错

Question

我创建了一个新列Date_flag，使用下面的代码比较COL1和COL2的日期。

但它显示5/1/15大于6/1/2014且5/1/2015大于7/1/2014，尽管年份更大。我该如何解决这个问题？

我确实尝试格式化为%y/%m/%d，但它无法解决问题。

data$Date_Flag <- ifelse(data$COL2 > data$COL1, 0,1)

  COL1       COL2
 6/1/14     5/1/15 
 7/1/14     5/1/15 

data$COL2<- as.Date(as.character(data$COL2, format="%y/%m/%d"))
data$COL1<- as.Date(as.character(data$COL1, format="%y/%m/%d"))