Jak umieścić groby za pomocą annotation_custom () w precyzyjnych obszarach obszaru wydruku?

Próbuję odtworzyć następującą fabułę [podstawa R] za pomocąggplot2Udało mi się to zrobić w większości, ale to, co obecnie mnie dziwi, to umieszczenie segment...