[R-br] (sem assunto)

[Éder Comunello]

Fátima, boa tarde!

Nessa solução uso os rótulos 'sim' e 'nao' como nome das novas colunas,
eliminando a necessidade de mais duas colunas com essa informação.

### <code r>
cap=c("A1","A3","B2","B5","C6","C8","D4","F5","G8","H1","K9","A1","A3","B2","B5","C6","C8","D4","F5","G8","H1","K9")
Var1=c("nao","nao","nao","nao","nao","nao","nao","nao","nao","nao","nao",
 "sim","sim","sim","sim","sim","sim","sim","sim","sim","sim","sim")
Var2=c(2,5,7,4,1,2,4,8,9,6,7,4,5,3,2,4,5,8,7,0,1,1)
df=cbind(cap,Var1,Var2)
df=as.data.frame(df)
df

require(reshape)
cast(df, cap~Var1, value='Var2')
### </code>

Éder Comunello <c <comunello.eder em gmail.com>omunello.eder em gmail.com>
Dourados, MS - [22 16.5'S, 54 49'W]


Em 10 de março de 2014 15:22, Fátima Lima Paula <fatima.lima.paula em gmail.com
> escreveu:

>
> Prezados, eu tenho um data frame assim
>
>
> cap=c("A1","A3","B2","B5","C6","C8","D4","F5","G8","H1","K9","A1","A3","B2","B5","C6","C8","D4","F5","G8","H1","K9")
> Var1=c("nao","nao","nao","nao","nao","nao","nao","nao","nao","nao","nao",
>  "sim","sim","sim","sim","sim","sim","sim","sim","sim","sim","sim")
> Var2=c(2,5,7,4,1,2,4,8,9,6,7,4,5,3,2,4,5,8,7,0,1,1)
> df=cbind(cap,Var1,Var2)
> df=as.data.frame(df)
> df
>
>    cap Var1 Var2
> 1   A1  nao    2
> 2   A3  nao    5
> 3   B2  nao    7
> 4   B5  nao    4
> 5   C6  nao    1
> 6   C8  nao    2
> 7   D4  nao    4
> 8   F5  nao    8
> 9   G8  nao    9
> 10  H1  nao    6
> 11  K9  nao    7
> 12  A1  sim    4
> 13  A3  sim    5
> 14  B2  sim    3
> 15  B5  sim    2
> 16  C6  sim    4
> 17  C8  sim    5
> 18  D4  sim    8
> 19  F5  sim    7
> 20  G8  sim    0
> 21  H1  sim    1
> 22  K9  sim    1
>
>
> E gostaria que ficasse assim:
>
> cap=c("A1","A3","B2","B5","C6","C8","D4","F5","G8","H1","K9")
> Var1=c("nao","nao","nao","nao","nao","nao","nao","nao","nao","nao","nao")
> Var2=c(2,5,7,4,1,2,4,8,9,6,7)
> Var3=c("sim","sim","sim","sim","sim","sim","sim","sim","sim","sim","sim")
> Var4=c(4,5,3,2,4,5,8,7,0,1,1)
> df=cbind(cap,Var1,Var2,Var3,Var4)
> df=as.data.frame(df)
> df
>    cap Var1 Var2 Var3 Var4
> 1   A1  nao    2  sim    4
> 2   A3  nao    5  sim    5
> 3   B2  nao    7  sim    3
> 4   B5  nao    4  sim    2
> 5   C6  nao    1  sim    4
> 6   C8  nao    2  sim    5
> 7   D4  nao    4  sim    8
> 8   F5  nao    8  sim    7
> 9   G8  nao    9  sim    0
> 10  H1  nao    6  sim    1
> 11  K9  nao    7  sim    1
>
> Alguém poderia me ajudar?
> Obrigada
> Fátima
>
> --
> "Minha felicidade depende da qualidade dos meus pensamentos"
>
> _______________________________________________
> 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/20140310/73a053db/attachment.html>