Bom dia,
Alguém poderia me dar uma dica com esse problema?
Estou tentando agregar um conjunto de dados, calculando o gini (pacote
reldist), que recebe a variável principal e uma variável de ponderação
- gini(x,
weights=rep(1,length=length(x))).
Minha dificuldade é passar os dois argumentos para a função.
library(reldist)
ineq_df<-read.csv("amostra_input.csv")
aggregate(c(qtd,renda)~cod_setor,data=ineq_df,gini)
--
*__________________________________Marcelo Santana Camacho*UNIFESSPA
cod_setor,ck,dk,qtd,renda
110001505000001,1,Rendimento nominal ate 1/2 salario minimo,279,5482
110001505000001,2,Rendimento nominal de mais de 1/2 a 1 salario minimo,236,115302
110001505000001,3,Rendimento nominal de mais de 1 a 2 salarios minimos,177,143848
110001505000001,4,Rendimento nominal de mais de 2 a 3 salarios minimos,51,67461
110001505000001,5,Rendimento nominal de mais de 3 a 5 salarios minimos,48,97643
110001505000001,6,Rendimento nominal de mais de 5 a 10 salarios minimos,24,86395
110001505000001,7,Rendimento nominal de mais de 10 a 15 salarios minimos,1,7000
110001505000001,8,Rendimento nominal de mais de 15 a 20 salarios minimos,0,0
110001505000001,9,Rendimento nominal de mais de 20 salarios minimos,0,0
110001505000002,1,Rendimento nominal ate 1/2 salario minimo,315,7137
110001505000002,2,Rendimento nominal de mais de 1/2 a 1 salario minimo,163,77705
110001505000002,3,Rendimento nominal de mais de 1 a 2 salarios minimos,149,122633
110001505000002,4,Rendimento nominal de mais de 2 a 3 salarios minimos,47,62586
110001505000002,5,Rendimento nominal de mais de 3 a 5 salarios minimos,43,84850
110001505000002,6,Rendimento nominal de mais de 5 a 10 salarios minimos,13,38900
110001505000002,7,Rendimento nominal de mais de 10 a 15 salarios minimos,2,12780
110001505000002,8,Rendimento nominal de mais de 15 a 20 salarios minimos,0,0
110001505000002,9,Rendimento nominal de mais de 20 salarios minimos,0,0
110001505000003,1,Rendimento nominal ate 1/2 salario minimo,225,6323
110001505000003,2,Rendimento nominal de mais de 1/2 a 1 salario minimo,195,90917
110001505000003,3,Rendimento nominal de mais de 1 a 2 salarios minimos,107,86597
110001505000003,4,Rendimento nominal de mais de 2 a 3 salarios minimos,15,19160
110001505000003,5,Rendimento nominal de mais de 3 a 5 salarios minimos,9,17390
110001505000003,6,Rendimento nominal de mais de 5 a 10 salarios minimos,4,15000
110001505000003,7,Rendimento nominal de mais de 10 a 15 salarios minimos,1,6500
110001505000003,8,Rendimento nominal de mais de 15 a 20 salarios minimos,0,0
110001505000003,9,Rendimento nominal de mais de 20 salarios minimos,0,0
_______________________________________________
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.
