2013-11-20 6 views
-4

음, R. 와 나는이 CSV 있습니다그룹화 된 데이터 및 R로 차트를 만들

나는 R과,이 그래프처럼 뭔가를 할
"ID","Kind","Variety","Category","Kgrs","Kgrs_m2" 
"120-1","HOLLAND","MULHACEN","12G",1206,0.25 
"120-1","HOLLAND","MULHACEN","12M",4708,0.99 
"120-2","HOLLAND","MULHACEN","12G",2190,0.46 
"120-2","HOLLAND","MULHACEN","12P",5746,1.20 
"120-3","CHERRY","MINISTAR","A",9165,3.05 
"120-3","CHERRY","MINISTAR","B",50,0.017 
"120-3","CHERRY","MINISTAR","DES",1182,0.39 
"120-3","HOLLAND","MULHACEN","12G",372,0.12 
"120-7","CHERRY","MINISTAR","A",6584,3.05 
"120-7","CHERRY","MINISTAR","B",321,1.05 

:

enter image description here

CSV를 읽었지 만 CSV에서 데이터를 그룹화하고이 데이터를 바 plot에 넣으려면 어떻게해야하는지 모르겠습니다.

또한 ID의 각 그룹에 다양한 버라이어티를 추가해야합니다. 사전에

path <- "./" 

cosechas <- read.csv(paste(path, "test.csv", sep="/"),header=T) 

cosechas$Kgms <- as.numeric(cosechas$Kgms) 



fi <- c(cosechas$Kgms) 
names(fi) <- levels(cosechas$Category) 


png(paste(path, "cosechas.png", sep="/")) 

barplot(fi, ylab="Kg", xlab="Categoria") 
dev.off() 

감사 :

내 코드입니다.

+2

[그룹화 된 막대 그래프에 대한 이전 답변] (http://stackoverflow.com/search?q= [r] + grouped + barplot)이 도움이되지 않았습니까? 특정 문제가있는 경우 [시도한 코드를 표시하고 작동하지 않는 이유를 설명하십시오] (http://stackoverflow.com/help/on-topic). 건배. – Henrik

+0

죄송합니다. 내 코드. 편집 됨 – ManuParra

+0

코드가 없습니다 ..... –

답변

0

"채우기"를 모두 흑백으로 변경하려면 "채우기"를 "그룹"으로 변경할 수 있습니다.

df <- read.csv('your/file.csv') 
library(ggplot2) 
ggplot(df, aes(x = ID, y = Kgrs, fill = Category)) + 
geom_bar(stat = 'identity', position='dodge') 
+0

각 ID에 대해 버라이어티를 입력하면 어떨까요? – ManuParra

+0

'interaction' 함수를 확인하십시오 ('? interaction'). 'x = interaction (ID, Variety)'를 원할 수도 있습니다. – colcarroll

관련 문제