Unclear documentation for swap_initials() within the format_publications function.

[fmegahed]

Hello,

Thank you for your great work. I was trying to modify the format_publications() and as I was looking at the source code, I was not able to access the underlying function swap_initials(). Would you please either add it to the package or make its code available?

Thank you.

[GuangchuangYu]

> scholar:::swap_initials
function (author.name) 
{
    if (is.null(author.name)) 
        return(NULL)
    sub("(.*) (.*)", "\\2, \\1.", trimws(author.name))
}
<bytecode: 0x55f8a0758668>
<environment: namespace:scholar>