library(argoFloats)
subset <- subset(getIndex(), deep=TRUE)
sub2 <- subset(subset, circle=list(longitude=105, latitude=-67, radius=800))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.