seqOfDays <- seq.POSIXt(min(df_meas$Time),max(df_meas$Time), by=60*60*24) numDays = length(seqOfDays)