Lo que quiero hacer es quitar el texto de una cadena donde haya un ":".

Supongamos que mi texto contiene:

 text$Text[[3]] = "There is a horror movie running in the iNox theater. : Can we go?"

Y lo que quiero crear es un marco de datos tal que:

  Col1                                                    Col2
  There is a horror movie running in the iNox theater.    Can we go?

Estoy tratando de usar lo siguiente:

 df = data.frame(Text = strsplit(text$Text[[3]], 
                 ifelse(":", ":", text$Text[[3]]))[[1]], stringsAsFactors = F)

dat3$Text[[3]] porque el texto está en la fila no. 3 del texto $ Texto.

Pero lo anteriorifelse() La lógica no funcionó. Aquí estaba tratando de usar la condición ifelse tal que si hay un ":" en el texto, use ":" de lo contrario use el texto completo tal como está. Por lo tanto, en caso de que no haya ":", el resultado sería algo así:

 text$Text[[3]] = "Hi Mom, You there. Can I go to Jimmy's house?"

 Col1                                                 Col2
 Hi Mom, You there. Can I go to Jimmy's house?         NA

¿Cómo hacerlo correctamente?

Tenga en cuenta que hay un problema:

¿Qué pasa si hay dos ":" en el texto?Me gustaría considerar solo ese ":" que está dentro de las dos primeras líneas y no en el resto del texto.