Skip to content

Instantly share code, notes, and snippets.

View emhart's full-sized avatar

Edmund Hart emhart

View GitHub Profile
@emhart
emhart / out_plot.R
Created February 15, 2014 21:57
Outlier plot
library(ggplot)
library(mvtnorm)
library(reshape2)
library(plyr)
#Generate data with some outliers
dat <- rbind(rmvnorm(100,mean=c(1,4,10,100),sigma=diag(c(1,4,3,10),4,4)),rmvnorm(10,mean=c(1,4,10,100),sigma=diag(c(100,100,100,100),4,4)))
dat <- data.frame(dat)
dat$rowID <- 1:dim(dat)[1]
colnames(dat) <- c("Mean_1","Mean_4","Mean_10","Mean_100","RowID")
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
@emhart
emhart / abiesmagmap.geojson
Created February 24, 2014 22:21
Abies magnifica polygons
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
@emhart
emhart / abiesmagmap.geojson
Created February 24, 2014 22:31
Abies magnifica polygons
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.