powered by
new('container', x = [list], content = [character], locked = [logical])
content(container)
content
locked(container)
locked
show(container)
length(container)
[[(index)
[[(index, value)
[(index)
x1 <- new("container", x=vector("list", length=3), content="lm") lm1 <- lm(rnorm(10)~runif(10)) x1[[1]] <- lm1
Run the code above in your browser using DataLab