[R-br] (sem assunto)

[Fátima Lima Paula]

Perfeito, Éder.
Obrigada.


Em 10 de março de 2014 17:06, Éder Comunello <comunello.eder em gmail.com>escreveu:

> 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.
>>
>
>
> _______________________________________________
> 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.
>



-- 
"Minha felicidade depende da qualidade dos meus pensamentos"
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20140310/30b35628/attachment.html>