Franciso,
> #Tus datos
> require(data.table)
> DT <-
data.table(id=1:5,fnacim=as.Date(c("1939-10-28","1943-02-26","1946-03-09","1947-05-19","1932-04-03")),finicio=as.Date(c("2012-01-01","1980-07-15","1998-10-28","2011-10-28","2010-10-28")),fsal=as.Date(c("2012-05-01","2014-02-01","2012-10-20","2013-10-15","2012-08-25")))
>
>
> #Tus condiciones
> edad_u=65; Apertura=as.Date("2010-01-01")
>
>
> #Con estas dos lineas creo que debería poder identificar a tus empleados
> DT[,fcumple:=paste(year(fnacim)+65,substr(fnacim,6,10),sep="-")]
> DT[,quien:=Apertura>=fcumple & finicio<=Apertura]
> DT
id fnacim finicio fsal fcumple quien
1: 1 1939-10-28 2012-01-01 2012-05-01 2004-10-28 FALSE
2: 2 1943-02-26 1980-07-15 2014-02-01 2008-02-26 TRUE
3: 3 1946-03-09 1998-10-28 2012-10-20 2011-03-09 FALSE
4: 4 1947-05-19 2011-10-28 2013-10-15 2012-05-19 FALSE
5: 5 1932-04-03 2010-10-28 2012-08-25 1997-04-03 FALSE
> Hola Javier Rubén,
>
> Gracias por tu respuesta. Si bien ya sabía que el código funcionaba (de
> hecho, ya lo
> mencionaba en mi correo inicial), el motivo de adjuntarlo era por si dicho
> código
> fuese muy mejorable en condiciones de rendimiento, pues he de aplicarlo a
> decenas de
> miles de datos y funciona algo lento (posible motivo ya apuntado en tu
> respuesta).
> Dado que sé que en el foro hay gente que sabe muchísimo en el tratamiento de
> fechas,
> quizás (no lo sé) se puede establecer una clara mejora en términos de
> eficiencia
> computacional.
>
> En cualquier caso, lo dejo por si alguien realiza alguna vez algo similar o
> por si
> alguien tiene una aportación al respecto.
>
> Saludos.
>
> [[alternative HTML version deleted]]
>
> _______________________________________________
> R-help-es mailing list
> R-help-es@r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>
--
____________________________________
Olivier G. Nuñez
Email: onu...@unex.es
http://kolmogorov.unex.es/~onunez
Tel : +34 663 03 69 09
Departamento de Matemáticas
Universidad de Extremadura
_______________________________________________
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es
