[R-br] Contar casos em cada variável e em todas as variáveis

Amiko Bh amikobh em gmail.com
Sexta Maio 27 21:11:47 BRT 2016


Ei Eder!

Segui sua ideia, porque foi a que mais entendi, mas retorna o seguinte erro:


> addmargins(tab)Error in addmargins(tab) : 'A' deve ser um array ou tabela

>

Aproveito para agradecer a ajuda de todos
.
Elerson


Em 27 de maio de 2016 17:33, Éder Comunello <comunello.eder em gmail.com>
escreveu:

> Outra ideia...
>
> df <- data.frame(
>      ATO_1=c("ART 121", "ART 33", "ART 121", "ART 155", "ART 28", "ART
> 121", "ART 15"),
>      ATO_2=c("ART 155", "ART 28", "ART 15", "ART 33", "ART 33", "ART 121",
> "ART 121"),
>      ATO_3=c("ART 180", "ART 10", "ART 155", "ART 121", "ART 33", "ART
> 121","ART 180"))
>
> tab <- sapply(df, table); tab
>
> addmargins(tab)
>
> #         ATO_1 ATO_2 ATO_3 Sum
> # ART 121     3     2     1   6
> # ART 15      1     1     2   4
> # ART 155     1     1     1   3
> # ART 28      1     1     2   4
> # ART 33      1     2     1   4
> # Sum         7     7     7  21
>
>> ================================================
> Éder Comunello
> Agronomist (UEM), MSc in Environ. Sciences (UEM)
> DSc in Agricultural Systems Engineering (USP/Esalq)
> Brazilian Agricultural Research Corporation (Embrapa)
> Dourados, MS, Brazil |<O>|
> ================================================
> GEO, -22.2752, -54.8182, 408m
> UTC-04:00 / DST: UTC-03:00
>
>
>
>
> Em 26 de maio de 2016 17:31, salah <salah3.1416 em gmail.com> escreveu:
>
>> Caro
>>
>> Segue sugestões
>>
>> library(reshape2)
>> ATO$id = 1:7 ##acrescenta uma coluna de controle para o melt
>> ##remodelando sua tabela
>> ATOMelt = melt(ATO, id="id", variable.name="ATO_n", value.name="ART")
>>
>> ##usando dplyr
>> library(dplyr)
>> ATOMelt %>% count(ART)
>>
>> ##usando o poderoso data.table
>> library(data.table)
>> setDT(ATOMelt) ##converte para data.table
>> ##contando
>> ATOMelt[, .N, by = .(ART)]
>>
>> saudações
>>
>>
>> Em 26/05/2016 16:28, Amiko Bh escreveu:
>>
>> Pessoal,
>>
>> Dado o banco:
>>
>> *ATO_1*
>>
>> *ATO_2*
>>
>> *ATO_3*
>>
>> ART 121
>>
>> ART 155
>>
>> ART 180
>>
>> ART 33
>>
>> ART 28
>>
>> ART 10
>>
>> ART 121
>>
>> ART 15
>>
>> ART 155
>>
>> ART 155
>>
>> ART 33
>>
>> ART 121
>>
>> ART 28
>>
>> ART 33
>>
>> ART 33
>>
>> ART 121
>>
>> ART 121
>>
>> ART 121
>>
>> ART 15
>>
>> ART 121
>>
>> ART 180
>>
>>
>> a) Preciso contar cada elemento em cada variável, para que vislumbre o
>> seguinte resultado:
>>
>> *ATO_1*
>>
>> ART 121 = 3
>> ART 33 = 1
>> ART 155= 1
>> ART 28= 1
>> ART 15 = 1
>>
>> e assim com *ATO_2 e **ATO_3.*
>>
>> b) preciso saber o total de cada elemento em todos as colunas, assim:
>>
>> ART 121 = 7
>> ART 33 = 4
>> ART 155= 3
>> ART 28= 2
>> ART 15 = 2
>> ART 180=2
>> ART 10=1
>>
>> Muito obrigado.
>>
>>
>>
>> _______________________________________________
>> R-br mailing listR-br em listas.c3sl.ufpr.brhttps://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.
>>
>>
>>
>> _______________________________________________
>> 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.
>>
>
>
> _______________________________________________
> 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/20160527/ac9528fd/attachment.html>


Mais detalhes sobre a lista de discussão R-br