5

創業年、時価総額、会社名 (実際にはティッカー シンボル) の 3 つの変数を含む会社のリストがあります。

創業年 (X 軸) と時価総額 (Y 軸) ごとにプロットし、ベンダー名によって塗りつぶします。

これを行う：

 qplot(factor(Founded), Market.Cap, data = mcap, geom = "bar", fill = Vendor)

わかりましたが、X 軸は判読できません (以下を参照)。scale_x_discrete() 値 (1900 - 2012 など) をフィードしようとしましたが、うまくいきませんでした。実際の値ではなく、選択したスペクトルを表示するようにggplot2に指示するにはどうすればよいですか?

余談ですが、Y 軸の科学表記を避ける方法を教えていただければ幸いです。

ここに画像の説明を入力

4

2 に答える 2

9

これが役立つことを願っています。軸の回転が機能しない場合は、次のようにbreaksand labelswithinを使用して、軸のブレークとラベルを手動で設定できます。scale_x_continuous

require(ggplot2)
# dummy data
set.seed(45)
len <- 50
df <- data.frame(years = factor(seq(1901, 1950, length.out = len)), 
           values = 1e6 * runif(len), group=factor(rep(1:5, each=len/5)))
p <- ggplot(data = df, aes(x = years, fill=group)) + geom_bar(aes(weight = values))
require(scales) # for removing scientific notation
p <- p + scale_y_continuous(labels = comma)
# manually generate breaks/labels
labels <- seq(1901, 2000, length.out=10)
# and set breaks and labels
p <- p + scale_x_discrete(breaks=labels, labels=as.character(labels))
p

ggplot2

于 2013-01-20T21:28:15.897 に答える
3

答えはここにあります

あなたの場合、x 軸のラベルを 90 度回転させることをお勧めします。

+ theme(axis.text.x=element_text(angle=90, hjust=1))

y 軸の表記を変更するには、次のようにします。

+ scale_y_continuous(labels=comma)
于 2013-01-20T20:50:12.780 に答える