Сжатие строки алгоритмом Run‑Length Encoding

Необходимо написать функцию, которая принимает строку и возвращает её представление после применения алгоритма Run‑Length Encoding (RLE). Последовательные одинаковые символы заменяются на сам символ, за которым следует количество его повторений. Символ, встречающийся единожды, оставляется без добавления числа. К примеру, строка AAAABBCCXYZDDDDEEEFFFAAAAABBBBBBBBBBBBBBBBBBBBBBBB должна превратиться в A4B3C2XYZD4E3F3A6B28