topolclause <- function(x) {
switch(x,
area = "IsArea([ID])",
line = "IsLine([ID])",
point = "IsPoint([ID])")
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.