strsplit2 <-function(x, split=" ", n=1, ...) { y <- strsplit(as.character( x), split=split, ...) sapply(y, "[", n=n) }
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.