| ## Animate optim ordinary least squares | |
| rm(list=ls()) | |
| gc() | |
| library(ggplot2) | |
| library(tidyverse) | |
| library(foreign) | |
| library(gganimate) | |
| library(transformr) | |
| library(data.table) |
| library(ggraph) | |
| library(tidygraph) | |
| library(gganimate) | |
| # Data from http://konect.uni-koblenz.de/networks/sociopatterns-infectious | |
| infect <- read.table('out.sociopatterns-infectious', skip = 2, sep = ' ', stringsAsFactors = FALSE) | |
| infect$V3 <- NULL | |
| names(infect) <- c('from', 'to', 'time') | |
| infect$time <- as.POSIXct(infect$time, origin = Sys.time() - as.numeric(Sys.time())) |
| alias accio=wget | |
| alias avadaKedavra='rm -f' | |
| alias imperio=sudo | |
| alias priorIncantato='echo `history |tail -n2 |head -n1` | sed "s/[0-9]* //"' | |
| alias stupefy='sleep 5' | |
| alias wingardiumLeviosa=mv | |
| alias sonorus='set -v' | |
| alias quietus='set +v' |
At the top of the file there should be a short introduction and/ or overview that explains what the project is. This description should match descriptions added for package managers (Gemspec, package.json, etc.)
Show what the library does as concisely as possible, developers should be able to figure out how your project solves their problem by looking at the code example. Make sure the API you are showing off is obvious, and that your code is short and concise.
