string = c( "catch-22", "finnegans wake" )
str_is( string, str_lower_case )
str_transform( string, str_capitalize, str_delete_nonword )
str_delete_nonword( str_capitalize( string ) ) # SAME
# magrittr:
## Not run:
# string %>% str_capitalize %>% str_delete_nonword # SAME
# ## End(Not run)
Run the code above in your browser using DataLab