Skip to content

Instantly share code, notes, and snippets.

Kirill Sevastyanenko kirillseva

Block or report user

Report or block kirillseva

Hide content and notifications from this user.

Learn more about blocking users

Contact Support about this user’s behavior.

Learn more about reporting abuse

Report abuse
View GitHub Profile
@kirillseva
kirillseva / simulation.R
Last active Jul 12, 2017
People in a room giving dollars to random others
View simulation.R
library(animation)
library(gganimate)
library(ggplot2)
library(ggthemr)
library(magrittr)
library(tweenr)
library(reshape2)
## Configurable parameters
NUM_PEOPLE = 45
@kirillseva
kirillseva / rownames.R
Created Jun 13, 2016
I hate rownames
View rownames.R
R-STABLE> a <- data.frame(a=1:5, b=head(letters, 5))
R-STABLE> a
a b
1 1 a
2 2 b
3 3 c
4 4 d
5 5 e
R-STABLE> b <- a[c(1,3,5),]
R-STABLE> b
You can’t perform that action at this time.