Uma solução possível : x <-c('Joao 01', 'Maria 02', 'Gigante', 'Pé de 03 feijao 04') # vetor com números #Voce deve ter um data.frame, então vamos converter isso em um: dados <- data.frame(x) # Vamos pedir para identificar a posição dos números m em uma coluna w: dados$w <- gregexpr("[0-9]",dados$x)
dados x w 1 Joao 01 6, 7 2 Maria 02 7, 8 3 Gigante -1 4 Pé de 03 feijao 04 7, 8, 17, 18
***Onde tiver "-1" é porque não há números. Por outro lado, onde aparecer algum número diferente de -1 é porque há números. O número que aparecer é a posição do caracter na string. Daniel On Fri, Apr 12, 2013 at 3:12 PM, Fátima Lima Paula < fatima.lima.paula@gmail.com> wrote:
Parece que funciona, mas o problema é que tenho um banco com 302163 linhas. Como faço para saber os nomes que apresentam números?
Em 12 de abril de 2013 15:21, Rodrigo Coster <rcoster@gmail.com> escreveu:
dados <- c('Joao 01', 'Maria 02', 'Gigante', 'Pé de 03 feijao 04')
gsub('[^0-9]', '', dados) as.integer(gsub('[^0-9]', '', dados))
2013/4/12 Fátima Lima Paula <fatima.lima.paula@gmail.com>
Olá pessoal. Como faço para buscar números em uma coluna com nomes? Obrigada Fátima
_______________________________________________ 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.
_______________________________________________ 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.
_______________________________________________ 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.
-- \begin{signature} Daniel Marcelino ☁ dm.silva@umontreal.ca ☎ (514) 343 6111 #3799 Skype: d.marcelino ✎ 3200 Jean Brillant, Office C5071 Montreal, QC; H3T 1N8 Canada \end{signature} "Small steps toward a much better world"