[R-br] Separando nomes com espaços em branco após o nome

[Fátima Lima Paula]

Prezados,
já aprendi a separar nomes, mas agora surgiu um problema:
esse banco que estou usando, foi exportado do sihd2 e vem com os espaços do
campo que é para ser preenchido.
Assim, tenho nomes com esse aspecto:
nome=c("Maria Tereza dos Santos          ", "Jorge Roberto da Silva
 ", "José de Faria Almeida               ")
nome=factor(nome)
idade=c(76,87,98)
data=data.frame(nome, idade)

Preciso que os nomes sejam divididos da seguinte forma:
data$nome1=c("Maria", "Jorge", "José")
data$nome2=c("Tereza dos", "Roberto da","de Faria")
data$nome3=c("Santos", "Silva", "Almeida")

Fui usar o script que guardei do Walmes, mas não deu certo. O problema está
nos espaços que ficam depois do nome.
Só para ilustrar, vejam o que retorna:
separado=strsplit(as.character(nome),split=" ")
> head(separado)
[[1]]
 [1] "Maria"  "Tereza" "dos"    "Santos" ""       ""       ""       ""
 [9] ""       ""       ""       ""       ""

[[2]]
 [1] "Jorge"   "Roberto" "da"      "Silva"   ""        ""        ""
 [8] ""        ""        ""        ""        ""        ""

[[3]]
 [1] "José"    "de"      "Faria"   "Almeida" ""        ""        ""
 [8] ""        ""        ""        ""        ""        ""        ""
[15] ""        ""        ""        ""
O pior é que não existe um número constante de espaços, nem de total de
linhas. É exatamente assim como no exemplo.
Alguém pode me ajudar, por favor?
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20121128/89917d24/attachment.html>