# a function that accepts a vector, that loops over each element of the vector and returns a vector of characters

function_1 <- function(a){

for (i in seq_along(length(a))) {

my.result <- "a"

return(my.result)}

}

function_1()

# function that solves the problem in one step using subsetting

how can i solve these problem?