Crossref Works API provides information about name parts for some DOIs.
cr_name_parts(doi)
data frame with name parts info
For more information, see #https://api.crossref.org/swagger-ui/index.html#/Works/get_works__doi_
if (FALSE) { # \dontrun{
if(interactive()){
cr_name_parts("10.1021/cr900356p")
}
} # }