ramhiser

# FCC's Census Block Conversions API
# http://www.fcc.gov/developers/census-block-conversions-api
latlong2fips <- function(latitude, longitude) {
  url <- "http://data.fcc.gov/api/block/find?format=json&latitude=%f&longitude=%f"
  url <- sprintf(url, latitude, longitude)
  json <- RCurl::getURL(url)
  json <- RJSONIO::fromJSON(json)
  as.character(json$County['FIPS'])
}

ornicar

Lichess games CSV export

This is a direct export from lichess database. Some fields are binary encoded.

Head

_id,so,s,v,if,us,p0.ai,p0.e,p1.ai,p1.e,c,mt,w,an,ra,pg,ca
"04tbfylw",1,33,,,"[ ""miroslavm970"", ""redlightning530"" ]",,1480,,1072,0500000884000B930000000000,4665B5,true,,true,23242B55806A801C6140,2013-11-14T07:59:10.945Z

ornicar

use strict;
use MIME::Base64;

$| ++;

use constant DEBUG => 0;

my $move_type;
$move_type->[0] = 'SimplePawn';
$move_type->[1] = 'SimplePiece';

robinkraft

import os
import random
import glob
import shutil


def get_dc_paths(path):
    """Given a path filled with dog & cat files, make separate lists of both."""
    cats = []
    dogs = []