Displaying 1 result from an estimated 1 matches for "b1_3".
Did you mean:
b13
2011 Jul 20
3
Grouping columns
...ot;)
> b2<-subset(b,jahr=="2008")
> b3<-subset(b,jahr=="2009")
>
> #tapply f?r die Einzeljahre auf die jeweilige BranchenID
> b1_1<-tapply(b1$betriebs_id,b1$umweltkompartiment,length)
> b1_2<-tapply(b2$betriebs_id,b2$umweltkompartiment,length)
> b1_3<-tapply(b3$betriebs_id,b3$umweltkompartiment,length)
>
> #Verbinden der Ergebnisse
> b11<-rbind(b1_1,b1_2,b1_3)
> Gesamt<-apply(X=b11,MARGIN=1, sum)
> b13<-cbind(Gesamt,b11)
> b13
Gesamt Abwasser Boden Gef?hrliche Abf?lle Luft nicht gef?hrliche
Abf?lle Wasser
b1_...