5

私はRが初めてで、プロットタイトルに「これは（\ n）8 <=（以下）x <= 10のプロットです」のようなものを書く方法を理解しようとしています。

私はこのようなことを試しました：

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

これはまさに私が望むものではなく、「8 (以下) xx (以下) 10」であり、これら 2 つの表現はメイン タイトルの下の行に出力されます (これはかなりクールです) が、同じ場所に、これはほとんど役に立たない:)

私も試しました：

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

私が望むことは何ですか（セパレータが完全に無視されているように見えることを除いて）、それ以上テキストを追加することはできません。出力: 「8 (以下) xx (以下) 10」。

そして試したところ

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

出力は私を完全に苛立たせました: タイトルは次のとおりでした: "xpaste (\n) xx <= 8 (\n) xz <= 10 (\n) x" ((\n) は改行で、他の文字は正確に何が印刷されているか）

では、複数の演算子を使用して式を出力する可能性はありますか?

4

3 に答える 3

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

plot(1:10, main=heyTitle)

トリックに対するこの回答に感謝します。atop()

編集：ここに図があります

EDIT 2: G. Grothendieck による別の回答から借りて、括弧を使用して間隔を修正します。

ここに画像の説明を入力

于 2014-05-07T13:58:52.040 に答える