Bagaimana cara menambahkan kolom ke bingkai data di r menggunakan dplyr

Anda dapat menggunakan fungsi mutate() dari paket dplyr untuk menambahkan satu atau lebih kolom ke bingkai data di R.

Fungsi ini menggunakan sintaks dasar berikut:

Metode 1: Tambahkan kolom di akhir bingkai data

 df %>%
mutate (new_col=c(1, 3, 3, 5, 4))

Metode 2: Tambahkan kolom sebelum kolom tertentu

 df %>%
mutate (new_col=c(1, 3, 3, 5, 4),
        .before=col_name)

Metode 3: Tambahkan kolom setelah kolom tertentu

 df %>%
mutate (new_col=c(1, 3, 3, 5, 4),
        .after=col_name)

Metode 4: Tambahkan Kolom Berdasarkan Kolom Lain

 df %>%
mutate (new_col= if_else (.$col_name > 10, ' A ', ' B '))

Contoh berikut menunjukkan cara menggunakan sintaksis ini dalam praktiknya dengan bingkai data berikut:

 #create data frame
df <- data. frame (team=c('A', 'A', 'A', 'A', 'B', 'B', 'B', 'B'),
                 points=c(12, 14, 19, 24, 24, 22, 30, 9),
                 assists=c(4, 6, 6, 8, 3, 7, 8, 11))

#view data frame
df

  team points assists
1 to 12 4
2 to 14 6
3 To 19 6
4 to 24 8
5 B 24 3
6 B 22 7
7 B 30 8
8 B 9 11

Contoh 1: Tambahkan kolom di akhir bingkai data

Kode berikut menunjukkan cara menambahkan kolom ke akhir bingkai data:

 #add 'blocks' column at end of data frame
df <- df %>%
        mutate (blocks=c(1, 3, 3, 2, 4, 3, 6, 2))

#view data frame
df

  team points assists blocks
1 to 12 4 1
2 A 14 6 3
3 A 19 6 3
4 A 24 8 2
5 B 24 3 4
6 B 22 7 3
7 B 30 8 6
8 B 9 11 2

Perhatikan bahwa Anda dapat menambahkan kolom kosong hanya dengan menetapkan NA ke setiap nilai di kolom baru:

 #add empty column at end of data frame
df <- df %>%
        mutate (blocks=NA)

#view data frame
df

  team points assists blocks
1 A 12 4 NA
2 A 14 6 NA
3 A 19 6 NA
4 A 24 8 NA
5 B 24 3 NA
6 B 22 7 NA
7 B 30 8 NA
8 B 9 11 NA

Contoh 2: Tambahkan kolom sebelum kolom tertentu

Kode berikut menunjukkan cara menambahkan kolom sebelum kolom tertentu dalam bingkai data:

 #add 'blocks' column before 'points' column
df <- df %>%
        mutate (blocks=c(1, 3, 3, 2, 4, 3, 6, 2),
              .before=points)

#view data frame
df

  team blocks points assists
1 A 1 12 4
2 to 3 14 6
3 A 3 19 6
4 A 2 24 8
5 B 4 24 3
6 B 3 22 7
7 B 6 30 8
8 B 2 9 11

Contoh 3: Tambahkan kolom setelah kolom tertentu

Kode berikut menunjukkan cara menambahkan kolom setelah kolom tertentu dalam bingkai data:

 #add 'blocks' column after 'points' column
df <- df %>%
        mutate (blocks=c(1, 3, 3, 2, 4, 3, 6, 2),
              .after=points)

#view data frame
df

  team points blocks assists
1 to 12 1 4
2 A 14 3 6
3 A 19 3 6
4 A 24 2 8
5 B 24 4 3
6 B 22 3 7
7 B 30 6 8
8 B 9 2 11

Contoh 4: Tambahkan Kolom Berdasarkan Kolom Lain

Kode berikut menunjukkan cara menambahkan kolom berdasarkan kolom lain dalam bingkai data:

 #add 'status' column whose values depend on value in 'points' column
df <- df %>%
        mutate (status= if_else (.$points > 20, ' Good ', ' Bad '))

#view data frame
df

  team points assists status
1 A 12 4 Bad
2 A 14 6 Bad
3 A 19 6 Bad
4 A 24 8 Good
5 B 24 3 Good
6 B 22 7 Good
7 B 30 8 Good
8 B 9 11 Bad

Sumber daya tambahan

Tutorial berikut menjelaskan cara menjalankan fungsi umum lainnya di dplyr:

Cara mengganti nama kolom berdasarkan posisi indeks menggunakan dplyr
Cara memilih kolom berdasarkan indeks menggunakan dplyr
Cara menghapus baris menggunakan dplyr