Bash script which will:
- Iterate all commits made within a Git repository.
#!/usr/bin/python | |
# -*- coding: utf-8 -*- | |
# Python script to find the largest files in a git repository. | |
# The general method is based on the script in this blog post: | |
# http://stubbisms.wordpress.com/2009/07/10/git-script-to-show-largest-pack-objects-and-trim-your-waist-line/ | |
# | |
# The above script worked for me, but was very slow on my 11GB repository. This version has a bunch | |
# of changes to speed things up to a more reasonable time. It takes less than a minute on repos with 250K objects. | |
# |
{ | |
"c_key": "ConsumerKey", | |
"c_sec": "ConsumerSecret", | |
"t_key": "TokenKey", | |
"t_sec": "TokenSecret" | |
} |
# Hello, and welcome to makefile basics. | |
# | |
# You will learn why `make` is so great, and why, despite its "weird" syntax, | |
# it is actually a highly expressive, efficient, and powerful way to build | |
# programs. | |
# | |
# Once you're done here, go to | |
# http://www.gnu.org/software/make/manual/make.html | |
# to learn SOOOO much more. |
B0S2 | B0S3 | B0S4 | |||||||
---|---|---|---|---|---|---|---|---|---|
abundance | percent cover | height | abundance | percent cover | height | abundance | percent cover | height | |
5 | 50 | 71 | 8 | 30 | 9 | 45 | |||
5 | 3 | 47 | 1 | 1 |
library(ggplot2) | |
library(grid) | |
my_axis <- function(low="low", high="high", axis=c("x", "y"), ...){ | |
axis <- match.arg(axis) | |
if(axis == "x"){ | |
g1 <- textGrob(low, x=unit(0,"npc"), hjust=0) | |
g3 <- textGrob(high, x=unit(1,"npc"), hjust=1) |
# ========================================================================== | |
# Example of plot for publication with inwards ticks in ggplot | |
# ========================================================================== | |
library(ggplot2) | |
# ================================== | |
# create some data | |
# ================================== | |
set.seed(1) |
library(rtweet) #rtweet API creds should already be set up | |
library(stringi) | |
library(dplyr) | |
friends = get_friends(user="noamross") | |
followers = get_followers("noamross") | |
tweeps_id = distinct(bind_rows(friends, followers)) | |
tweeps_info = lookup_users(tweeps_id$user_id) | |
# A regex for a visit to Durham |
library(grImport2) | |
library(grConvert) | |
library(egg) | |
convertPicture("noun_3663.svg", "balloon.svg") | |
balloon <- readPicture("balloon.svg") | |
d <- data.frame(x=1:9, y=rnorm(9), | |
data = I(Map(function(c, s) list(c=c,s=s),c=blues9,s=1:9)), |
library(purrr) | |
library(lobstr) | |
library(glue) | |
library(rlang, warn.conflicts = FALSE) | |
make_an_lm <- function() { | |
x <- rep(1L, times = 10000000) | |
cat(glue("x is {object.size(x)}B")) | |
lm(1 ~ 1) | |
} |