[解決済み] R で barplot の x 軸ラベルを回転させる

質問

棒グラフのx軸ラベルを45度回転させようとしているのですが、うまくいきません。これは、私が以下に持っているコードです。

barplot(((data1[,1] - average)/average) * 100,
        srt       = 45,
        adj       = 1,
        xpd       = TRUE,
        names.arg = data1[,2],
        col       = c("#3CA0D0"),
        main      = "Best Lift Time to Vertical Drop Ratios of North American Resorts",
        ylab      = "Normalized Difference",
        yaxt      = 'n',
        cex.names = 0.65,
        cex.lab   = 0.65)

どのように解決するのですか？

davidの回答に従い、回答を編集しました。

これは一種のハック的な方法です。 もっと簡単な方法があるのでしょう。 しかし、あなたは、バーのラベルとラベルのプロットテキストを抑制することができます バーの位置を保存することにより barplot からバーの位置を保存して、上下に少しいじれば、ラベルのプロットテキストを抑制できます。 以下はmtcarsデータセットでの例です。

x <- barplot(table(mtcars$cyl), xaxt="n")
labs <- paste(names(table(mtcars$cyl)), "cylinders")
text(cex=1, x=x-.25, y=-1.25, labs, xpd=TRUE, srt=45)