Tentei rodar e não consegui, sabe dizer o que está acontecendo?
> library(tidyverse)
-- Attaching packages --------------------------------------- tidyverse 1.3.0 --
v ggplot2 3.3.2 v purrr 0.3.4
v tibble 3.0.3 v dplyr 1.0.0
v tidyr 1.1.0 v stringr 1.4.0
v readr 1.3.1 v forcats 0.5.0
-- Conflicts ------------------------------------------ tidyverse_conflicts() --
x dplyr::filter() masks stats::filter()
x dplyr::lag() masks stats::lag()
>
> 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")
Erro: Problem with `mutate()` input `hora`.
x não foi possível encontrar a função "hms"
i Input `hora` is `hms(hora)`.
Run `rlang::last_error()` to see where the error occurred.
>
> library(tidyverse)
-- Attaching packages --------------------------------------- tidyverse 1.3.0 --
v ggplot2 3.3.2 v purrr 0.3.4
v tibble 3.0.3 v dplyr 1.0.0
v tidyr 1.1.0 v stringr 1.4.0
v readr 1.3.1 v forcats 0.5.0
-- Conflicts ------------------------------------------ tidyverse_conflicts() --
x dplyr::filter() masks stats::filter()
x dplyr::lag() masks stats::lag()
>
> 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")
Erro: Problem with `mutate()` input `hora`.
x não foi possível encontrar a função "hms"
i Input `hora` is `hms(hora)`.
Run `rlang::last_error()` to see where the error occurred.
>
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
Engenheiro Agrônomo - Data Scientist
Técnico em Segurança do Trabalho
CREA : 051984991-4
Tel: +55 73 99151-9565
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) <[email protected]> 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) <[email protected]> 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 MariaObrigadoProf. Elias Carvalho
_______________________________________________ R-br mailing list [email protected] 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.
