Question

我的数据位于包含不同列的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。

第二个问题：我需要数据，因此我可以在labels = c(time3)图中将它们用作x轴刻度的标签（此处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")

阅读数据＆amp;用作轴标签

0 个答案: