# \makeatletter has no effect by default...
unclass(parseLatex("\\makeatletter\\internal@macro"))
# ... but the effect can be simulated
atletter <- rbind(defaultCatcodes,
data.frame(char="@", catcode=11))
unclass(parseLatex("\\makeatletter\\internal@macro",
catcodes = atletter))
# These are the default codes:
cbind(defaultCatcodes, name = c("ESCAPE", "LBRACE", "RBRACE", "MATH",
"ALIGN", "NEWLINE","NEWLINE", "PARAM", "SUPER",
"SUB", "SPACE", "SPACE", "COMMENT"))
# The missing ones are
# 9 - IGNORE
# 11 - LETTER
# 12 - OTHER
# 13 - ACTIVE
# 15 - INVALID
Run the code above in your browser using DataLab