如何根據稱呼對性別進行分類

Question

我有一個名稱基於稱呼的專欄我需要分類並分配一個新的值，無論這個人是男性還是女性？我該怎麼做？

Answer 1

dat <- "sal,name 
Dear Mrs.,Jones 
Dear Mr.,Smith 
Dear Mr.,Black" 

dat <- read.table(text=dat, header=TRUE, sep=",") 

dat$gender <- ifelse(grepl(pattern = "Mr\\.",dat$sal), "Male", "Female") 

dat 
#  sal name gender 
# 1 Dear Mrs. Jones Female 
# 2 Dear Mr. Smith Male 
# 3 Dear Mr. Black Male