setcoltype {matsbyname}

Sets column type for a matrix or a list of matrices

Description

This function is a wrapper for attr() so that setting can be accomplished by the pipe operator (⁠%>%⁠). Column types are strings stored in the coltype attribute.

Usage

setcoltype(a, coltype)

Arguments

a

The matrix on which column type is to be set.

coltype

The type of item stored in columns.

Details

If is.null(coltype), the coltype attribute is deleted and subsequent calls to coltype will return NULL.

Value

a with coltype attribute set.

Examples

library(dplyr)
commoditynames <- c("c1", "c2")
industrynames <- c("i1", "i2")
U <- matrix(1:4, ncol = 2, dimnames = list(commoditynames, industrynames))
U %>% setcoltype("Industries")
# This also works for lists
setcoltype(list(U,U), coltype = "Industries")
setcoltype(list(U,U), coltype = list("Industries", "Industries"))
DF <- data.frame(U = I(list()))
DF[[1,"U"]] <- U
DF[[2,"U"]] <- U
setcoltype(DF$U, "Industries")
DF <- DF %>% mutate(newcol = setcoltype(U, "Industries"))
DF$newcol[[1]]
DF$newcol[[2]]