Настройка имен для векторных элементов

Question

Я хочу создать функцию, которая получает строку и возвращает вектор с количеством раз, каждый элемент появляется. Теперь каждое значение должно получить имя. Так, например answer=function("abcda") должен возвращать

a b c d 
2 1 1 1 

Где answer является вектором, и каждый номер имеет имя. Моя проблема, когда я пытаюсь использовать функцию names я получаю что-то вроде этого

 [,1] [,2] [,3] [,4] 
[1,]  1 1 1 1 
attr(,"names") 
[1] "a" "b" "c" "d" 

Теперь, когда я имена функций на консоли это работает, но когда я использую его в функции это неправильно.

Answer 1

Вы должны быть в состоянии сделать это легко, используя комбинации strsplit и table. Используйте "" как символ для разделения, который разделит строку на отдельные символы.

Пример:

table(strsplit("abcda", "")) 
## 
## a b c d 
## 2 1 1 1