# NOT RUN {
x = c("Winston J. Durant, ASHP past president, dies at 84",
"Gold Badge of Honour of the DGAI Prof. Dr. med. Norbert R. Roewer Wuerzburg",
"The contribution of professor Yu.S. Martynov (1921-2008) to Russian neurology",
"JAN BASZKIEWICZ (3 JANUARY 1930 - 27 JANUARY 2011) IN MEMORIAM",
"Maria Sklodowska-Curie")
givenNames = findGivenNames(x, ssl.verifypeer = FALSE)
givenNames = givenNames[count>40]
genderize(x, genderDB=givenNames, blacklist=c('med'))
# text
# 1: Winston J. Durant, ASHP past president, dies at 84
# 2: Gold Badge of Honour of the DGAI Prof. Dr. med. Norbert R. Roewer Wuerzburg
# 3: The contribution of professor Yu.S. Martynov (1921-2008) to Russian neurology
# 4: JAN BASZKIEWICZ (3 JANUARY 1930 - 27 JANUARY 2011) IN MEMORIAM
# 5: Maria Sklodowska-Curie
# givenName gender genderIndicators
# 1: winston male 1
# 2: norbert male 1
# 3: yu female 1
# 4: jan male 1
# 5: maria female 1
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab