Vamos supor um exemplo de dados:
#dados de exemplo
dados<-data.frame(col1=round(runif(20,1,4)),col2=sample(c("A","B"),20,replace=T),col3=sample(c("A","B"),20,replace=T))
dados
#primeiro com o comando paste, vamos juntar a coluna 2 com a 3, criando os AA AB e BB
dados$col4<-factor(paste(dados$col2,dados$col3,sep=""))
#Depois como os walmes nos ensinou aqui na lista, a gente usa o match()
#para recodificar nos valores que queremos, no caso como vc falou
levels(dados$col4)
recod<-c(0,1,1,2)
dados$col5<-recod[match(dados$col4,levels(dados$col4))]
dados
#agora que vc te todos os ingredientes, é so usar o comando table() para fazer essa tabela
#eu fiz um exemplo de tabela com a coluna 5 e a coluna 5, mas pelo que vi vc quer a coluna
#5 e os nomes das linhas, rownames(sua planilha), entao use os nomes da linha na tabela
table(dados$col5,dados$col4)
Espero que ajude.
Abraços
Em 24 de outubro de 2012 09:16,
fabrizzioconde@gmail.com <fabrizzioconde@gmail.com> escreveu:
Bom dia,
Existe algum script que faça o seguinte:
1) Cria uma quinta coluna na matriz abaixo baseada na terceira e na quarta coluna DA seguinte forma: AA = 0, BB = 1 e AB = 2.
AA1 |
1 |
A |
B |
AA2 |
1 |
A |
A |
AA3 |
1 |
B |
B |
AA4 |
1 |
B |
B |
AA1 |
2 |
A |
A |
AA2 |
2 |
A |
B |
AA3 |
2 |
A |
B |
AA4 |
2 |
A |
A |
AA1 |
3 |
B |
B |
AA2 |
3 |
B |
B |
AA3 |
3 |
A |
A |
AA4 |
3 |
A |
A |
AA1 |
4 |
B |
B |
AA2 |
4 |
A |
B |
AA3 |
4 |
A |
A |
AA4 |
4 |
A |
B |
Assim, a matriz se transformaria em:
AA1 |
1 |
A |
B |
2 |
AA2 |
1 |
A |
A |
0 |
AA3 |
1 |
B |
B |
1 |
AA4 |
1 |
B |
B |
1 |
AA1 |
2 |
A |
A |
0 |
AA2 |
2 |
A |
B |
2 |
AA3 |
2 |
A |
B |
2 |
AA4 |
2 |
A |
A |
0 |
AA1 |
3 |
B |
B |
1 |
AA2 |
3 |
B |
B |
1 |
AA3 |
3 |
A |
A |
0 |
AA4 |
3 |
A |
A |
0 |
AA1 |
4 |
B |
B |
1 |
AA2 |
4 |
A |
B |
2 |
AA3 |
4 |
A |
A |
1 |
AA4 |
4 |
A |
B |
2 |
2) Após esse passo, tenho que eliminar as colunas 3 e 4 DA matriz acima (talvez em um novo dataframe) e redimensioná-la para o seguinte formato:
|
AA1 |
AA2 |
AA3 |
AA4 |
1 |
2 |
0 |
1 |
1 |
2 |
0 |
2 |
2 |
0 |
3 |
1 |
1 |
0 |
0 |
4 |
1 |
2 |
1 |
2 |
Ao final, preciso que cada coluna DA matriz acima seja encarada pelo R como uma variável (AA1, AA2, AA3, AA4), pois irei aplicar o pacote de regressão logística penalizada stepPlr e considerar essas variáveis preditoras.
Muito obrigado.
Fabrízzio |
|

_______________________________________________
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.
--
Grato
Augusto C. A. Ribas