bugfix> r > 投稿

1つの列と1つの値を持つデータフレームがあります

df <- data.frame(type = c("recommended: 882, meh: 501, exceptional: 283, skip: 185"),
                 stringsAsFactors=FALSE)

私はこれを変換しようとしています type コメントの複数の個別の列への列とその数

私の望む出力は

recommended meh exceptional skip
        882 501         283  185

文字列から数値を抽出できませんが、代わりにこの方法で実行します

df %>% mutate(ind = row_number()) %>%
  separate_rows(type, sep=",") %>%
  #mutate(f = ifelse(is.na(f),0, f)) %>%
  count(ind, type) %>%
  spread(type, n, fill = 0) %>%
  as.data.frame()

誰かが私を正しい方向に向けることができますか?