s <- cpp_set(6:9)
s
# 6 7 8 9
insert(s, 4:7)
s
# 4 5 6 7 8 9
print(s, from = 6)
# 6 7 8 9
s <- cpp_set(c("world", "hello", "there"))
s
# "hello" "there" "world"
erase(s, "there")
s
# "hello" "world"
Run the code above in your browser using DataLab