log <- c(
ice = 11.97, washingMachine = 190.44, fridge = 189.81, nextAssessment = 189, TV = 240.64, microwave = 263.99, )