A: bagaimana cara menambahkan kolom ke bingkai data berdasarkan kolom lain

Anda dapat menggunakan sintaks dasar berikut untuk menambahkan kolom ke bingkai data di R berdasarkan nilai kolom lainnya:

 #add new column 'col3' with values based on columns 1 and 2
df$col3 <- with (df, ifelse (col1 > col2, value_if_true, value_if_false))

Contoh berikut menunjukkan cara menggunakan sintaksis ini dalam praktiknya.

Contoh 1: Tambahkan Kolom Karakter Berdasarkan Kolom Lainnya

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

 #create data frame
df <- data. frame (team=c('Mavs', 'Cavs', 'Spurs', 'Nets'),
                 scored=c(99, 90, 84, 96),
                 allowed=c(95, 80, 87, 95))

#view data frame
df

   team scored allowed
1 Mavs 99 95
2 Cavs 90 80
3 Spurs 84 87
4 Nets 96 95

#add 'result' column based on values in 'scored' and 'allowed' columns
df$result <- with (df, ifelse (scored > allowed, ' Win ', ' Loss '))

#view updated data frame
df

   team scored allowed result
1 Mavs 99 95 Win
2 Cavs 90 80 Win
3 Spurs 84 87 Losses
4 Nets 96 95 Win

Dan kode berikut menunjukkan cara menambahkan kolom karakter baru yang menggabungkan dua fungsi ifelse() untuk menghasilkan tiga nilai potensial pada kolom baru:

 #create data frame
df <- data. frame (team=c('Mavs', 'Cavs', 'Spurs', 'Nets'),
                 scored=c(99, 90, 84, 96),
                 allowed=c(95, 80, 87, 95))

#view data frame
df

   team scored allowed
1 Mavs 99 95
2 Cavs 90 80
3 Spurs 84 87
4 Nets 96 95

#add 'quality' column based on values in 'scored' and 'allowed' columns
df$quality <- with (df, ifelse (scored > 95, ' great ',
                         ifelse (scored > 85, ' good ', ' bad ')))

#view updated data frame
df

   team scored allowed quality
1 Mavs 99 95 great
2 Cavs 90 80 good
3 Spurs 84 87 bad
4 Nets 96 95 great

Contoh 2: Tambahkan kolom numerik berdasarkan kolom lainnya

Kode berikut menunjukkan cara menambahkan kolom numerik baru ke bingkai data berdasarkan nilai kolom lainnya:

 #create data frame
df <- data. frame (team=c('Mavs', 'Cavs', 'Spurs', 'Nets'),
                 scored=c(99, 90, 84, 96),
                 allowed=c(95, 80, 87, 95))

#view data frame
df

   team scored allowed
1 Mavs 99 95
2 Cavs 90 80
3 Spurs 84 87
4 Nets 96 95

#add 'lower_score' column based on values in 'scored' and 'allowed' columns
df$lower_score <- with (df, ifelse (scored > allowed, allowed, scored))

#view updated data frame
df

   team scored allowed lower_score
1 Mavs 99 95 95
2 Cavs 90 80 80
3 Spurs 84 87 84
4 Nets 96 95 95

Sumber daya tambahan

Bagaimana cara menambahkan kolom ke bingkai data di R
Bagaimana cara menambahkan kolom kosong ke bingkai data di R
Bagaimana cara menambahkan kolom indeks ke bingkai data di R