我想在一个地块中可视化几个单独标记的动物的中途停留时间和时间。所有个体都应该在y轴上绘制,时间在x轴上。我希望每个观察都用一个点来表示。为了表明个体的存在,尽管每天都没有观察到,最小停留间隔(从第一次到最后一次观察的时间)应该用实线或虚线表示。简化我的原始数据如下所示:
date individual
1 10.02.15 Y1
2 10.02.15 Y3
3 11.02.15 Y1
4 15.02.15 Y1
我将日期转换为一年中的某一天并尝试使用ggplot进行绘图,但没有设法绘制点或线。
答案 0 :(得分:1)
试试这个:
library(ggplot2)
library(lubridate)
df <- read.csv("YourData.csv", stringsAsFactors = FALSE)
df$date <- dmy(df$date)
ggplot(data = df) +
geom_point(aes(x = date, y = individual), size = 10) +
geom_line(aes(x = date, y = individual, group = individual))