A função melt para data frames:
x=data.frame(rbind(runif(5), rbind(runif(5))))
t(x)
meltdf <- function (data, id.vars, measure.vars, variable_name =
"variable",
na.rm =
!preserve.na, preserve.na = TRUE)
{
if (!missing(preserve.na))
message("Use of preserve.na is now deprecated, please
use na.rm instead")
var <- melt_check(data, id.vars, measure.vars)
if (length(var$measure) == 0) {
return(data[, var$id, drop = FALSE])
}
ids <- data[, var$id, drop = FALSE]
df <- do.call("rbind", lapply(var$measure, function(x) {
data.frame(ids, x, data[, x])
}))
names(df) <- c(names(ids), variable_name, "value")
df[[variable_name]] <- factor(df[[variable_name]],
unique(df[[variable_name]]))
if (na.rm) {
df <- df[!is.na(df$value), , drop = FALSE]
}
rownames(df) <- NULL
df
}
meltdf(x)
Sds
Sent: Wednesday, June 04, 2014 3:56 PM
Subject: Re: [R-br] várias linhas em um única
coluna
Obrigado.
Mas
como não tenho o pacote instalado, tenho um problema.
Sou func. público e o
proxy não deixa eu baixar o pacote.
Estou procurando uma solução para isso,
através do R, mas não estou conseguindo.
Conhece algo a respeito de liberação
do proxy no R?
Obrigado
Lucas
Lucas F. de Souza
Eng. Agrícola - CONAB
M.Sc.
Produção Vegetal - UENF
Doutor em Agrometeorologia - ESALQ/USP
tel: (19)
98160-7068
De:
"Rodrigo Muniz" <uenf.rodrigo@gmail.com>
Para:
r-br@listas.c3sl.ufpr.br
Enviadas: Quarta-feira, 4 de Junho de
2014 15:49:27
Assunto: Re: [R-br] várias linhas em um única
coluna
Exatamente Lucas a função melt é do pacote Reshape.
Att..
_______________________________________________
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.