View source: R/stat-tile-etho.R
stat_bar_tile_etho | R Documentation |
These functions show the temporal trend (time on the x axis) of a variable of interest (z axis)
as either colour intensity (stat_tile_etho
) or using the hight of the tiles (stat_bar_tile_etho
).
In both cases, the y axis is a discrete variable such as a treatment or the id of individuals.
stat_bar_tile_etho(mapping = NULL, data = NULL, geom = "bar_tile", position = "identity", ..., method = mean, method.args = list(), na.rm = FALSE, show.legend = NA, inherit.aes = TRUE) stat_tile_etho(mapping = NULL, data = NULL, geom = "raster", position = "identity", ..., method = mean, method.args = list(), na.rm = FALSE, show.legend = NA, inherit.aes = TRUE)
mapping |
Set of aesthetic mappings created by |
data |
The data to be displayed in this layer. There are three options: If A A |
geom |
The geometric object to use display the data |
position |
Position adjustment, either as a string, or the result of a call to a position adjustment function. |
... |
Other arguments passed on to |
method |
function used to compute the aggregate, when/if grouping several individuals on the same row. The default is fucntion is mean. median, min, max are examples of alternatives. |
method.args |
List of additional arguments passed on to the modelling
function defined by |
na.rm |
If |
show.legend |
logical. Should this layer be included in the legends?
|
inherit.aes |
If |
The relevant rethomic tutorial section
ggetho to generate a plot object
stat_pop_etho to show population trend by aggregating individuals over time
stat_ld_annotations to show light and dark phases on the plot
Other layers: geom_peak
,
stat_ld_annotations
,
stat_pop_etho
# We start by making a to dataset with 20 animals metadata <- data.frame(id = sprintf("toy_experiment | %02d", 1:20), age = c(1, 5, 10, 20), condition = c("A", "B")) print(metadata) dt <- toy_activity_data(metadata, 3) # We build a plot object pl <- ggetho(dt, aes(z = asleep)) # A standard plot one row per animal: pl + stat_tile_etho() # We can also group animals per condition and calculate the average sleep pl <- ggetho(dt, aes(z = asleep, y = condition)) pl + stat_tile_etho() # We can sort by adding condition AND id on the y axis: pl <- ggetho(dt, aes(z = asleep, y = interaction(id, condition))) pl + stat_tile_etho() # Same if we want to sort by age pl <- ggetho(dt, aes(z = asleep, y = interaction(id, age))) pl + stat_tile_etho() # Instead, of the average, maybe we want to show the highest (max) # posible value of sleep for any time point pl + stat_tile_etho(method = max) # We can also use stat_bar_tile as an alternative pl + stat_bar_tile_etho()
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.