## See all the 3-letter codes
  AMINO_ACID_CODE
  ## Convert an AAString object to a vector of 3-letter amino acid codes
  aa <- AAString("LANDEECQW")
  AMINO_ACID_CODE[strsplit(as.character(aa), NULL)[[1]]]
Run the code above in your browser using DataLab