# NOT RUN {
residue.names <- c("HIS", "HID", "HIE", "HIP", "HSD", "HSE", "HSP",
"CYS", "CYM", "CYX", "ASP", "ASH", "GLU", "GLH",
"LYS", "LYN")
aaStandardizeNames(residue.names)
# [1] "HIS" "HIS" "HIS" "HIS" "HIS" "HIS" "HIS" "CYS" "CYS" "CYS"
# "ASP" "ASP" "GLU" "GLU" "LYS" "LYS"
# }
Run the code above in your browser using DataLab