Global average , how to draw it in a gg_subseries {feasts} plot

[Tony_iberian]

HI All!

I would like to "draw" a red line that shows the global average (average accross all quarters and years)
how can be added to the following code? thanks in advance

data_vic %>%
gg_subseries(Occupancy) +
labs(
y = "Occupancy",
title = "Tourism Victoria")