search for: sys_xt

...LECT SP.lokaldatotid, SP.pris FROM DataIndsamling2.dbo.SpotPriser SP", "WHERE (SP.omraade_id= 0 AND SP.lokaldatotid >= '2005-01-01 00:00:00')")) #Definer dato og tid kolonne sys$lokaldatotid <- as.POSIXct(sys$lokaldatotid) #Make a XTS object sys_xts <- xts(sys[,-1], order.by=sys[,1]) # Recalculate data from hours to daily, monthly and yearly averages sys_xts_daily <- apply.daily(sys_xts, FUN=mean) sys_xts_monthly <- apply.monthly(sys_xts, FUN=mean) sys_xts_yearly <- apply.yearly(sys_xts, FUN=mean) ##############################...