Outra opção seria usar o factor:

dados$ID <- as.integer(with(dados, factor(paste(Nome, Nome.Mãe, Data.Nascimento))))

2016-02-28 12:43 GMT-03:00 Rodrigo Coster <rcoster@gmail.com>:
Wagner,

Uma solução é criar um novo data.frame() só com as variáveis que identificam os registros, tirar os repetidos com o unique(), acrescentar o ID e juntar com merge():

dados <- read.table(text='Registro;Nome ;Nome Mãe ;Data Nascimento
1;João;Maria;1976-09-08
2;Manuel;Selma;1988-03-10
3;João;Maria;1976-09-08
4;João;Maria;1976-09-08
5;Ricardo;Sonia;1990-05-12
6;Marcelo;Marta;1987-08-06
7;Ricardo;Sonia;1990-05-12
8;João;Maria;1976-09-08
9;Ricardo;Sonia;1990-05-12
10;Marcelo;Marta;1987-08-06', sep = ';', header = TRUE)

dadosApoio <- unique(subset(dados, select = c(Nome, Nome.Mãe, Data.Nascimento)))
dadosApoio$ID <- 1:nrow(dadosApoio)

dados <- merge(dados, dadosApoio)
dados


2016-02-28 11:23 GMT-03:00 Wagner Tassinari <wtassinari@gmail.com>:
Olá pessoal,

Tenho um banco com registros repetidos por linha e gostaria de colocar o mesmo identificador (contador) para os registros que são repetidos baseado em alguns atributos. Por exemplo, se o existirem 4 registros com o mesmo nome, nome da mãe e data de nascimento, o identificador será o mesmo.

Segue um exemplo do meu banco de dados:

Registro Nome Nome Mãe Data Nascimento
1 João Maria 1976-09-08
2 Manuel Selma 1988-03-10
3 João Maria 1976-09-08
4 João Maria 1976-09-08
5 Ricardo Sonia 1990-05-12
6 Marcelo Marta 1987-08-06
7 Ricardo Sonia 1990-05-12
8 João Maria 1976-09-08
9 Ricardo Sonia 1990-05-12
10 Marcelo Marta 1987-08-06

Gostaria obter esse banco com o identificador ID:

Registro ID Nome Nome Mãe Data Nascimento
1 1 João Maria 1976-09-08
2 2 João Selma 1988-03-10
3 1 João Maria 1976-09-08
4 1 João Maria 1976-09-08
5 3 Ricardo Sonia 1990-05-12
6 4 Marcelo Marta 1987-08-06
7 3 Ricardo Sonia 1990-05-12
8 1 João Maria 1976-09-08
9 3 Ricardo Sonia 1990-05-12
10 4 Marcelo Marta 1987-08-06


Muito obrigado a todos,
--
Wagner S. Tassinari
Departamento de Matemática
Universidade Federal Rural do Rio de Janeiro.
BR-465, Km 7 - Seropedica, RJ - Brasil
CEP: 23890-000
Skype: wagner.tassinari
wtassinari@gmail.com
tassinari@ufrrj.br
-------------------------------------------------------
"Statistical thinking will one day be as necessary for efficient citizenship as the ability to read and write."  (H.G.Wellis)

_______________________________________________
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.



--
Henrique Dallazuanna
Curitiba-Paraná-Brasil
25° 25' 40" S 49° 16' 22" O