[R-br] Agrupar colunas

[Éder Comunello]

Caro José, boa tarde

Comentários no código...

### <code r>
dat <- read.table(text="
V1;V2;V3
7;PARAUNA;FAZENDAS PUBLICAS E 2.CIVEL
7;CACHOEIRA DOURADA;FAMILIA, SUC. INF.JUV. E CIVEL
8;ITUMBIARA;2A CIVEL E FAZ.PUB.EST
108;SAO MIGUEL DO ARAGUAIA;ESCRIVANIA DO CRIME
7;SAO LUIS DE MONTES BELOS;FAMILIA, SUC. INF.JUV. E 1.CIVEL
8;MINEIROS;ESC. FAZ.PUB.REG.PUB.AMB.E 2.CIVEL
7;NEROPOLIS;FAMILIA, SUC. INF.JUV. E 1.CIVEL
7;ITAJA;FAMILIA, SUC. INF.JUV. E CIVEL
8;ANICUNS;FAZENDAS PUBLICAS E 2.CIVEL
8;CALDAS NOVAS;FAZENDAS PUB.REG.PUB.AMB. E 2.CIVEL
8;MINEIROS;ESC. FAZ.PUB.REG.PUB.AMB.E 2.CIVEL
8;MINEIROS;ESC. FAZ.PUB.REG.PUB.AMB.E 2.CIVEL
108;ALEXANIA;ESCRIVANIA DO CRIME
8;CALDAS NOVAS;FAZENDAS PUB.REG.PUB.AMB. E 2.CIVEL
8;ANICUNS;FAZENDAS PUBLICAS E 2.CIVEL
7;RIO VERDE;1A.VARA CIVEL
7;NOVO GAMA;FAZENDAS PUB.REG.PUB.AMB. E 2.CIVEL
16;NOVO GAMA;FAZENDAS PUB.REG.PUB.AMB. E 2.CIVEL
8;MINEIROS;ESC. FAZ.PUB.REG.PUB.AMB.E 2.CIVEL
7;NEROPOLIS;FAMILIA, SUC. INF.JUV. E 1.CIVEL", head=T, sep=";",
colClasses="factor")

### A forma a seguir é bem próxima do que você indicou...
with(dat, table(paste(V2, V3, sep=" - "), V1))

### Uma forma melhor seria...
ftable(with(dat, table(V2,V3,V1)))
### No entanto, precisaria descobrir como suprimir as linhas com valores
zerados...

### </code>

Espero que lhe ajude,

Éder Comunello <c <comunello.eder em gmail.com>omunello.eder em gmail.com>
Dourados, MS - [22 16.5'S, 54 49'W]


Em 14 de maio de 2014 10:42, jose gomes de souza filho Gomes <
zegomesufg em gmail.com> escreveu:

> Caros amigos
>
> Tem o banco de dados e estou tentando agrupar as colunas V2 e V3 e também
> quantificar os valores de V1.
>
> http://www.datafilehost.com/d/e9883398
>
>   V1  V2 V3  7 PARAUNA FAZENDAS PUBLICAS E 2.CIVEL  7 CACHOEIRA DOURADA FAMILIA,
> SUC. INF.JUV. E CIVEL  8 ITUMBIARA 2A CIVEL E FAZ.PUB.EST  108 SAO MIGUEL
> DO ARAGUAIA ESCRIVANIA DO CRIME  7 SAO LUIS DE MONTES BELOS FAMILIA, SUC.
> INF.JUV. E 1.CIVEL  8 MINEIROS ESC. FAZ.PUB.REG.PUB.AMB.E 2.CIVEL  7
> NEROPOLIS FAMILIA, SUC. INF.JUV. E 1.CIVEL  7 ITAJA FAMILIA, SUC.
> INF.JUV. E CIVEL  8 ANICUNS FAZENDAS PUBLICAS E 2.CIVEL  8 CALDAS NOVAS FAZENDAS
> PUB.REG.PUB.AMB. E 2.CIVEL  8 MINEIROS ESC. FAZ.PUB.REG.PUB.AMB.E 2.CIVEL
> 8 MINEIROS ESC. FAZ.PUB.REG.PUB.AMB.E 2.CIVEL  108 ALEXANIA ESCRIVANIA DO
> CRIME  8 CALDAS NOVAS FAZENDAS PUB.REG.PUB.AMB. E 2.CIVEL  8 ANICUNS FAZENDAS
> PUBLICAS E 2.CIVEL  7 RIO VERDE 1A.VARA CIVEL  7 NOVO GAMA FAZENDAS
> PUB.REG.PUB.AMB. E 2.CIVEL  16 NOVO GAMA FAZENDAS PUB.REG.PUB.AMB. E
> 2.CIVEL  8 MINEIROS ESC. FAZ.PUB.REG.PUB.AMB.E 2.CIVEL  7 NEROPOLIS FAMILIA,
> SUC. INF.JUV. E 1.CIVEL
>
>
>
>
>
>    Gostaria que ele ficasse:
>
>
>
>
>
> 7 8 16 108
>  *ALEXANIA*
>
>
> 1
>  ESCRIVANIA DO CRIME
>
>
> 1
>  *ANICUNS*
> 2
>
>
>  FAZENDAS PUBLICAS E 2.CIVEL
> 2
>
>
>  *CACHOEIRA DOURADA* 1
>
>
>
>  FAMILIA, SUC. INF.JUV. E CIVEL 1
>
>
>
>  *CALDAS NOVAS*
> 2
>
>
>  FAZENDAS PUB.REG.PUB.AMB. E 2.CIVEL
> 2
>
>
>  *ITAJA* 1
>
>
>
>  FAMILIA, SUC. INF.JUV. E CIVEL 1
>
>
>
>  *ITUMBIARA*
> 1
>
>
>  2A CIVEL E FAZ.PUB.EST
> 1
>
>
>  *MINEIROS*
> 4
>
>
>  ESC. FAZ.PUB.REG.PUB.AMB.E 2.CIVEL
> 4
>
>
>  *NEROPOLIS* 2
>
>
>
>  FAMILIA, SUC. INF.JUV. E 1.CIVEL 2
>
>
>
>  *NOVO GAMA* 1
> 1
>
>  FAZENDAS PUB.REG.PUB.AMB. E 2.CIVEL 1
> 1
>
>  *PARAUNA* 1
>
>
>
>  FAZENDAS PUBLICAS E 2.CIVEL 1
>
>
>
>  *RIO VERDE* 1
>
>
>
>  1A.VARA CIVEL 1
>
>
>
>  *SAO LUIS DE MONTES BELOS* 1
>
>
>
>  FAMILIA, SUC. INF.JUV. E 1.CIVEL 1
>
>
>
>  *SAO MIGUEL DO ARAGUAIA*
>
>
> 1
>  ESCRIVANIA DO CRIME
>
>
> 1
>  Total geral 8 9 1 2
>
>
>
>
>
>
>
>
>
>
>
>
>  Grato,
>
>
>
>
>  Gomes
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
> _______________________________________________
> R-br mailing list
> R-br em listas.c3sl.ufpr.br
> https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
> Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça
> código mínimo reproduzível.
>
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20140514/3d64323c/attachment.html>