y/z axis actogram

[johanna0809]

Hi!

I need to know what exactly is plotted on the y-axis (or in this case the z axis?) of the actogram. After data enrichment and only using movement instead of activity, I assume it plots a mean number of beam crossings per 30min time frame and species? Is there a maximum in movements depicted in the plot?

data enrichment - variable moving is TRUE when and only when acitvity >0, and FALSE

dt[,moving := activity > 0]

creating a single plotted actogram

ggetho(dt, aes(y= species, z = moving))+
stat_bar_tile_etho()

I did not curate the data as I have already manually deleted all animals which were not of interest from the data file. I have created a single plotted actogram instead of a double plotted one which includes all rounds of the experiment and all individuals per species summarized into 24h. (graph is added in the attachment)
24h_single_plotted_actogram_w_rel_act_col_column.pdf

Is my interpretation of this actogram correct? Can I add an axis description for the y axis?

Thanks so much for any help!!

[qgeissmann]

Hi, can you provide more code (e.g., how you load the data etc)?
From what I understand, you are plotting "moving", which is 0 or 1, so it plots the proportion of time a given individual is moving (not exactly the sum of beam crosses). E.g., if you have a series of (0,0,0,1,0,0), then the Y axis is (1/6). This is often better than the number of beam crosses as :

1. It will not change much if you average over 30 min a vs 60min
2. If you have missing data (e.g., you have only 15min of data in one beam), it still works, as this is a proportion
   I hope it helps!
   Q

[johanna0809]

Thank you so much! This is the code I've used. In my data, I combine 5 runs with 6 species/lines and 5 individuals each.

library(damr)
library(ggetho)
library(sleepr)
library(zeitgebr)
library(behavr)
library(data.table)
library(ggplot2)

importing data from file on my computer

data_dir <- file.path("/Users/johannabeirer/Documents/Lehramt/Master/Masterarbeit/24h_single_plotted_actograms")
list.files(data_dir)

set working directory

setwd(data_dir)

importing metadata

metadata <- fread("all_24h_metadata.csv")
metadata

linking metadata with recorded data

if linking does not work, change MT in the .txt file to 0 and CT to 1

metadata2 <- link_dam_metadata(metadata, result_dir = data_dir)
metadata2

load

dt <- load_dam(metadata2)
summary(dt)

data enrichment - variable moving is TRUE when and only when acitvity >0, and FALSE

dt[,moving := activity > 0]

creating a single plotted actogram

ggetho(dt, aes(y= species, z = moving))+
stat_bar_tile_etho()