"02-04-2016","3.525","11.810","7,68","34","622","172","73","100","2.107"
"03-04-2016","2.809","9.033","5,87","23","643","114","4","74","1.165"
"04-04-2016","3.112","9.340","6,07","30","695","182","53","42","1.522"
"05-04-2016","1.880","488","0,32","2","1.005","38","0","0","160"

df <- read.csv("test.csv",
    header = TRUE,
    sep = ",",
    dec = ".",
    encoding = "UTF-8")