>  x <- "2011-03-31"
>  date <-as.Date(x,"%Y-%m-%d")
> date+ 1
[1] "2011-04-01"
