hgd()
plot.new()
text(.5, .5, "#1")
plot.new()
text(.5, .5, "#2")
plot.new()
text(.5, .5, "#3")
hgd_id() # The last one
hgd_id(2) # The second one
hgd_id(1, limit = Inf) # The first one and all the followings
dev.off()
Run the code above in your browser using DataLab