Comienzo del problema MPRT, funciona getfasta para obtener el key-val desde UniProt, pero la aplicación del reconocimiento
de patrón no ...
(map #(inc (.indexOf v %)) (re-seq  #"N[^P][ST][^P]" v))