1个字母到3个字母的氨基酸变体

library(stringr)
str_replace_all(x, 
            c(
              "A"="Ala", "R"="Arg", "N"="Asn", "D"="Asp",
              "C"="Cys", "E"="Glu", "Q"="Gln", "G"="Gly",
              "H"="His", "I"="Ile", "L"="Leu", "K"="Lys",
              "M"="Met", "F"="Phe", "P"="Pro", "S"="Ser",
              "T"="Thr", "W"="Trp", "Y"="Tyr", "V"="Val"
              )    
            )