Caro Roney, bom dia! Segue uma primeira ideia. Verifique se atende... ### <code> # setwd(choose.dir()) # load('dados.RData') head(data1); head(data2) grp <- sort(unique(c(data1$grupo, data2$grupo))) ### grupos {RES <- LAB <- list() for (i in grp) { for (j in grp) { RES <- append(RES,list( subset(data2$name, data2$grupo==i) %in% subset(data1$name, data1$grupo==j))) LAB <- append(LAB, paste(i,j, sep='-')) }}} data.frame(label=sapply(LAB, "["), res=sapply(RES, sum), total=sapply(RES, length)) ### </code> Éder Comunello <c <comunello.eder@gmail.com>omunello.eder@gmail.com> Dourados, MS - [22 16.5'S, 54 49'W] Em 10 de maio de 2014 11:40, Roney Fraga Souza <roneyfraga@gmail.com>escreveu:
Caros,
Estou tentando resolver um problema que nem sei por onde começar.
Tenho dois data.frame()
data1 name grupo 1 Banker, 1986, V32, P1613 1 2 Banker, 1986, V32, P30 1 3 Macmillan, 1986, V60, P41 1 4 Charnes, 1985, V30, P91 1 5 Sherman, 1985, V9, P297 3 6 Nunamaker, 1985, V6, P50 2 7 Sherman, 1984, V4, P35 3 8 Banker, 1984, V17, P35 1 9 Banker, 1984, V30, P1078 1 10 Nunamaker, 1983, V18, P183 2 11 Parks, 1983, V12, P337 2 12 Charnes, 1981, V27, P668 3 13 Bessent, 1980, V16, P57 2 14 Charnes, 1978, V2, P429 1
data2 name grupo 1 Sengupta, 1987, V18, P2279 2 2 Sengupta, 1987, V8, P93 2 3 Thanassoulis, 1987, V38, P397 1 4 Sengupta, 1987, V14, P117 2 5 Banker, 1986, V32, P1613 1 6 Banker, 1986, V32, P30 1 7 Macmillan, 1986, V60, P41 1 8 Charnes, 1985, V30, P91 1 9 Sherman, 1985, V9, P297 3 10 Nunamaker, 1985, V6, P50 2 11 Sherman, 1984, V4, P35 3 12 Banker, 1984, V17, P35 1 13 Banker, 1984, V30, P1078 1 14 Nunamaker, 1983, V18, P183 2 15 Parks, 1983, V12, P337 3 16 Charnes, 1981, V27, P668 3 17 Bessent, 1980, V16, P57 2 18 Charnes, 1978, V2, P429 1
e desejo comparar quantos elementos de cada grupo de data2 fazem parte de cada grupo de data1. Tentando ser mais claro:
#quantos elementos de subset(data2, grupo==1) # fazem parte de subset(data1, grupo==1) subset(data1, grupo==2) subset(data1, grupo==3)
#depois o raciocínio se repete para o grupo 2 de data2 #quantos elementos de subset(data2, grupo==2) # fazem parte de subset(data1, grupo==1) subset(data1, grupo==2) subset(data1, grupo==3)
Por fim, desejo acompanhar quanto o grupo 1 do objeto data1 contribuiu para constituir o grupo 1 do objeto data2, e assim por diante.
Para baixar esses dados, segue link: http://www.datafilehost.com/d/4428e6f8
Atenciosamente Roney _______________________________________________ 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.