Changing many column types in r with purrr

str(mtcars)

How do I make a list of some column names and change them to numeric or character. For example say I want to change c("am", "gear") into character columns.

I am looking for a solution e.g. with purrr; I know how to do it manually.