Skip to content

Instantly share code, notes, and snippets.

View alistairstead3408's full-sized avatar

Alistair Stead alistairstead3408

8 followers · 15 following
  • Cambridge, UK
View GitHub Profile
@alistairstead3408
alistairstead3408 / index.html
Created June 15, 2018 16:15
JS Bin // source http://jsbin.com/yusejirutu
<!DOCTYPE html>
<html>
<head>
<meta charset="utf-8">
<meta name="viewport" content="width=device-width">
<title>JS Bin</title>
</head>
<body>
<form>
<input type="text" name="FirstName"/>
@alistairstead3408
alistairstead3408 / cleanbandit-rather-be
Created December 12, 2014 13:37
with_bpm 96 do
#Thread to do bass synth
in_thread do
play_pattern_timed [68, 68, 68], [0.6, 0.6, 0.4], release: 0.3
play_pattern_timed [66], [1.6], release: 0.3
play_pattern_timed [64, 64, 64], [0.6, 0.6, 0.4], release: 0.3
play_pattern_timed [63, 66],[0.8, 0.4], release: 0.3
end
#Main melody thread
@alistairstead3408
alistairstead3408 / sonicpi-bastille-flaws-intro
Last active August 29, 2015 14:10
define :test do
with_bpm 120 do
use_synth :saw
31.times do
use_synth :prophet
play 49, release: 0.6
sleep 0.3
end
12.times do
use_synth :prophet
@alistairstead3408
alistairstead3408 / gist:188cc42841535045f113
Created November 30, 2014 17:46
define :mockingjay do
with_fx :reverb, room: 1, mix: 1 do
play 91, release: 0.7
sleep 0.6
play 94, release: 0.7
sleep 0.6
play 93, release: 0.7
sleep 0.6
play 86, release: 0.7
sleep 5
@alistairstead3408
alistairstead3408 / levenshtein-distance-r
Created November 26, 2014 11:56
#Takes two character vectors
lev_dist_better <- function(s, t){
if(identical(s, t)) return(0)
if(length(s) == 0) return(length(t))
if(length(t) == 0) return(length(s))
#initialise v0 with a sequence from 0 to length of t + 1
previous <- seq(1, length(t) + 1, 1)
current <- c(rep(0, length(t) + 1))
@alistairstead3408
alistairstead3408 / index.html
Created November 20, 2014 09:52
// source http://jsbin.com/nahibuyigo
<!DOCTYPE html>
<html>
<head>
<script src="http://code.jquery.com/jquery.min.js"></script>
<link href="http://maxcdn.bootstrapcdn.com/bootstrap/3.3.0/css/bootstrap.min.css" rel="stylesheet" type="text/css" />
<script src="http://maxcdn.bootstrapcdn.com/bootstrap/3.3.0/js/bootstrap.min.js"></script>
<meta charset="utf-8">
<title>JS Bin</title>
</head>
<body>
@alistairstead3408
alistairstead3408 / merg-jpg-to-pdf.sh
Created December 10, 2013 17:22
#!/bin/bash
#
# This script traverses through a directory of pdf's scanned in Windows with default scanned names
# e.g. Image.jpg, Image (1).jpg etc
# It merges them in ascending order and outputs them in ./pdfs/
for i in $(find . -name "*" -type d);
do
STR=$i
NAME=${STR:2:${#STR}}