[R-br] string

[Daniel Marcelino]

É, talvez eu tenha me expressado mal.
O que eu preciso é de que toda a parte da string antes da barra "/" fique
alocada em uma coluna, enquanto tudo o que vier depois da barra "/" ou se
não tiver uma barra, seja alocado em outra coluna.

Eu fiz isso há muito tempo em SPSS :

STRING #n var1 var2 var3 (A200).
COMPUTE #n=Beneficiario.
VECTOR vBeneficiario=var1 TO var2.
LOOP #i = 1 to 2.
- COMPUTE #space = INDEX(#n, "/ ").
- COMPUTE vBeneficiario(#i) = SUBSTR(#n,1,#space-1).
- COMPUTE #n = SUBSTR(#n,#space+1).
END LOOP.
COMPUTE var3=#n.
DO IF var3="".
COMPUTE var1=var3.
COMPUTE var2="".
END IF.
EXECUTE.


Daniel


2011/3/31 Marcos Silva <marcosfs2006 em gmail.com>

> Veja se o código abaixo ajuda:
>
> sapply(strsplit(data, "/"), '[[', 1)
>
> Abs.
>
> Em 31 de março de 2011 20:08, Daniel Marcelino <dmsilva.br em gmail.com>escreveu:
>
>> Caros, como eu poderia escrever um loop para retirar todos os caracateres
>> que estão antes e depois da "/" na string abaixo e colocando-os em novas
>> variáveis?
>>
>> Ex.
>>
>> data <-c("155 - VITAL DO REGO FILHO - PB - Senador", "1111 -  - PP -  -
>> Deputado Federal / 25888 - ATAIDES MENDES PEDROSA - PB - Deputado
>> Estadual", "1111 -  - PP -  - Deputado Federal / 22333 - EDNALDO PEREIRA DE
>> SANTANA - PB - Deputado Estadual", "151 - JOSE WILSON SANTIAGO - PB -
>> Senador", "45123 - ANTONIO HERVAZIO BEZERRA CAVALCANTI - PB - Deputado
>> Estadual", "1212 - DAMIÃO FELICIANO DA SILVA - PB  -Deputado Federal")
>>
>> _______________________________________________
>> R-br mailing list
>> R-br em listas.c3sl.ufpr.br
>> https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
>>
>>
>
>
> --
> Marcos F. Silva
> http://sites.google.com/site/marcosfs2006
>
> _______________________________________________
> R-br mailing list
> R-br em listas.c3sl.ufpr.br
> https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
>
>
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20110401/2397b2d0/attachment.html>