はggplot2軸タイトルの大手上付き文字にスペースを削除して

Question

をラベルたぶん私は正しくないのですが、上付き文字で始まる式で望ましくないスペースがあるように私には見える：

df <- data.frame(treatment=as.factor(c("A", "B")), value=c(1,2)) 

labels <- c(expression(""^14~CH[4]), 
      expression(""^14~CH[4]~"+"~"SO"[4]^{2-''})) 

library(ggplot2) 
ggplot(df, aes(treatment, value)) + 
    geom_bar(stat="identity") + 
    scale_x_discrete(labels=labels) 

私はフォトショップに行くことができます上付きの14と "C"の間のスペースを減らすために、しかし、おそらくプロットの方法がありますか？最後に2番目の式に上付き文字が表示されていないことに注意してください。

Answer 1

式では、~は、用語間にスペースを与えます。用語間にスペースを入れたくない場合は、*を使用できます。末尾の上付き文字の前には、~がないため、スペースはありません。

引用符の大部分を削除することもできます。特殊文字やスペースがある場合を除いては不要です。

だからあなたの表現は

expression(''^14*CH[4]~+~SO[4]^'2-')