1

もう一度お手数をおかけして申し訳ありませんが、単純な作業に苦労しており、解決策を探してインターネットを閲覧した後、解決できません。これが取引です。私は3つの配列を持っています

c1 <- data.frame(cf=rep(100,10),m=seq(1,10,1))
c1$cf[10] <- 500

c2 <- data.frame(cf=rep(50,10),m=seq(1,20,2))
c2$cf[10] <- 650

c3 <- data.frame(cf=rep(150,5),m=seq(1,20,4))
c3$cf[5] <- 450

x に沿って 1 から 20 までのシーケンス (3 つの 2 番目の列のすべての可能なエントリ) と y に沿った 3 つの最初の列の (可能な) 合計を持つ積み上げ棒グラフを作成したいと思います。

3つのデータフレームをマージしようとしました

m <- merge(c1,c2,by="m",all=TRUE)
m <- merge(m,c3,by="m",all=TRUE)

溶かした

m1 <- melt(m,id="m")
m1 <- na.exclude(m1)

そしてggplotを次のように使用しようとしました

ggplot(data=m1,aes(x=m,y=value,fill=row))

しかし、私は何も得られず、棒グラフを正しい方法で表示する方法と、これが私が取得したいことを行う正しい方法であるかどうかもわかりません。

場合によっては、助けてくれてありがとう。

4

1 に答える 1