pp <- read.csv(file = (description = "i:/pp_1.csv"), sep = ";", h=F, dec = ",") # считываю файл в таблицу