How to get the common element names across the sets in an UpSetR plot?

[DC7]

Hi Community-
I am using UpSetR for the visualization of my study data. But, I am not getting how should I add one feature in the plot, that is, the name of the intersecting elements across intersecting sets. For example, if you see the following plot (from a published study), you can see the common elements (Bacteria names, e.g. F. nucleatum, P. asaccharolytica, S. moorei, etc. ) are shown along the right side of the plot (marked):

I don't know how can I make them visible in my plot. Here's reproducible code and the plot generated for my study:

library(UpSetR)
# example of list input (list of named vectors)
listInput <- list(one = c("a", "b", "c", "d", "e", "f", "g", "h"), two = c("a", "b", "c", "d"), three = c("c", "d", "e", "f", "g", "h"))

upset(fromList(listInput), order.by = "freq")

Can anyone please help me?

thanks,
DC7