[R-br] Extração de data e hora de uma string de extrato bancario

[Benilton Carvalho]

se vc puder garantir que e' sempre: data - hora (ao inves de hora
aparecer primeiro)

parsed1 <- gsub(".*([0-9]{2}\\/[0-9]{2}).*([0-9]{2}\\:[0-9]{2}).*",
"\\1-\\2", historico)
do.call(rbind, strsplit(parsed1, "-"))

b

2011/5/14  <eder em leg.ufpr.br>:
> Walmes,
> Acho que isso pode resolver,
> historico <- c("compra com cartão - 01/04 22:11 lanchonete",
>               "compra com cartão - 02/04 12:51 restaurante")
>
> obj <- unlist(strsplit(historico,' '))
>
> dia <- obj[grep('/',obj)]
> hora <-obj[grep(':',obj)]
>
> data <- as.Date(paste(dia,hora),'%d/%m %H:%M')
> class(data)
> Att
>
>
>> Saudações,
>>
>> Tenho um arquivo com uma coluna que é histórico de movimentação
>> financeira.
>> Os elementos dessa coluna são strings como o exemplo abaixo
>>
>> historico <- c("compra com cartão - 01/04 22:11 lanchonete",
>>                "compra com cartão - 02/04 12:51 restaurante")
>>
>> Como posso fazer para criar um vetor contendo só a data, padrão "dd/mm", e
>> outro com a hora, padrão "hh:mm", que esteja no formato de data para que
>> eu
>> possa plotar os valores movimentados em função da data?
>>
>> Grato.
>> Walmes.
>>
>> ==========================================================================
>> Walmes Marques Zeviani
>> LEG (Laboratório de Estatística e Geoinformação, 25.450418 S, 49.231759 W)
>> Departamento de Estatística - Universidade Federal do Paraná
>> fone: (+55) 41 3361 3573
>> VoIP: (3361 3600) 1053 1173
>> e-mail: walmes em ufpr.br
>> twitter: @walmeszeviani
>> homepage: http://www.leg.ufpr.br/~walmes
>> linux user number: 531218
>> ==========================================================================
>> _______________________________________________
>> R-br mailing list
>> R-br em listas.c3sl.ufpr.br
>> https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
>>
>
>
>
>
> _______________________________________________
> R-br mailing list
> R-br em listas.c3sl.ufpr.br
> https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
>



-- 
Successful people ask better questions, and as a result, they get
better answers. (Tony Robbins)