Чтение данных и использование в качестве меток оси
У меня есть данные в файле CSV с разными столбцами. Один столбец содержит данные измерения температуры, другой - соответствующие временные метки. Я хотел бы нанести данные и добавить временные метки на оси X. Поскольку у меня есть 839 меток времени, я хотел бы наносить метку времени каждые 4 часа.
То, что у меня есть, это график и ось тикает в правильных положениях Однако у меня проблемы с чтением меток времени таким образом, что это позволяет мне использовать их как метки тиков.
time <- Ankle.r[,2]
time2 <- time[seq(1, length(time), 48)] #4h*12samplings/h -> 48
time3 <- data.frame(lapply(time2, as.character), stringsAsFactors=FALSE)
Теперь у меня есть все метки времени, которые мне нужны, в одном ряду.
Первая проблема: я не хотел бы изображать секунды, но уменьшать %H:%M:%S
отформатировать в %H:%M
,
Вторая проблема: мне нужны данные, чтобы я мог использовать их в качестве меток для отметок оси X (здесь labels = c(time3)
) в моем geom_line
сюжет.
p <- ggplot(data=Tempdata,
aes(x = MSZP,
y = Tempdata, colour = "Temperature Differences"))
p + geom_line(aes(x=MSZP, y = Tempdata$Proximal.vs.Ankles, colour = "Prox vs. Ankles")) +
scale_y_continuous(limits=c(), name = "Temperature Differences")+
theme(axis.text.x = element_blank())+
scale_x_continuous(breaks=c(seq(1,839*5,240)),
labels = c(time3), name = "Messzeitpunkt")