Could not run case when in R

Question

I want to Create a function called find_longer_vector() which takes two vectors and tells you which one is longer.

second_vec <- c(9, 2, 1, 8, 3, 4, 5, 6