### =========================================================================
### Some low-level (non exported) utility functions.
### -------------------------------------------------------------------------
hasHead <- function(x, h) {
identical(head(x, length(h)), h)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.