my_file <- read.csv(unz("vehicles.csv.zip","vehicles.csv"),stringsAsFactors = F)
Error in open.connection(file, "rt") : cannot open the c