AA
https://cedricscherer.netlify.app/2019/08/05/a-ggplot2-tutorial-for-beautiful-plotting-in-r/
на англ, правда.
Size: a a a
AA
EP
O
EP
A
> library(data.table)
> x <- as.data.table(iris)
> x[, .(m = mean(Petal.Width)), by = .(Species, Setosa = Species == "setosa")]
Species Setosa m
1: setosa TRUE 0.246
2: versicolor FALSE 1.326
3: virginica FALSE 2.026
A
O
АК
A
I
АК
AP
PU
AB
a
plot(1:10, xlab = expression("My Title"[2]))
AB
AS
lubridate
ничего гуманнее следующего варианта не придумали?require(lubridate)
clockS = function(t){hour(t)*3600+minute(t)*60+second(t)}
plot(clockS(times),val)
АН
IY
IY