This function is a wrapper for
attr so that
setting can be accomplished by the pipe operator (
Row types are strings stored in the
the matrix on which row type is to be set
the type of item stored in rows
is.null(rowtype), the rowtype attribute is deleted
and subsequent calls to
rowtype will return
a with rowtype attribute set to
library(dplyr) commoditynames <- c("c1", "c2") industrynames <- c("i1", "i2") U <- matrix(1:4, ncol = 2, dimnames = list(commoditynames, industrynames)) U %>% setrowtype("Commodities") # This also works for lists setrowtype(list(U,U), rowtype = "Commodities") setrowtype(list(U,U), rowtype = list("Commodities", "Commodities")) DF <- data.frame(U = I(list())) DF[[1,"U"]] <- U DF[[2,"U"]] <- U setrowtype(DF$U, "Commodities") DF <- DF %>% mutate(newcol = setrowtype(U, "Commodities")) DF$newcol[] DF$newcol[]
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.