How to add queries in UpsetR plot initially produced with expression input

[twesigomwedavid]

I am using an expression input to make an UpsetR plot for variant call-sets:

Input: A=120, B=120, C=80, A&B=48, A&C=20, B&C=11, A&B&C=24

I have the counts of the number of true positives for each intersection:

(TP(A) = 100, TP(B) = 80, TP(C) = 40, TP(A&B) = 24, TP(A&C) = 9, TP(B&C) = 3, TP(A&B&C) = 20).

How can I add this information as a query? Most of the examples available online assume that the input is a data frame.

This is my starting code:

library(UpSetR) expressionInput <- c(A=120, B=120, C=80, A&B=48, A&C=20, B&C=11, A&B&C=24) upset(fromExpression(expressionInput), order.by = "freq", text.scale= c(1.3, 1.3, 1, 1, 1.5, 1.2))