watts -> kwh in R linear model script