Skip to content

Instantly share code, notes, and snippets.

#!/usr/bin/python
from struct import pack, unpack #Some unpacking for the WAV encoding
from FFT import * #Some FFT goodness
from Numeric import * #Gotta have speedy math
import wave #For opening WAV files
from pylab import * #For ploting
from matplotlib.widgets import Slider, Button, RadioButtons
import os
from time import time
@jduckles
jduckles / lapply_example.R
Last active August 22, 2018 03:33
A simple example of lapply
mydata1 <- data.frame(letter = c("a","b","c","a","b","c"))
mydata2 <- data.frame(letter = c("a","b","c","a","b","c","a","b","a"))
stuff <- list(mydata1,mydata2)
myawesome <- function(df) {
levels <- c("a","b","c")
as.factor(df$letter)
}
/article/27339/download/xml/
/article/26369/download/xml/
/article/25437/download/xml/
/article/26922/download/xml/
/article/26860/download/xml/
/article/26516/download/xml/
/article/26323/download/xml/
/article/26304/download/xml/
/article/26262/download/xml/
/article/26235/download/xml/
library(tidyverse)
library(readr)
workshops <- read_csv('workshops.csv')
svg('workshops.svg')
ggplot(workshops, aes(x=date,y=workshops$count)) + geom_line() + ylab("Cumulative Number of Workshops")
dev.off()
instructors <- read_csv("instructors.csv")
svg('instructors.svg')
@jduckles
jduckles / Dockerfile
Created May 3, 2018 04:28 — forked from perrygeo/Dockerfile
Minimal debian image with Python 3.6 and geo python tools
FROM python:3.6-slim-stretch
ADD requirements.txt /tmp/requirements.txt
RUN apt-get update && \
apt-get install -y \
build-essential \
make \
gcc \
locales \
#!/usr/bin/env python3
""" Fill SVG templates """
import sys
from svglib.svglib import svg2rlg
from reportlab.graphics import renderPDF
import jinja2
import pyaml
@jduckles
jduckles / build_software-carpentry.org.sh
Created August 8, 2017 21:24
Script used to build SWC website from GitHub
#!/bin/bash
set -e
SCRIPT='/home/data/sources/software-carpentry.org.sh'
LOG='/home/data/sources/software-carpentry.org.log'
DATE=`date`
echo '----------------' >> ${LOG}
echo ${DATE} >> ${LOG}
${SCRIPT} >> ${LOG} 2>&1
root@server-03:/home/data/cron_scripts# cat /home/data/sources/software-carpentry.org.sh
@jduckles
jduckles / badges.csv
Created July 24, 2017 08:08
Badges compared by population
country title badge_count
US Software Carpentry Instructor 459
US Data Carpentry Instructor 251
CA Software Carpentry Instructor 108
GB Software Carpentry Instructor 93
AU Software Carpentry Instructor 78
CA Data Carpentry Instructor 55
GB Data Carpentry Instructor 41
NZ Software Carpentry Instructor 37
AU Data Carpentry Instructor 30
# unzip files
for filename in $(ls *.zip); do
unzip $filename
done
# find paths of csv files and store as a variable
files=$(find . -name "*.csv")
# take header row from first file and write it to otput file
head -1./1/1.csv > output.csv # write header to file

Keybase proof

I hereby claim:

  • I am jduckles on github.
  • I am jduckles (https://keybase.io/jduckles) on keybase.
  • I have a public key ASDG1rXNFPsRFdalHMEmQLmHtcWHq_yWeWPEAhsHFucdTAo

To claim this, I am signing this object: