--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/inkblotheatmap/inkblotheatmap.Rscript	Wed Jun 06 23:04:16 2012 -0400
@@ -0,0 +1,7 @@
+
+# note this script takes NO input or output because it generates random data
+foo = data.frame(a=runif(100),b=runif(100),c=runif(100),d=runif(100),e=runif(100),f=runif(100))
+bar = as.matrix(foo)
+pdf( "heattest.pdf" )
+heatmap(bar,main='Random Heatmap')
+dev.off()