In base R, objects lose attributes in many common operations such as: subset, [, [[<-, append, etc. or when inserted into or extracted from recursive (list-like) objects such as data frames or data tables. Marking objects ‘sticky’, make attributes resilient to these operations. In essence, sticky makes object behave more like objects in other languages whose attributes are preserved. There isn’t much to the package. sticky
/unstick
and sticky_all
are the only interfaces to the package.
sticky
: make an objects attributes persist across data operations
unstick
: remove the stickiness of an object; attributes will no longer persist during common data operations
sticky_all
: make all elements of a recursive object (e.g list, data frames, etc.) sticky.
Here is an simple example of a sticky attribute in action. Under base R, attributes do not survive a slice/subset/[
operation:
x <- 1:5
attr(x, 'foo') <- 'bar'
attr(x[1:3],'foo') # NULL -- attribute removed
To ensure that they get preserved, simply declare the object as sticky
:
x <- sticky(x)
attr(x[1:3],'foo') # 'bar' -- attribute preserved
sticky()
works for vectors inside table-like objects ( i.e. data.frames and data.tables), preserving their attributes during table operations.
df <- data.frame(
sticky = sticky( structure(1:5, foo="bar") ),
nonstick = structure( letters[1:5], foo="baz" )
)
attr( df[2:3,"nonstick"], 'foo' ) # NULL
attr( df[2:3,"sticky"], 'foo' ) # bar
If all elements of a list or a data.frame need to behave in a sticky manner, use sticky_all
.
df <- sticky_all(df)
attr( df[2:3,"nonstick"], 'foo' ) # Now 'baz'
install.packages('sticky')
library(devtools)
lnstall_github('decisionpatterns/sticky')
There are a number of things that can be done with sticky
:
The issue of attribute resilience has been often asked and debated. Here are a few of the most prevalent discussions.