R check last letter of string as condition

[DrunkenPhD]

Dear all,

I have a data frame with two columns:

Name   Sex

Sara      F

Jane      F

John     M

I need to check all names and if I find names ending with letter A or E column SEX has to get a F value.

Otherwise values of SEX column has to be M.

Can you please help with this?

Best Regards

[jim holtman]

df$Sex <- ifelse(grepl("(a|e)$", df$Name), "F", "M")

Jim Holtman
Data Munger Guru
 
What is the problem that you are trying to solve?
Tell me what you want to do, not how you want to do it.

--
You received this message because you are subscribed to the Google Groups "manipulatr" group.
To unsubscribe from this group and stop receiving emails from it, send an email to manipulatr+...@googlegroups.com.
To post to this group, send email to manip...@googlegroups.com.
Visit this group at http://groups.google.com/group/manipulatr.
For more options, visit https://groups.google.com/d/optout.

[Doug Mitarotonda]

This seems more like a regular expression question than anything. I would just do something like, 

# dft is your data frame

is_female <- stringr::str_detect(dft$Name, “[a|e]$”)

dft$Sex <- “M”

dft$Sex[is_female] <- “F"

[Endri Raco]

Thank you guys.

Unfortunately both solutions return to M all values of SEX column so still not success:(

Regards

--

 Endri Raço PhD
_________________________________________________
Polytechnic University of Tirana
Faculty of Mathematical Engineering and Physics Engineering
Department of Mathematical Engineering
Address:  Sheshi Nene Tereza, Nr. 4, Tirana - ALBANIA
Mobile: ++ 355 682061988

[DrunkenPhD]

Still not working

Both solutions fill with M all Sex column

Regards

[DrunkenPhD]

OK my error because I have uppercase.

    Both solutions working.

    Thank you Jim and Dough excellent work guys

     Best Regards 

[Doug Mitarotonda]

Then you will need to provide an MWE to show us what is going on (maybe your strings are factors and that is an issue?). Both solutions work for me.

dft <- data.frame(Name = c("Sara", "Jane", "John"), stringsAsFactors = FALSE)

is_female <- str_detect(dft$Name, "[a|e]$”)

dft$Sex <- “M"

dft$Sex[is_female] <- “F"

  Name Sex

1 Sara   F

2 Jane   F

3 John   M

# or

dft <- data.frame(Name = c("Sara", "Jane", "John"), stringsAsFactors = FALSE)

dft$Sex <- ifelse(grepl("(a|e)$", dft$Name), "F", "M")

dft

  Name Sex

1 Sara   F

2 Jane   F

3 John   M

[Endri Raco]

You are totally right, it was my stupid mistake of uppercase.

Everything is working fine, you guys are great

Thanks for the help

Regards