exemplo reproduzivel (faltante no post original) set.seed(1) x <- data.frame(grp=1:10, x2000=rnorm(10), x2001=rnorm(10)) ## solucao library(reshape) reshape(x, idvar='grp', varying=2:3, direction='long', sep='') b 2011/5/24 Roberto Pinho <robertodepinho@gmail.com>:

Consegui desta forma, se tiverem alguma sugestão mais direta, é sempre bem vinda:

rownames(x) = x$SIGLA y = x[,2:11] z = as.matrix(y) w = as.table(z) q = as.data.frame(w) colnames(q) = c("SIGLA","Ano","Freq")

2011/5/24 Roberto Pinho <robertodepinho@gmail.com>

...

Caros,

Uma dúvida básica:

Eu tenho um data-frame no formato:

$ SIGLA: chr $ X2000: num $ X2001: num $ X2002: num $ X2003: num $ X2004: num $ X2005: num $ X2006: num $ X2007: num $ X2008: num $ X2009: num

Eu quero colocar os dados no formato :

$ SIGLA: chr $ Ano: num ou chr $ Valor: num

Desde já obrigado.

-- Roberto Pinho robertodepinho@gmail.com msn: robertopinho@yahoo.com.br Skype: roberto.pinho http://www.ascoisas.com

-- Roberto Pinho robertodepinho@gmail.com msn: robertopinho@yahoo.com.br Skype: roberto.pinho http://www.ascoisas.com

_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br

-- Successful people ask better questions, and as a result, they get better answers. (Tony Robbins)

obrigado. 2011/5/24 Walmes Zeviani <walmeszeviani@gmail.com>

Roberto,

A reshape apresentada pelo Benilton possui funções bem úteis para restruturação de dados. Com a reshape::melt() também é possível operar, veja

require(reshape)

x <- data.frame(grp=1:10, x2000=rnorm(10), x2001=rnorm(10)) x <- melt(x, id="grp") str(x) x$variable <- sapply(strsplit(as.character(x$variable), "x"), function(x) as.numeric(x[2]))

Envie dúvidas com código mínimo reproduzível (CMR).

À disposição. Walmes.

========================================================================== Walmes Marques Zeviani LEG (Laboratório de Estatística e Geoinformação, 25.450418 S, 49.231759 W) Departamento de Estatística - Universidade Federal do Paraná fone: (+55) 41 3361 3573 VoIP: (3361 3600) 1053 1173 e-mail: walmes@ufpr.br twitter: @walmeszeviani homepage: http://www.leg.ufpr.br/~walmes linux user number: 531218 ==========================================================================

_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br

-- Roberto Pinho robertodepinho@gmail.com msn: robertopinho@yahoo.com.br Skype: roberto.pinho http://www.ascoisas.com