循环：日期类型变量

Question

我试图分配＆＃39;日期＆＃39;前一种情况的新变量调用＆＃34; LastTripDate＆＃34;，只要ID相同。

＆＃34; datetime＆＃34;变量具有POSIXlc类并具有形式（％Y-％M-％D％h：％m：％s）。不幸的是，我的循环只返回秒，而不是整个信息。

  for (i in 2:length(All1[,1]))
  {
    if(as.numeric(All1$ID[i] == All1$ID[i-1]))
      {
      All1$LastTripDate1[i] <- as.Date.character(All1$datetime[i-1])
      }
    else {
    All1$LastTripDate[i] == '100'}
  }

谢谢！