Primeiro muito Obrigado professor, eu tava tentando olhar o help da função paste, mas nao tava dando conta :)
teste2<-c("Stomoxys.calcitrans","Musca.domestica","Syritta.flaviventris","Clusiidae")
E fazer esse aqui, fazer uma mistura dos 2 casos.
Resultando em :
[1] "Sca" "Mdo" "Sfl" "Clu"
Ops faltou a segunda parte
> sapply(foo, function(x) paste(substring(x[1], 1,1), substring(x[2],
1,2), sep=""))
[1] "Sca" "Mdo" "Sfl"
Em Ter, 2012-01-17 às 15:47 -0300, Augusto Ribas escreveu:
> teste<-c("Stomoxys.calcitrans","Musca.domestica","Syritta.flaviventris")
--
Paulo Justiniano Ribeiro Jr
LEG (Laboratorio de Estatistica e Geoinformacao)
Universidade Federal do Parana
Caixa Postal 19.081
CEP 81.531-990
Curitiba, PR - Brasil
Tel: (+55) 41 3361 3573
VOIP: (+55) (41) (3361 3600) 1053 1066
Fax: (+55) 41 3361 3141
e-mail: paulojus AT ufpr br
http://www.leg.ufpr.br/~paulojus
_______________________________________________
R-br mailing list
R-br@listas.c3sl.ufpr.br
https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.