[R] Merge column with characters

[Micha Silver]

On 18/11/2021 09:02, ROSLINAZAIRIMAH BINTI ZAKARIA . wrote:
> Dear all,
>
> I try to merge two columns consisting of characters using the 'coalesce'
> function from dplyr package. However, two data still have not merged, data
> no. 124 1nd 143. Any help is very much appreciated. I provide the data as
> follows.


Those two indicies are "" in the dtpaigd list. So they're skipped. 
That's what coalesce does.


If you want to push the values from dtpmgd into dtpaigd, wherever 
dtpaigd is an empty string, maybe this will help:


dt_combined <- ifelse(dtpaigd == "", dtpmgd, dtpaigd)


>> dput(dtpaigd)
> c("C+", "B+", "C+", "B+", "C+", "A-", "A ", "B+", "A-", "C ",
> "B+", "A-", "B+", "B ", "B ", "B ", "D ", "B+", "B ", "B ", "C+",
> "B ", "A ", "A-", "B+", "A-", "A ", "B ", "A ", "C ", "B ", "A+",
> "C ", "B ", "B+", "C+", "B ", "B ", "C+", "B ", "B+", "B ", "A-",
> "B+", "B ", "A-", "C+", "A ", "A-", "C+", "C+", "B ", "B+", "A-",
> "A-", "B ", "E ", "A-", "B+", "B ", "A ", "B+", "A-", "A-", "A ",
> "B+", "A-", "A-", "A-", "B+", "C ", "A-", "A ", "A-", "A ", "A-",
> "A-", "A ", "A ", "B+", "B ", "A+", "B ", "B ", "B+", "A-", "B+",
> "B+", "A-", "A-", "B+", "A-", "A-", "A-", "A-", "A-", "A ", "B+",
> "B ", "A-", "A-", "A-", "A ", "A-", "A-", "B+", "A-", "A ", "B+",
> "B+", "A-", "B+", "A-", "A ", "B+", "A ", "D ", "A+", "B ", "B+",
> "A+", "B+", "B ", "", "A ", "A-", "B ", "A ", "B+", "E ", "B ",
> "B ", "A ", "A-", "B ", "A ", "C+", "B ", "A ", "B+", "B+", "A ",
> "", "B ")
>> dput(dtpmgd)
> c("", "", "", "", "", "", "", "", "", "", "", "", "", "", "",
> "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "",
> "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "",
> "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "",
> "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "",
> "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "",
> "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "",
> "", "", "", "", "", "", "", "", "", "", "", "", "A-", "", "",
> "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "",
> "A ", "")
>
> dt_comb1gd <- coalesce(dtpaigd, dtpmgd)
>> dput(dt_comb1gd)
> c("C+", "B+", "C+", "B+", "C+", "A-", "A ", "B+", "A-", "C ",
> "B+", "A-", "B+", "B ", "B ", "B ", "D ", "B+", "B ", "B ", "C+",
> "B ", "A ", "A-", "B+", "A-", "A ", "B ", "A ", "C ", "B ", "A+",
> "C ", "B ", "B+", "C+", "B ", "B ", "C+", "B ", "B+", "B ", "A-",
> "B+", "B ", "A-", "C+", "A ", "A-", "C+", "C+", "B ", "B+", "A-",
> "A-", "B ", "E ", "A-", "B+", "B ", "A ", "B+", "A-", "A-", "A ",
> "B+", "A-", "A-", "A-", "B+", "C ", "A-", "A ", "A-", "A ", "A-",
> "A-", "A ", "A ", "B+", "B ", "A+", "B ", "B ", "B+", "A-", "B+",
> "B+", "A-", "A-", "B+", "A-", "A-", "A-", "A-", "A-", "A ", "B+",
> "B ", "A-", "A-", "A-", "A ", "A-", "A-", "B+", "A-", "A ", "B+",
> "B+", "A-", "B+", "A-", "A ", "B+", "A ", "D ", "A+", "B ", "B+",
> "A+", "B+", "B ", "", "A ", "A-", "B ", "A ", "B+", "E ", "B ",
> "B ", "A ", "A-", "B ", "A ", "C+", "B ", "A ", "B+", "B+", "A ",
> "", "B ")
>
> *Thank you and best regards.*
>
> *RoslinaZakaria*
>
-- 
Micha Silver
Ben Gurion Univ.
Sde Boker, Remote Sensing Lab
cell: +972-523-665918