Fátima, boa noite!

Vi que você já conseguiu resolver, mas deixo a forma que havia pensado pra fins de comparação.

### <code r>

nome=c("Ricardo","Maria","Tereza","Pedro","José", "Germano","Ricardo")

sobrenome=c("Cunha","Andrade","Silva","Soares","Silva","Lima","Cunha")

dataint=c(20121004,20120907,20120703,20120301,20120805,20121209,20120508)

datasaida=c(20130101,20121006,20120912,20120402,20130104,20130102,20120520)

sexo=c("M","F","F","M","M","M","M")

tentre=c(20,12,67,04,49,27,08)

###

banco1=data.frame(nome,sobrenome,sexo,dataint,datasaida,tentre, stringsAsFactors=F); banco1

str(banco1)

###

banco1$dataint   = strptime(banco1$dataint, "%Y%m%d")

banco1$datasaida = strptime(banco1$datasaida,"%Y%m%d")

banco1$datafim   = banco1$datasaida

banco1$datafim[banco1$tentre>30] = NA

head(banco1)

### </code>

Éder Comunello <comunello.eder@gmail.com>
Dourados, MS - [22 16.5'S, 54 49'W]

_______________________________________________
R-br mailing list
R-br@listas.c3sl.ufpr.br
https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.