Paula,<div>Funciona sim:</div><div><div>id <- c(1, 1, 1, 2, 2)</div><div>ent <- c(1, 10, 20, 1, 30)</div><div>sai <- c(9, 19, 40, 29, 50)</div><div>grupo <- c(1, 2, 3, 1, 2)</div><div>banco1 <- data.frame(id, ent, sai, grupo)##Troque os cbind por data frame</div>
<div><br></div><div>id <- c(1, 1, 1, 1, 1, 2, 2, 2, 2)</div><div>dia <- c(5, 8, 12, 18, 25, 22, 25, 29, 41)</div><div>teste <- c("A", "A", "B", "B", "A", "B", "B", "C", "D")</div>
<div>banco2 <- data.frame(id, dia, teste)</div><div><br></div><div>banco3 <- merge(banco1, banco2)</div><div>banco3[banco3$dia>=banco3$ent & banco3$dia<=banco3$sai,]</div><div><br></div><div>Oque estava fazendo não funcionar era seu cbind, que no banco dois estava convertendo os numeros para factor.</div>
<div>Att</div><div><br></div><br><div class="gmail_quote">Em 16 de junho de 2012 18:33, Paula Mendes Luz <span dir="ltr"><<a href="mailto:luzpaulamendes@gmail.com" target="_blank">luzpaulamendes@gmail.com</a>></span> escreveu:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">olá eder<br>
agradeço a tentativa mas não funcionou... na verdade nem entendi que o R fez!...<br>
se quiser repetir, rodei os comandos abaixo:<br>
<div class="im"><br>
id <- c(1, 1, 1, 2, 2)<br>
ent <- c(1, 10, 20, 1, 30)<br>
sai <- c(9, 19, 40, 29, 50)<br>
grupo <- c(1, 2, 3, 1, 2)<br>
banco1 <- cbind(id, ent, sai, grupo)<br>
<br>
</div><div class="im">id <- c(1, 1, 1, 1, 1, 2, 2, 2, 2)<br>
dia <- c(5, 8, 12, 18, 25, 22, 25, 29, 41)<br>
teste <- c("A", "A", "B", "B", "A", "B", "B", "C", "D")<br>
banco2 <- cbind(id, dia, teste)<br>
<br>
</div>banco3 <- merge(banco1, banco2)<br>
banco3$ent<-as.numeric(banco3$ent)<br>
banco3$sai<-as.numeric(banco3$sai)<br>
banco3$dia<-as.numeric(banco3$dia)<br>
banco3[banco3$dia>=banco3$ent & banco3$dia<=banco3$sai,]<br>
<br>
<br>
2012/6/12 Eder David Borges da Silva <<a href="mailto:eder@leg.ufpr.br">eder@leg.ufpr.br</a>>:<br>
<div class="HOEnZb"><div class="h5">> Acho que pode ser isso:<br>
> banco3 <- merge(banco1,banco2)<br>
> banco3[banco3$dia>=banco3$ent &banco3$dia<=banco3$sai,]<br>
> Att<br>
> Éder<br>
><br>
> Em 12 de junho de 2012 19:06, Paula Mendes Luz <<a href="mailto:luzpaulamendes@gmail.com">luzpaulamendes@gmail.com</a>><br>
> escreveu:<br>
>><br>
>> oi pessoal<br>
>><br>
>> eu normalmente utilizo o merge() para juntar bancos em função de 1 ou<br>
>> mais variáveis que são iguais nos dois bancos. também normalmente<br>
>> tenho bancos com medidas repetidas para cada indivíduo de modo que<br>
>> novas linhas são criadas no ato do merge() em função das informações<br>
>> dos bancos originais.<br>
>><br>
>> agora preciso juntar dois bancos em função de um intervalo de números<br>
>> (na verdade são datas mas isso não importa):<br>
>><br>
>> um exemplo do que preciso fazer p o banco original com > 3000 ids seria<br>
>><br>
>> banco1 tem o id, a entrada, a saída, e o grupo<br>
>><br>
>> id <- c(1, 1, 1, 2, 2)<br>
>> ent <- c(1, 10, 20, 1, 30)<br>
>> sai <- c(9, 19, 40, 29, 50)<br>
>> grupo <- c(1, 2, 3, 1, 2)<br>
>><br>
>> banco1 <- cbind(id, ent, sai, grupo)<br>
>><br>
>> banco2 tem o id, o dia, tipo do teste<br>
>><br>
>> id <- c(1, 1, 1, 1, 1, 2, 2, 2, 2)<br>
>> dia <- c(5, 8, 12, 18, 25, 22, 25, 29, 41)<br>
>> teste <- c("A", "A", "B", "B", "A", "B", "B", "C", "D")<br>
>><br>
>> banco2 <- cbind(id, dia, teste)<br>
>><br>
>> e o banco 3 seria o merge() dos dois em função da avaliação se o DIA<br>
>> do banco2 está contido no intervalo (entre ENT e SAI) do banco1<br>
>><br>
>> o resultado seria o banco 3 com 5 linhas para o id1 com as 5 vars da<br>
>> seguinte forma<br>
>> id ent sai grupo dia teste<br>
>> 1 1 9 1 5 A<br>
>> 1 1 9 1 8 A<br>
>> 1 10 19 2 12 B<br>
>> 1 10 19 2 18 B<br>
>> 1 20 40 3 25 A<br>
>><br>
>> e 4 linhas para o id 2<br>
>><br>
>> alguém pode ajudar???? eu li a respeito da função findInterval() mas<br>
>> não consegui fazer funcionar....<br>
>><br>
>> agradeço desde já! abraços, paula.<br>
>> _______________________________________________<br>
>> R-br mailing list<br>
>> <a href="mailto:R-br@listas.c3sl.ufpr.br">R-br@listas.c3sl.ufpr.br</a><br>
>> <a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
>> Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça<br>
>> código mínimo reproduzível.<br>
><br>
><br>
><br>
> _______________________________________________<br>
> R-br mailing list<br>
> <a href="mailto:R-br@listas.c3sl.ufpr.br">R-br@listas.c3sl.ufpr.br</a><br>
> <a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
> Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código<br>
> mínimo reproduzível.<br>
_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br">R-br@listas.c3sl.ufpr.br</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br>
</div></div></blockquote></div><br></div>