Как извлечь отсчеты как вектор из таблицы в R?

Question

Я пытаюсь написать функцию для извлечения частот этой таблицы:

 0  1  2  3  4  5  6  7
30 22  9 12  2  5  1 16

Итак, я хочу получить c(30, 22, 9, 12, 2, 5, 1, 16).

Таблица меняется каждый раз, когда я запускаю функцию, поэтому мне нужно что-то, что может автоматически извлекать информацию из таблицы, поэтому мне не приходится каждый раз писать функцию c ().

Answer 1

Честно говоря, не может быть ничего проще. Если вы не можете понять это, у вас будет много других проблем:

> set.seed(42)                          ## be reproducible
> X <- sample(1:5, 50, replace=TRUE)    ## our data
> table(X)                              ## our table
X
 1  2  3  4  5 
 7  6  9 10 18 
> str(table(X))                         ## look at structure of object
 'table' int [1:5(1d)] 7 6 9 10 18
 - attr(*, "dimnames")=List of 1
  ..$ X: chr [1:5] "1" "2" "3" "4" ...
> as.numeric(table(X))                  ## and just convert to vector
[1]  7  6  9 10 18
> 

И для полноты, еще два способа получить данные:

> unname(table(X))                      ## jdropping names reduces to the vector
[1]  7  6  9 10 18
> table(X)[]                            ## or simply access it
[1]  7  6  9 10 18
>