change data.frame to vectors