Saya ingin membuat tautan antar kolom dengan syarat. Saya memiliki dua bingkai data sebagai berikut:
df1<-read.table(text=" gol
4
7
6
9
",header=TRUE)
dan df kedua adalah:
df2<-read.table(text=" cost1 cost2 cost3 cost4
7 9 5 13
3 12 4 14
9 13 3 11
5 6 2 13
4 3 5 12
8 16 6 9
9 11 2 9
6 14 11 12
5 10 14 6
2 9 4 12
",header=TRUE)
Syaratnya misalnya di df2, biaya1, jika nilainya lebih besar atau sama dengan 4 di df1 maka mendapat "y" kalau tidak mendapat "n". di Biaya 2 jika nilainya lebih besar atau sama dengan 7 di df1, mendapat "y" jika tidak, mendapat "n" dan seterusnya. Harap asumsikan saya memiliki lebih dari empat kolom.
Hasilnya adalah sebagai berikut:
output<-read.table(text=" cost1 cost2 cost3 cost4 out1 out2 out3 out4
7 9 5 13 y y n y
3 12 4 14 n y n y
9 13 3 11 y y n y
5 6 2 13 y n n y
4 3 5 12 y n n y
8 16 6 9 y y y y
9 11 2 9 y y n y
6 14 11 12 y y y y
5 10 14 6 y y y n
2 9 4 12 n y n y
",header=TRUE)
Saya baru saja perlu melakukannya menggunakan ifelse, tetapi saya kesulitan melakukannya untuk contoh ini. Bantuan Anda sangat saya hargai.