# NOT RUN {
x <- runif(10)
attr(x, "some_attr") <- "First attribute"
attr(x, "other_attr") <- "Second attribute"
# strip all attributes
StripAttr(x)
# only some
StripAttr(x, "other_attr")
# }
Run the code above in your browser using DataCamp Workspace