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 <comunello.eder@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@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@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@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.