Symbole Plotmath et référence à une variable dans la légende R plot: possible sans caractère Unicode?

Question

J'essaye de faire une étiquette dans une légende de base R qui a un signe supérieur ou égal à suivi d'une valeur numérique qui est recueillie à partir d'une variable. Je peux le faire avec le code suivant en utilisant le caractère Unicode, et la fonction bquote:

data = c(1,2,3,4) 
paste0("\u2265", bquote(.(data[2]))) 

Je voudrais savoir s'il est possible de faire une telle étiquette, sans le caractère Unicode, tout en faisant référence à une variable pour une valeur numérique. J'ai échoué en utilisant des combinaisons d'appels de fonction imbriqués expression, paste, substitute et bquote, et je n'ai pas vu une question ici qui résout ce problème spécifique (je m'excuse si j'ai manqué quelque chose).

Idéalement, la solution généraliserait aussi à d'autres caractères de tracé.

Answer 1

data = c(1,2,3,4) 

plot.new() 
text(0.5, 0.5, bquote({} >= .(data[2])), cex = 30)