Cómo buscar varias cadenas y reemplazarlas por nada dentro de una lista de cadenas

Tengo una columna en un marco de datos como este:

npt2$name
#  [1] "Andreas Groll, M.D."
#  [2] ""
#  [3] "Pan-Chyr Yang, PHD"
#  [4] "Suh-Fang Jeng, Sc.D"
#  [5] "Mostafa K Mohamed Fontanet Arnaud"
#  [6] "Thomas Jozefiak, M.D."
#  [7] "Medical Monitor"
#  [8] "Qi Zhu, MD"
#  [9] "Holly Posner"
# [10] "Peter S Sebel, MB BS, PhD Chantal Kerssens, PhD"
# [11] "Lance A Mynderse, M.D."
# [12] "Lawrence Currie, MD"

Lo intentégsub pero sin suerte. Después de hacertoupper(x) Necesito reemplazar todas las instancias de 'MD' o 'M.D.' o 'PHD' sin nada.

¿Hay algún buen truco para hacerlo?

e hecho, me interesaría verlo hecho en una sola cadena y qué tan diferente se hace en un comando en toda la lista.

Respuestas a la pregunta(6)

Su respuesta a la pregunta