Skip to content

Instantly share code, notes, and snippets.

@olooney
olooney / sim.R
Created July 9, 2018 18:59 — forked from mikeguggis/sim.R
Stack Exchange
library(MASS)
library(ggplot2)
results <- NULL
# Generate simulated data
for ( seed in 1:30 ) {
set.seed(seed+42)
mu = c(0,-1+seed/10)
Sigma = matrix(c(1.5,-.5,-.5,.7),2,2)