Alberto Negron Altons

## uninstallR
sudo R --no-save
pkgList <- installed.packages(priority='NA')
remove.packages(pkgList)
q()
sudo apt-get remove --purge r-cran* r-base*

## KnitPost
KnitPost <- function(input, base.url = "/") {
    require(knitr)
    opts_knit$set(base.url = base.url)
    fig.path <- paste0("figs/", sub(".Rmd$", "", basename(input)), "/")
    opts_chunk$set(fig.path = fig.path)
    opts_chunk$set(fig.cap = "center")
    render_jekyll()
    knit(input, envir = parent.frame())
}
KnitPost("2012-07-03-knitr-jekyll.Rmd")

## html5.sublime-snippet
<snippet>
    <content><![CDATA[
<!DOCTYPE html>
<html>
<head>
  <meta charset="utf-8" />
  <meta name="viewport" content="width=device-width, initial-scale=1.0">
  <title>${1:HTML5 basic skeleton}</title>
  <link href="//netdna.bootstrapcdn.com/twitter-bootstrap/2.2.2/css/bootstrap-combined.min.css" rel="stylesheet">


## langScore.R
# Program name: langScore.R
# Author: Alberto Negron
# date: 15/01/2013
# Description: Detect language in plain text

langScore <- function(post)
{
  # Params:
  # post: Plain text.
  require(tm)
	sudo R --no-save
	pkgList <- installed.packages(priority='NA')
	remove.packages(pkgList)
	q()
	sudo apt-get remove --purge r-cran* r-base*
	KnitPost <- function(input, base.url = "/") {
	require(knitr)
	opts_knit$set(base.url = base.url)
	fig.path <- paste0("figs/", sub(".Rmd$", "", basename(input)), "/")
	opts_chunk$set(fig.path = fig.path)
	opts_chunk$set(fig.cap = "center")
	render_jekyll()
	knit(input, envir = parent.frame())
	}
	KnitPost("2012-07-03-knitr-jekyll.Rmd")
	<snippet>
	<content><![CDATA[
	<!DOCTYPE html>
	<html>
	<head>
	<meta charset="utf-8" />
	<meta name="viewport" content="width=device-width, initial-scale=1.0">
	<title>${1:HTML5 basic skeleton}</title>
	<link href="//netdna.bootstrapcdn.com/twitter-bootstrap/2.2.2/css/bootstrap-combined.min.css" rel="stylesheet">
	# Program name: langScore.R
	# Author: Alberto Negron
	# date: 15/01/2013
	# Description: Detect language in plain text

	langScore <- function(post)
	{
	# Params:
	# post: Plain text.
	require(tm)