Meruntuhkan Kolom dalam Versi R Mudah

Saya tahu sudah ada beberapa pertanyaan serupa dengan pertanyaan ini, tetapi saya seorang pemula di bidang r dan saya tidak dapat memahami jawabannya! Jika Anda dapat memberikan jawaban yang sederhana, tidak terlalu rumit untuk pertanyaan saya, saya akan sangat menghargainya!!

Saya mencoba menciutkan kategori dalam kolom di bingkai data saya, ringkasannya terlihat seperti ini (kategori = n):

1-Self = 62
2-Mother = 0
3-Father = 43
4-Grandfather = 142
5-Grandmother = 17
6-Uncle = 1
7-Brother = 2
8-Husband = 5
9-Aunt = 0
10-Sister = 2
11-CommunityInfluencer = 1
12-ReligiousFigure = 0
13-Other = 4
14-N/A = 9

Saya ingin menggabungkan kategori 6-14, tetapi semuanya ada di kolom yang sama, bagaimana caranya? Jika Anda dapat memberikan struktur tentang cara membuat kode ini secara sederhana, saya akan sangat menghargainya!

Terima kasih!


r tidyverse forcats
person Cath    schedule 16.09.2020    source sumber
comment
Hai Cath dan selamat datang, saya yakin seseorang akan dengan senang hati membantu tetapi untuk dapat melakukannya kami perlu lebih memahami data Anda, bisakah Anda dput(head(yourdataframe, 10))   -  person Chuck P    schedule 16.09.2020
comment
Jika saya memahami pertanyaan Anda dengan benar, forcats::fct_lump mungkin akan melakukan pekerjaan di sini forcats.tidyverse.org/ referensi/fct_lump.html   -  person NColl    schedule 16.09.2020
comment
@NColl, ini sangat membantu. Maukah Anda membagikan contoh penggunaan forcats? Saya tidak begitu mengerti cara menggunakannya.   -  person Cath    schedule 16.09.2020
comment
@ChuckP Saya telah memasukkan ini ke dalam kerangka data saya. Terima kasih!   -  person Cath    schedule 16.09.2020

Jawaban (1)


arrow_upward
0
arrow_downward

Dengan menggunakan forcats::fct_other, Anda dapat menentukan kategori mana yang ingin Anda gabungkan ke dalam kategori Lainnya

Sebagai contoh:

library(tidyverse)

drop_cats <- c("Naboo", "Stewjon")

starwars %>%
  mutate(homeworld =  fct_other(homeworld, drop = drop_cats)) 

A tibble: 87 x 13
   name       height  mass hair_color   skin_color eye_color birth_year gender homeworld species films  vehicles starships
   <chr>       <int> <dbl> <chr>        <chr>      <chr>          <dbl> <chr>  <fct>     <chr>   <list> <list>   <list>   
 1 Luke Skyw…    172    77 blond        fair       blue            19   male   Tatooine  Human   <chr … <chr [2… <chr [2]>
 2 C-3PO         167    75 NA           gold       yellow         112   NA     Tatooine  Droid   <chr … <chr [0… <chr [0]>
 3 R2-D2          96    32 NA           white, bl… red             33   NA     Other     Droid   <chr … <chr [0… <chr [0]>
 4 Darth Vad…    202   136 none         white      yellow          41.9 male   Tatooine  Human   <chr … <chr [0… <chr [1]>
 5 Leia Orga…    150    49 brown        light      brown           19   female Alderaan  Human   <chr … <chr [1… <chr [0]>
 6 Owen Lars     178   120 brown, grey  light      blue            52   male   Tatooine  Human   <chr … <chr [0… <chr [0]>
 7 Beru Whit…    165    75 brown        light      blue            47   female Tatooine  Human   <chr … <chr [0… <chr [0]>
 8 R5-D4          97    32 NA           white, red red             NA   NA     Tatooine  Droid   <chr … <chr [0… <chr [0]>
 9 Biggs Dar…    183    84 black        light      brown           24   male   Tatooine  Human   <chr … <chr [0… <chr [1]>
10 Obi-Wan K…    182    77 auburn, whi… fair       blue-gray       57   male   Other     Human   <chr … <chr [1… <chr [5]>
# … with 77 more rows
person NColl    schedule 16.09.2020