Nice, Rui!? Thanks
On Sat, Feb 9, 2019 at 11:55 AM Rui Barradas <ruipbarradas at sapo.pt
<mailto:ruipbarradas at sapo.pt>> wrote:
Hello,
The following will do it.
mydataframe$dvar <- c(sapply(mydataframe[-1], nchar) %*% c(1, -1))
Hope this helps,
Rui Barradas
?s 18:05 de 09/02/2019, Val escreveu:
> Hi? All,
> In a given data frame I? want to compare character values of two
> My sample data looks like as follow,
>
> mydataframe <- read.table( text='ID? var1 var2
>? ? R1? ?AA? AAA
>? ? R2? ?AAA AAA
>? ? R3? ? A? AAAA
>? ? R4? ?AA? ?A
>? ? R5? ?A? AAA', header = TRUE, as.is <http://as.is> = TRUE )
>
> For each ID, I want? create the third column "dvar" as? difference
> between var1 and var2
>? ?Row1( R1)? ?the "dvar" value will be -1 and the complete
> put looks like as follow.
>
>? ?ID? ? var1 var2? ?dvar
>? ?R1? ?AA? ? AAA? ? -1
>? ?R2? AAA? AAA? ? ? 0
>? ?R3? ? A? ? AAAA? ? -3
>? ?R4? ?AA? ? ? ?A? ? ? ? 1
>? ?R5? ? A? ? ?AAA? ? ? -2
>
> How do i do this? Any help please?
> Thank you
>
> ______________________________________________
> R-help at r-project.org <mailto:R-help at r-project.org> mailing list
-- To UNSUBSCRIBE and more, see