Function to restrict the legth of dataset in multiples of 24
lpsf(data, n.ahead)
data
as inpute time series
n.ahead
as horizon of values to be predicted
returns the predictied results