# Write and run code here some_vector <- c("John Doe", "poker player") #vektorius names(some_vector) <- c("Name", "Profession") #vektoriaus reiksmiu vardai #rezultatas # Name Profession # "John Doe" "poker player"