<html xmlns:v="urn:schemas-microsoft-com:vml" xmlns:o="urn:schemas-microsoft-com:office:office" xmlns:w="urn:schemas-microsoft-com:office:word" xmlns:m="http://schemas.microsoft.com/office/2004/12/omml" xmlns="http://www.w3.org/TR/REC-html40"><head><meta http-equiv=Content-Type content="text/html; charset=utf-8"><meta name=Generator content="Microsoft Word 12 (filtered medium)"><style><!--
/* Font Definitions */
@font-face
{font-family:"Cambria Math";
panose-1:2 4 5 3 5 4 6 3 2 4;}
@font-face
{font-family:Calibri;
panose-1:2 15 5 2 2 2 4 3 2 4;}
@font-face
{font-family:Tahoma;
panose-1:2 11 6 4 3 5 4 4 2 4;}
/* Style Definitions */
p.MsoNormal, li.MsoNormal, div.MsoNormal
{margin:0cm;
margin-bottom:.0001pt;
font-size:12.0pt;
font-family:"Times New Roman","serif";}
a:link, span.MsoHyperlink
{mso-style-priority:99;
color:blue;
text-decoration:underline;}
a:visited, span.MsoHyperlinkFollowed
{mso-style-priority:99;
color:purple;
text-decoration:underline;}
pre
{mso-style-priority:99;
mso-style-link:"HTML con formato previo Car";
margin:0cm;
margin-bottom:.0001pt;
font-size:10.0pt;
font-family:"Courier New";}
span.EstiloCorreo17
{mso-style-type:personal-reply;
font-family:"Calibri","sans-serif";
color:#1F497D;}
span.HTMLconformatoprevioCar
{mso-style-name:"HTML con formato previo Car";
mso-style-priority:99;
mso-style-link:"HTML con formato previo";
font-family:"Courier New";}
.MsoChpDefault
{mso-style-type:export-only;}
@page WordSection1
{size:612.0pt 792.0pt;
margin:70.85pt 3.0cm 70.85pt 3.0cm;}
div.WordSection1
{page:WordSection1;}
--></style><!--[if gte mso 9]><xml>
<o:shapedefaults v:ext="edit" spidmax="1026" />
</xml><![endif]--><!--[if gte mso 9]><xml>
<o:shapelayout v:ext="edit">
<o:idmap v:ext="edit" data="1" />
</o:shapelayout></xml><![endif]--></head><body lang=CA link=blue vlink=purple><div class=WordSection1><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri","sans-serif";color:#1F497D'>Una opción podria ser:<o:p></o:p></span></p><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri","sans-serif";color:#1F497D'><o:p> </o:p></span></p><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri","sans-serif";color:#1F497D'>datos$pprfecbaja<-as. character(datos$pprfecbaja) ##transformar la variable de formato Date a formato Character<o:p></o:p></span></p><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri","sans-serif";color:#1F497D'>datos$pprfecbaja[datos$pprfecbaja=="0001-01-01"]<-"0000-00-00" #reemplazar la fecha “0001-01-01” por una fecha inexistente “0000-00-00”<o:p></o:p></span></p><pre><span style='font-size:11.0pt;font-family:"Calibri","sans-serif";color:#1F497D'>datos$pprfecbaja<-strptime(datos$pprfecbaja, "%Y-%m-%d") ##transformar la variable de formato Character a formato </span><span style='font-size:9.0pt;color:black'>POSIXlt<o:p></o:p></span></pre><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri","sans-serif";color:#1F497D'><o:p> </o:p></span></p><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri","sans-serif";color:#1F497D'><o:p> </o:p></span></p><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri","sans-serif";color:#1F497D'>Gerard Reverté<o:p></o:p></span></p><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri","sans-serif";color:#1F497D'><o:p> </o:p></span></p><p class=MsoNormal><span style='font-size:11.0pt;font-family:"Calibri","sans-serif";color:#1F497D'><o:p> </o:p></span></p><div style='border:none;border-top:solid #B5C4DF 1.0pt;padding:3.0pt 0cm 0cm 0cm'><p class=MsoNormal><b><span lang=ES style='font-size:10.0pt;font-family:"Tahoma","sans-serif"'>De:</span></b><span lang=ES style='font-size:10.0pt;font-family:"Tahoma","sans-serif"'> R-help-es [mailto:r-help-es-bounces@r-project.org] <b>En nombre de </b>Mauricio Monsalvo<br><b>Enviado el:</b> jueves, 16 de febrero de 2017 13:34<br><b>Para:</b> r-help-es<br><b>Asunto:</b> [R-es] Ayuda con Date<o:p></o:p></span></p></div><p class=MsoNormal><o:p> </o:p></p><div><div><p class=MsoNormal><span style='font-family:"Tahoma","sans-serif"'>Hola.<o:p></o:p></span></p></div><div><p class=MsoNormal><span style='font-family:"Tahoma","sans-serif"'>Tengo una duda con esta sintaxis. Tengo una variable con formato Date que por algún motivo (el data.table viene de una consulta con PostgreSQL):<o:p></o:p></span></p></div><div><div><p class=MsoNormal><span style='font-family:"Courier New"'>datos <- prov[, pprid, pprfecbaja]</span><o:p></o:p></p></div><div><p class=MsoNormal><span style='font-family:"Courier New"'> str(datos)</span><o:p></o:p></p></div><div><p class=MsoNormal><span style='font-family:"Tahoma","sans-serif"'>Cuando intento quitar las fechas de bajas inválidas (0001-01-01) y convertirlas a NA, la variable resultante "pierde" su condición de Date. Probé con distintas formas, siempre con el mismo resultado:</span><o:p></o:p></p></div><div><p class=MsoNormal><span style='font-family:"Courier New"'>datos$pprfecbaja <- ifelse(datos$pprfecbaja=="0001-01-01", NA, datos$pprfecbaja)</span><o:p></o:p></p></div><div><p class=MsoNormal><span style='font-family:"Courier New"'>datos$pprfecbaja <- ifelse(datos$pprfecbaja=="0001-01-01", NA, as.Date(datos$pprfecbaja))</span><o:p></o:p></p></div><div><p class=MsoNormal><span style='font-family:"Courier New"'>datos$pprfecbaja <- ifelse(year(datos$pprfecbaja) < 1994, NA, as.Date(datos$pprfecbaja))</span><o:p></o:p></p></div><div><p class=MsoNormal><span style='font-family:"Tahoma","sans-serif"'>¿Podrían por favor ayudarme a correr la sintaxis correcta? </span><o:p></o:p></p></div><div><p class=MsoNormal><span style='font-family:"Tahoma","sans-serif"'>Adjunto los datos de ejemplo. </span><o:p></o:p></p></div></div><div><div><p class=MsoNormal><span style='font-family:"Tahoma","sans-serif"'>Muchas gracias.<o:p></o:p></span></p></div><p class=MsoNormal><o:p> </o:p></p></div><p class=MsoNormal>-- <o:p></o:p></p><div><div><p class=MsoNormal><span style='font-family:"Tahoma","sans-serif"'>Mauricio</span><o:p></o:p></p></div></div></div></div><P align=left><FONT face=Verdana color=#396da5 size=1><STRONG><U></U></STRONG></FONT> </P>
<P align=left><FONT face=Verdana color=#396da5 size=1><STRONG><U>Avís legal/Aviso legal</U></STRONG></FONT></P>
<DIV align=justify><FONT face=Verdana color=#808080 size=1>La present informació s'envia únicament a la persona a la que va dirigida i pot contenir informació privilegiada o de caràcter confidencial. Qualsevol modificació, retransmissió, difusió o altre ús d'aquesta informació per persones o entitats diferents a la persona a la que va dirigida està prohibida. Si vostè l'ha rebut per error, si us plau contacti amb el remitent i esborri el missatge de qualsevol ordinador. En el cas que aquest missatge vagi a ser contestat per la mateixa via, ha de saber-se que la seva resposta podria ser coneguda per tercers a l'entrar a la xarxa. Per això, si el missatge inclou contrasenyes, números de targetes de crèdit o qualsevol altra informació que vostè consideri confidencial, seria més segur contestar per una altra via i cancel·lar la seva transmissió. L'Ajuntament de Mataró i els seus organismes dependents no poden assumir la responsabilitat derivada del fet de què terceres persones puguin arribar a conèixer el contingut d'aquest missatge durant la seva transmissió.</FONT></DIV>
<HR color=#396da5 noShade SIZE=1>
<DIV align=justify><FONT face=Verdana color=#808080 size=1>La presente información se envía únicamente a la persona a la que va dirigida y puede contener información privilegiada o de carácter confidencial. Cualquier modificación, retransmisión, difusión u otro uso de esta información por persones o entidades diferentes a la persona a la que va dirigida está prohibida. Si usted la ha recibido por error, por favor contacte con el remitente y borre el mensaje. En el caso de que este mensaje vaya a ser contestado por la misma vía, ha de saberse que su respuesta podría ser conocida por terceros al entrar en la red. Por este motivo, si el mensaje incluye contraseñas, números de tarjetas de crédito o cualquier otra información que considere confidencial, sería más seguro contestar por otra vía y cancelar su transmisión. El Ayuntamiento de Mataró y sus organismos dependientes no pueden asumir la responsabilidad derivada del hecho de que terceras personas puedan llegar a conocer el contenido de este mensaje durante su transmisión. </FONT></DIV>
<DIV align=justify> </DIV><A title="gfidisc.ajmataro.cat" href="#"> </A></body></html>