## a data.frame
data(iris)
cat(Complete("item <- iris$"), "")
cat(Complete("item <- iris[[", TRUE), "")
## An S4 object
setClass("track", representation(x = "numeric", y = "numeric"))
t1 <- new("track", x=1:20, y=(1:20)^2)
cat(Complete("item2 <- t1@", TRUE), "")
## A partial identifier
cat(Complete("item3 <- va", TRUE), "")
## Otherwise, a list with the content of .GlobalEnv
cat(Complete("item4 <- "), "")
Run the code above in your browser using DataLab