[R] Need help plotting

[Rui Barradas]

No you don't! I do!
I don't have tst on my system.

Rui Barradas

Às 22:11 de 22/09/2022, DFP escreveu:
> Do I need that read.table if the tst dataframe already exists in my 
> system?  If so, why?
> 
> --------------------------------------------------
> 
> Hello,
> 
> You have to load the packages involved:
> 
> 
> library(dplyr)
> library(tidyr)
> library(ggplot2)
> 
> 
> then run the full sequence. Though this is not important, if you are
> pivotting columnns named y1 and y2, why not name the result just y?
> 
> 
> pivot_longer(-time, names_to = "y")
> 
> 
> And here is complete code, runs in a fresh R session.
> 
> 
> tst  <- read.table(text = "
> time y1 y2
> 1  18:55 30 19
> 2  18:56 30 19
> 3  18:57 29 19
> 4  18:58 31 19
> 5  18:59 28 19
> 6  19:00 28 19
> 7  19:01 28 19
> 8  19:02 28 19
> 9  19:03 28 19
> 10 19:04 28 19
> 11 19:05 29 19
> ", header = TRUE)
> 
> library(dplyr)
> library(tidyr)
> library(ggplot2)
> 
> tst %>%
>     mutate(time = paste(Sys.Date(), time),
>            time = as.POSIXct(time)) %>%
>     select(time, y1, y2) %>%
>     # reshape to long format
>     pivot_longer(-time, names_to = "y") %>%
>     # now plot
>     ggplot(aes(time, value, color = y)) +
>     geom_line() +
>     geom_point() +
>     scale_color_manual(values = c("orange", "skyblue")) +
>     # make datetime labels
>     scale_x_datetime(date_breaks = "1 mins", date_labels = "%H:%M") +
>     theme_bw()
> 
> 
> Hope this helps,
> 
> Rui Barradas
>