Displaying 2 results from an estimated 2 matches for "edad_u".
2014 Apr 10
3
Unión de subconjuntos procedentes de bucles
...2/05/1932 25/02/1993 01/03/2011
5 5 0 29/12/1942 22/06/2007 01/07/2012
6 6 1 18/11/1935 07/08/2010 01/01/2014
A este data frame (cuya variable sexo ya está factorizada y cuyas otras variables ya están en formato de fecha) le quiero aplicar el siguiente código :
conv <- function(data, edad_u=65)
{ # INICIO DE LA FUNCIÓN
# Elimino individuos que tienen una edad_final < edat_u años
# ==========================================================
data$edad_final <- unclass(round(difftime(data$final, data$nacim, units="auto")/365.25,1))
data <- data[data$edad_f...
2014 Jul 21
2
Inserción de condicionales en pequeño código
...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")))
myfun <-
function(data, edad_u=65, Apertura=as.Date("2010-01-01")) {
### 1 ) Si "finicio" es ANTERIOR O
IGUAL a la fecha de Apertura ###
dd1
<- data[data$finicio <= Apertura,]
# Variable temporal: Edad en la fecha de
apertura
dd1$edad_Apertura <-
unclass(roun...