mtext()expression()とpaste()を使用して、プロットタイトルで使用されるテキストの一部に太字を適用することを学びました。これは、文字列を完全に指定する場合にうまく機能します。ただし、現在取り組んでいるプロジェクトでは、太字にするテキストの部分は、ベクトルの要素を呼び出すことで取得する必要があります。ただし、呼び出し構文に必要な文字はexpression()によって解釈され、呼び出しは失敗します。
junk <- c("I'm Special", "You're Special")
plot(0, type="n")
mtext(expression(paste("Do you think ", bold(junk[1]),"today?")),3,2)
mtext(expression(paste("I think ", bold(junk[2]), "today.")),3,1)
これにアプローチする方法について何か考えはありますか?太字のテキストを直接指定しないようにしています。
bquote
このためのまともなインターフェイスがあります。置換する変数をで囲むだけです.()
。substitute
と一緒に使用することもできますexpression
。
junk <- c("I'm Special", "You're Special")
plot(0, type="n")
mtext(bquote(paste("Do you think ", bold(.(junk[1])),"today?")),3,2)
mtext(bquote(paste("I think ", bold(.(junk[2])), "today.")),3,1)
この記事はインターネットから収集されたものであり、転載の際にはソースを示してください。
侵害の場合は、連絡してください[email protected]
コメントを追加