Boa tarde!
O uso do sapply() no script anterior acabou "misturando" os valores. Então
usei a abordagem sugerida por "salah" pra desmontar o data.frame e aplicar
o table().
###
df <- data.frame(
ATO_1=c("ART 121", "ART 33", "ART 121", "ART 155", "ART 28", "ART
121", "ART 15"),
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
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
table(df$ATO_1)
daniel
> On May 26, 2016, at 8:28 PM, Amiko Bh wrote:
>
> 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
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