format(as.Date(df$x,format="%Y-%m-%d"), format = "%d") # or format(df_meas$Time, format= %d") # where df_meas$Time is of as.POSIXlt class