x <- list(
TRUE,
1L,
runif(100),
"3"
)
sxp(x)
# Expand "character" to see underlying CHARSXP entries in the global
# string pool
x <- c("banana", "banana", "apple", "banana")
sxp(x)
sxp(x, expand = "character")
# Expand altrep to see underlying data
x <- 1:10
sxp(x)
sxp(x, expand = "altrep")
# Expand environments to see promise expressions without forcing
e <- new.env(parent = emptyenv())
delayedAssign("x", 1 + 1, assign.env = e)
sxp(e)
sxp(e, expand = "environment")
Run the code above in your browser using DataLab