複数のインデックスを含むラベルを棒グラフに追加したいと思います。
data<-as.data.frame(c("A"))
colnames(data)<-"A"
data$B<-5
ggplot(data, aes(x=A, y=B)) +
geom_bar(stat="identity", colour="black", position="dodge", size=0.25, width=0.8, alpha=0.8) +
annotate("text", x=1, y=2.5, label="some text")
「一部のテキスト」を「a1 a2 a3」に置き換える必要があります。数字は下付き文字です。次のことを試しましたが、エラーが発生しました。
annotate("text", x=1, y=0.4, parse=T, label=paste("a[1]","a[2]","a[3]",sep=" "))