Extrair dados de uma lista
Boa tarde tenho a seguinte lista: [image: Captura de tela de 2021-09-08 11-09-45.png] Como faço para extrair apenas as linhas que apresentam o horário entre: "00:00:00" e "11:00:00" ? -- *In Jesu et Maria* *Obrigado* *Prof. Elias Carvalho* *"Felix, qui potuit rerum cognoscere causas" (Virgil 29 BC)"Blessed is he who has been able to understand the cause of things"*
library(tidyverse) data <- ls_completed_timeseries_last_365$`12_T_DC_1` names(data)[1] <- "time" data %>% mutate(time2 = format(time, format="%H:%M:%S")) %>% filter(time2 >= "00:00:00" & time2 < "11:00:00") %>% select(-time2) *Cid Edson Mendonça Póvoas* *AnovAgro <http://www.anovagro.com/>* *Engenheiro Agrônomo - **Data Scientist* *Técnico em Segurança do Trabalho * *CREA : 051984991-4* *Tel: +55 73 99151-9565* *Lattes : *http://lattes.cnpq.br/2303498368142537 *LinkedIn :* http://br.linkedin.com/in/cidedson/ *Whatsapp :* https://wa.me/5573991519565 Em qua., 8 de set. de 2021 às 13:52, Elias Carvalho por (R-br) < r-br@listas.c3sl.ufpr.br> escreveu:
Boa tarde tenho a seguinte lista: [image: Captura de tela de 2021-09-08 11-09-45.png] Como faço para extrair apenas as linhas que apresentam o horário entre: "00:00:00" e "11:00:00" ?
--
*In Jesu et Maria* *Obrigado* *Prof. Elias Carvalho*
*"Felix, qui potuit rerum cognoscere causas" (Virgil 29 BC)"Blessed is he who has been able to understand the cause of things"* _______________________________________________ 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.
Consideradndo que dentro da lista há uma dataframe e que as datas estão em uma úncia coluna chamada eload, o seguinte código deve resolver. library(tidyverse) dados<-data.frame(eload=c("2014-01-28 00:00:00 154.07","2014-01-28 01:00:00 154.11","2014-01-28 02:00:00 151.83"), temp=c(25.000,23.000,21.900)) dados_sep <-dados%>%separate(eload,c("data","hora","x"),sep=" ")%>% mutate(hora=hms(hora))%>%filter(hora>="00:00:00"&hora<="11:00:00") On Sep 8 2021, at 1:51 pm, Elias Carvalho por (R-br) <r-br@listas.c3sl.ufpr.br> wrote:
Boa tarde tenho a seguinte lista:
Como faço para extrair apenas as linhas que apresentam o horário entre: "00:00:00" e "11:00:00" ? -- In Jesu et Maria
Obrigado Prof. Elias Carvalho
"Felix, qui potuit rerum cognoscere causas" (Virgil 29 BC) "Blessed is he who has been able to understand the cause of things"
_______________________________________________ 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.
verdade, não me atentei que a primeira coluna poderia ter as 3 informações data, hora e o valor de eload *Cid Edson Mendonça Póvoas* *AnovAgro <http://www.anovagro.com/>* *Engenheiro Agrônomo - **Data Scientist* *Técnico em Segurança do Trabalho * *CREA : 051984991-4* *Tel: +55 73 99151-9565* *Lattes : *http://lattes.cnpq.br/2303498368142537 *LinkedIn :* http://br.linkedin.com/in/cidedson/ *Whatsapp :* https://wa.me/5573991519565 Em qua., 8 de set. de 2021 às 14:54, Fernando Souza por (R-br) < r-br@listas.c3sl.ufpr.br> escreveu:
Consideradndo que dentro da lista há uma dataframe e que as datas estão em uma úncia coluna chamada eload, o seguinte código deve resolver.
library(tidyverse)
dados<-data.frame(eload=c("2014-01-28 00:00:00 154.07","2014-01-28 01:00:00 154.11","2014-01-28 02:00:00 151.83"), temp=c(25.000,23.000,21.900))
dados_sep <-dados%>%separate(eload,c("data","hora","x"),sep=" ")%>% mutate(hora=hms(hora))%>%filter(hora>="00:00:00"&hora<="11:00:00")
On Sep 8 2021, at 1:51 pm, Elias Carvalho por (R-br) < r-br@listas.c3sl.ufpr.br> wrote:
Boa tarde tenho a seguinte lista:
Como faço para extrair apenas as linhas que apresentam o horário entre: "00:00:00" e "11:00:00" ?
-- *In Jesu et Maria*
*Obrigado* *Prof. Elias Carvalho*
*"Felix, qui potuit rerum cognoscere causas" (Virgil 29 BC)* *"Blessed is he who has been able to understand the cause of things"* _______________________________________________ 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.
_______________________________________________ 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.
Oi Mauro, realmente havia um erro no código, fiz as correções e agora está funcionando. Aproveitei e coloquei somente os pacotes necessários ao invés de todo o tidyverse. library(dplyr) library(tidyr) library(lubridate) dados<-data.frame(eload=c("2014-01-28 00:00:00 154.07","2014-01-28 01:00:00 154.11", "2014-01-28 02:00:00 151.83"), temp=c(25.000,23.000,21.900)) dados dados_sep <-dados%>%separate(eload,c("data","hora","x"),sep=" ")%>% mutate(hora=hms(hora))%>%filter(hora>="0H:0M:0S"&hora<="11H 0M 0S") dados_sep Att On Sep 8 2021, at 1:51 pm, Elias Carvalho por (R-br) <r-br@listas.c3sl.ufpr.br> wrote:
Boa tarde tenho a seguinte lista:
Como faço para extrair apenas as linhas que apresentam o horário entre: "00:00:00" e "11:00:00" ? -- In Jesu et Maria
Obrigado Prof. Elias Carvalho
"Felix, qui potuit rerum cognoscere causas" (Virgil 29 BC) "Blessed is he who has been able to understand the cause of things"
_______________________________________________ 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.
Eita, hoje eu tô que tô...rsrsr.. colei o código errado aff!. Agora vaí library(dplyr) library(tidyr) library(lubridate) dados<-data.frame(eload=c("2014-01-28 00:00:00 154.07","2014-01-28 01:00:00 154.11", "2014-01-28 02:00:00 151.83"), temp=c(25.000,23.000,21.900)) dados dados_sep <-dados%>%separate(eload,c("data","hora","x"),sep=" ")%>% mutate(hora=hms(hora))%>%filter(hora>="0H 0M 0S"&hora<="11H 0M 0S") dados_sep On Sep 8 2021, at 9:39 pm, Fernando Souza <nandodesouza@gmail.com> wrote:
Oi Mauro, realmente havia um erro no código, fiz as correções e agora está funcionando.
Aproveitei e coloquei somente os pacotes necessários ao invés de todo o tidyverse. library(dplyr) library(tidyr) library(lubridate)
dados<-data.frame(eload=c("2014-01-28 00:00:00 154.07","2014-01-28 01:00:00 154.11", "2014-01-28 02:00:00 151.83"), temp=c(25.000,23.000,21.900)) dados
dados_sep <-dados%>%separate(eload,c("data","hora","x"),sep=" ")%>% mutate(hora=hms(hora))%>%filter(hora>="0H:0M:0S"&hora<="11H 0M 0S")
dados_sep Att
On Sep 8 2021, at 1:51 pm, Elias Carvalho por (R-br) <r-br@listas.c3sl.ufpr.br> wrote:
Boa tarde tenho a seguinte lista:
Como faço para extrair apenas as linhas que apresentam o horário entre: "00:00:00" e "11:00:00" ? -- In Jesu et Maria
Obrigado Prof. Elias Carvalho
"Felix, qui potuit rerum cognoscere causas" (Virgil 29 BC) "Blessed is he who has been able to understand the cause of things"
_______________________________________________ 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.
participantes (3)
-
Cid Póvoas -
Elias Carvalho -
Fernando Souza