# Account statement <- read.csv("statement.csv", stringsAsFactors = F, sep = ";") # Get rid of irrelevant columns statement <- statement[2:13] # Statement money flows rahavoog <- statement[statement$Reatüüp == 20,] rahavoog$Summa <- as.numeric(gsub(",", ".", rahavoog$Summa))