<html>
<head>
<style><!--
.hmmessage P
{
margin:0px;
padding:0px
}
body.hmmessage
{
font-size: 12pt;
font-family:Calibri
}
--></style></head>
<body class='hmmessage'><div dir='ltr'>Hola, <div><br></div><div><span style="font-size: 12pt;">Perdonar por saltarme algun paso, pero a veces no me doy cuenta que yo lo tengo muy claro porque soy el que tiene el problemay no termino de explicarlo del todo jeje.</span></div><div><span style="font-size: 12pt;"><br></span></div><div><span style="font-size: 12pt;">Ahora he adjuntado los pasos necesarios en excel para obtener el resultado que quiero , serian 5 pasos: </span></div><div><span style="font-size: 12pt;">Quizas en R haya otra manera mas rapida.</span></div><div><span style="font-size: 12pt;"><br></span></div><div>1) Cargar las dos bases de datos (base de datos ver y base de datos azul)</div><div>2) Hacer un cbind en R</div><div>3) Eliminar las celdas centrales con NA y correr los registros hacia la izquierda. Los ultimos valores los he puesto en rojo ya que son NAs nuevos que quedan por el desplazamiento de las celdas</div><div>Esto es facil en excel pero no se hacerlo en R</div><div>4) Eliminar las columnas con todos sus registros como NA</div><div>5) Renombrar los fates desde el 1 hasta la columna que tenga valor</div><div><br></div><div>Lo que se me resiste es el paso 3. Sabes como hacer ese eliminacion de celdas en R, u otro manera de hacer el join de esta informacion?</div><div><br></div><div>Muchas gracias, </div><div>Saludos,</div><div>Ruben</div><div><br></div><div><div><hr id="stopSpelling">Date: Mon, 29 Feb 2016 23:20:25 +0100<br>Subject: Re: [R-es] Juntar dos data.frames eliminando celdas con NA<br>From: cof@qualityexcellence.es<br>To: ruben_bm@hotmail.com<br>CC: r-help-es@r-project.org<br><br><div dir="ltr"><div class="ecxgmail_default" style="font-family:verdana,sans-serif;">Hola,</div><div class="ecxgmail_default" style="font-family:verdana,sans-serif;"><br></div><div class="ecxgmail_default" style="font-family:verdana,sans-serif;">Del ejemplo que has puesto, no entiendo cómo generas el "Fate_3" y el "Fate_4" tras hacer ese ejercicio de poner los fates en columnas consecutivas.</div><div class="ecxgmail_default" style="font-family:verdana,sans-serif;"><br></div><div class="ecxgmail_default" style="font-family:verdana,sans-serif;">Adjunto cómo se dispone el ejemplo que comentas en Excel y claro no has indicado en el ejemplo ningún Fate_3 que permita obtener un Fate_3 <- c(0,0,0,NA) a partir del único que tienes Fate_3 <- c(0,NA,NA,NA). </div><div class="ecxgmail_default" style="font-family:verdana,sans-serif;"><br></div><div class="ecxgmail_default" style="font-family:verdana,sans-serif;">Gracias,</div><div class="ecxgmail_default" style="font-family:verdana,sans-serif;">Carlos.</div></div><div class="ecxgmail_extra"><br><div class="ecxgmail_quote">El 29 de febrero de 2016, 12:36, Ruben Bermad <span dir="ltr"><<a href="mailto:ruben_bm@hotmail.com" target="_blank">ruben_bm@hotmail.com</a>></span> escribió:<br><blockquote class="ecxgmail_quote" style="border-left:1px #ccc solid;padding-left:1ex;">Hola a todos,<br>
Quisiera juntar las informacion de dos data.frames con una union de columnas un tanto especial. La informacion que tengo son datos de captura-recaptura de diferentes individuos, por ejemplo en una base de datos tengo:ID <- c(1,2,3,4)Fate_1 <- c(2,2,2,2)Fate_2 <- c(0,0,0,NA)Fate_3 <- c(0, NA, NA, NA)<br>
y en otra base de datos tengo:ID <- c(1,2,3)Fate_1 <- c(0, 0, 0, NA)Fate_2 <- c(NA, 0, NA, NA)<br>
Como podeis ver no todos los fates de todos los individuos tienen algun valor, y lo que gustaria es juntarlo sin the haya NAs entre diferentes Fates para cada fila, que es lo que me sucederia si hiciera un cbind entre los dos data.frames.<br>
Lo que se me habia ocurrido era hacer un cbind, que quedaria un resultado como este:ID <- c(1,2,3,4)Fate_1 <- c(2,2,2,2)Fate_2 <- c(0,0,0,NA)Fate_3 <- c(0, NA, NA, NA)Fate_1.Y <- c(0, 0, 0, NA)Fate_2.Y <- c(NA, 0, NA, NA)<br>
y despues ir fila por fila haciendo algo similar a lo que seria en excel de eliminar unas celdas y desplazar hacia la izquierda. Quedando las ultimas filas como NA, y estando toda la informacion de los Fates seguida, con el siguiente resultado:<br>
ID <- c(1,2,3,4)Fate_1 <- c(2,2,2,2)Fate_2 <- c(0,0,0,NA)Fate_3 <- c(0, 0, 0, NA)Fate_4 <- c(0, 0, NA, NA)<br>
Alguien sabe como podria hacer esta eliminacion de celdas y desplazamiento hacia la izquierda de manera automatica, u otra manera mejor para juntar esta informacion?<br>
Muchas gracias por adelantado, Un cordial saludo,Ruben<br>
[[alternative HTML version deleted]]<br>
<br>
_______________________________________________<br>
R-help-es mailing list<br>
<a href="mailto:R-help-es@r-project.org">R-help-es@r-project.org</a><br>
<a href="https://stat.ethz.ch/mailman/listinfo/r-help-es" rel="noreferrer" target="_blank">https://stat.ethz.ch/mailman/listinfo/r-help-es</a><br>
</blockquote></div><br><br clear="all"><div><br></div>-- <br><div class="ecxgmail_signature"><span style="font-family:verdana,sans-serif;">Saludos,</span><br style="font-family:verdana,sans-serif;">
<span style="font-family:verdana,sans-serif;">Carlos Ortega</span><br style="font-family:verdana,sans-serif;">
<span style="font-family:verdana,sans-serif;"><a href="http://www.qualityexcellence.es" target="_blank">www.qualityexcellence.es</a></span></div>
</div></div></div> </div></body>
</html>