Symlinks are your pal (on epigraph and in Rstudio)

Rstudio is stupid (well, sort of), and doesn't like to go below $HOME. However, it can be tricked into doing the right thing anyways. Behold:

> setwd(Sys.getenv("HOME"))
> if (file.exists("mycrap")) unlink("mycrap")
> file.symlink("/storage/hpcc/uec-gs1/laird/shared/research/ttriche", "mycrap")
## [1] TRUE
> setwd("~/mycrap")
> list.files()
##  [1] "bioc-devel"       "compress.sh"      "cufflinks.BAMs"  
##  [4] "cufflinks.GTFs"   "FASTQ"            "hg19.BAMs"       
##  [7] "LAML"             "lnsf"             "miRNA"           
## [10] "subjunc.splicing"

This, of course, is Fvcking Rad.

Also, here's a tableplot.

library(tabplot)
require(ggplot2)
data(diamonds)
tableplot(diamonds)

plot of chunk tabplotExample

You know you want one.