# NOT RUN {
stimuli <- demo_stim()
# label with magick::image_annotate
label(stimuli,
text = c("CHINWE", "GEORGE"),
gravity = c("north", "south"),
color = "red")
# label with ggplot2::annotate
label(stimuli,
label = c("CHINWE", "GEORGE"),
x = 0.5,
y = c(0.99, 0.02),
vjust = c(1, 0),
size = 18,
color = "red")
# }
Run the code above in your browser using DataLab