エリアプロットを作成するR

Question

深度の変動に対して相対的な豊かさをプロットするグラフを作成しようとしています。

私は、次の表

  test X1m X2m X3m X4m X5m X6m X7m 
1 Example1 1 10 10 1 1 5 1 
2 Example2 2 5 5 5 2 2 5 

を持っていると私はそれが働いisn't、私は理解してドントことを、いくつかの理由ggplot2（）

Example.class.melt<-melt(Example.df) 
colnames(Example.class.melt)[1] = "Class" 
colnames(Example.class.melt)[2] = "Depth" 
colnames(Example.class.melt)[3] = "Relative_abundance" 

Example.class.melt<-as.data.frame(Example.class.melt) 

ggplot(Example.class.melt, aes(x=Depth, y=Relative_abundance, fill=as.factor(Class))) + geom_area() 

を使用して次のことを試してみました。これまたは任意の代替案を修正するための提案はありますか？

おかげ

Answer 1

は、あなたが探しているものをこのですか？これは、あなたが質問を途中に基づいて私の解釈でした。コードは以下の通りである：

install.packages("ggplot2") 
install.packages("reshape") 
library(ggplot2) 
library(reshape) 

Example1<-c(1,10,10,1,1,5,1) 
Example2<-c(2,5,5,5,2,2,5) 
data<-rbind(Example1,Example2) 

Example.class.melt<-melt(data) 
colnames(Example.class.melt)[1] = "Class" 
colnames(Example.class.melt)[2] = "Depth" 
colnames(Example.class.melt)[3] = "Relative_abundance" 

Example.class.melt<-as.data.frame(Example.class.melt) 

ggplot(data = Example.class.melt, aes(x = Depth, y = Relative_abundance, fill=Class)) + geom_area() 

あなたがクラスに塗りつぶしでas.factorを言うことは必要ありません。