natural1()[2]
natural1()[c(1, 3, 5)]
integers(1, 5)[-1] # full series with first value dropped
# Subsetting from the other side of a sink
x <- 1 / natural1()
x[1:3] # No such thing as a "first" value; returns NA.
y <- dsct_union(x, -1)
y[1:3] # "-1" is the 1st value, but no such thing as 2nd or 3rd value.
Run the code above in your browser using DataLab