caixeta <- read.table(file = "caixeta.csv")