
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

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@gmail.com>omunello.eder@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@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@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.

Esqueci de incluir o output da primeira solução no email anterior, Segue...
with(dat, table(paste(V2, V3, sep=" - "), V1)) V1 108 16 7 8 ALEXANIA - ESCRIVANIA DO CRIME 1 0 0 0 ANICUNS - FAZENDAS PUBLICAS E 2.CIVEL 0 0 0 2 CACHOEIRA DOURADA - FAMILIA, SUC. INF.JUV. E CIVEL 0 0 1 0 CALDAS NOVAS - FAZENDAS PUB.REG.PUB.AMB. E 2.CIVEL 0 0 0 2 ITAJA - FAMILIA, SUC. INF.JUV. E CIVEL 0 0 1 0 ITUMBIARA - 2A CIVEL E FAZ.PUB.EST 0 0 0 1 MINEIROS - ESC. FAZ.PUB.REG.PUB.AMB.E 2.CIVEL 0 0 0 4 NEROPOLIS - FAMILIA, SUC. INF.JUV. E 1.CIVEL 0 0 2 0 NOVO GAMA - FAZENDAS PUB.REG.PUB.AMB. E 2.CIVEL 0 1 1 0 PARAUNA - FAZENDAS PUBLICAS E 2.CIVEL 0 0 1 0 RIO VERDE - 1A.VARA CIVEL 0 0 1 0 SAO LUIS DE MONTES BELOS - FAMILIA, SUC. INF.JUV. E 1.CIVEL 0 0 1 0 SAO MIGUEL DO ARAGUAIA - ESCRIVANIA DO CRIME 1 0 0 0
Éder Comunello <c <comunello.eder@gmail.com>omunello.eder@gmail.com> Dourados, MS - [22 16.5'S, 54 49'W]
participantes (2)
-
jose gomes de souza filho Gomes
-
Éder Comunello