Comment utiliser plus d'une expression à la suite

Question

Je suis nouveau à R et j'essaie de comprendre, comment écrire quelque chose comme "Hey les gars, ceci est mon intrigue pour (0) 8 < = (moins de ou égal) x < = 10 "dans mon intrigue-titre.

J'ai essayé quelque chose comme ceci:

plot(1:10, main="Hey, guys, this is my plot for \n") 
mtext(c(expression(8 <= x),expression(x <= 10), side=3) 

Cela donne pas exactement ce que je veux, mais « 8 (inférieur ou égal) xx (inférieur ou égal) 10 », et ces deux expressions sont imprimés en ligne sous le titre principal, (ce qui est assez cool), mais au même endroit, ce qui est à peu près inutile :)

J'ai aussi essayé:

plot(1:10, main=bquote(paste(8 <= x, x <= 10, sep=","))) 

Quel genre de fait ce que je veux (à l'exception du Seper ator semble être complètement ignoré), mais je ne peux pas ajouter d'autres textes. Sortie: "8 (moins ou égal) xx (moins ou égal) 10".

Et quand j'ai essayé

plot(1:10, main=paste("x",bquote(paste(x <= 8,z <= 10,sep=" ")),sep=" ")) 

la sortie m'a irrité complètement: le titre était: "xpaste (\ n) xx < = 8 (\ n) XZ < = 10 (\ n) x" (le (\ n) est un saut de ligne, les autres caractères sont exactement ce qui est imprimé)

Alors, est-il possible d'imprimer des expressions avec plus d'un opérateur?

Answer 1

expressions sont un peu loufoque, mais voici comment vous pouvez le faire

plot(1:10, main="Hey, guys, this is my plot for \n") 
mtext(expression(paste(8 <= x,", ",x <= 10)), side=3) 

Pour obtenir un vecteur d'expressions, vous utilisez juste expression(exp1,exp2,exp3). Pas besoin de s'embêter avec c() ou list(). Et puis pour mélanger des expressions avec du texte, paste() est souvent utile. Sans paste pour les combiner comme une expression, ils vont tracer les uns sur les autres au même endroit.

Answer 2

heyTitle <- bquote(atop(
    "Hey, guys, this is my plot for", 
    {8 <=x}*phantom()<=10 
    )) 

plot(1:10, main=heyTitle) 

Merci à this answer pour le tour atop().

EDIT: Voici la figure

EDIT 2: emprunt de another answer by G. Grothendieck à utiliser des crochets pour fixer l'espacement.

Answer 3

Essayez ceci:

plot(1:10, main = ~ bold(atop("Hey, guys, this is my plot for", {"8" <= x} <= "10"))) 

Sur l'appareil windows() il ressemble à ceci:

RÉVISÉ espacement et fait 2ème ligne un peu plus grande pour correspondre à la première ligne. Ajouté l'idée atop de rbatt. Plus de simplification.