## check that all S3 methods in base are registered.
## See the end of src/library/base/R/zzz.R ...
(function() {
old <- Sys.setlocale("LC_COLLATE", "C")
on.exit(Sys.setlocale("LC_COLLATE", old))
stopifnot(identical(base:::.S3_methods_table,
tools:::.make_S3_methods_table_for_base()))
})()
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.