Skip to content

Instantly share code, notes, and snippets.

Embed
What would you like to do?
f_transformar <- function( p_data, p_summ )
{
# Melt Data
mltd_data <- melt( data = p_data
, variable.name = "Atributo"
, value.name = "Value"
)
# Melt Summary
mltd_summ <- melt( data = p_summ
, id.vars = "Atributo"
, variable.name = "Metrica"
, value.name = "Value"
)
list( mltd_data = mltd_data
, mltd_summ = mltd_summ
)
}
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment