Skip to content

Instantly share code, notes, and snippets.

View rklancer's full-sized avatar

Richard Klancer rklancer

20 followers · 2 following
  • Somerville, MA
View GitHub Profile
@rklancer
rklancer / index.html
Created March 14, 2014 02:34
<!DOCTYPE html>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html;charset=utf-8">
<title>Simple Molecules</title>
<script type="text/javascript" src="http://mbostock.github.com/d3/d3.js"></script>
<script type="text/javascript" src="http://mbostock.github.com/d3/d3.geo.js"></script>
<script type="text/javascript" src="http://mbostock.github.com/d3/d3.geom.js"></script>
<script type="text/javascript" src="http://mbostock.github.com/d3/d3.layout.js"></script>
<style type="text/css">
@rklancer
rklancer / cart-weight-minot.json
Created October 2, 2014 20:25
{
"name": "Untitled Document",
"guid": 11,
"components": [
{
"type": "DG.GameView",
"guid": 101,
"componentStorage": {
"currentGameName": "CartWeight",
"currentGameUrl": "http://localhost:8000/CartWeight/",
@rklancer
rklancer / get-context.R
Created November 12, 2014 16:28
getContext <- function(re, data=sampleData) {
reWithContext <- paste0(".{0,10}", re, ".{0,10}")
context <- data[grep(reWithContext, data$text, perl=T),]
m <- regexpr(reWithContext, context$text, perl=T)
cbind(context, data.frame(context=regmatches(context$text, m)))
}
writeOut <- function(df, fname) {
f <- file(fname, 'wt')
for (rownum in 1:nrow(df)) {
@rklancer
rklancer / asciify.R
Created November 14, 2014 02:52
asciify <- function(text) {
text <- stri_trans_general(text, 'Any-Latin')
text <- stri_trans_general(text, 'Any-Publishing')
text <- stri_trans_general(text, 'Latin-Ascii')
text
}
@rklancer
rklancer / arg-block.rb
Last active August 29, 2015 14:18
Queries for Arg Block report
# Start with a list of endpoints; here we just use all of them
endpoints = Run.where("remote_endpoint IS NOT NULL").map &:remote_endpoint
select_params = [
{
:embeddable_type => "Embeddable::OpenResponse",
:embeddable_table => "embeddable_open_responses",
:answer_table => "embeddable_open_response_answers",
:question_foreign_key => "open_response_id",
:feedback_table => "c_rater_feedback_items",
@rklancer
rklancer / a-staticview-conundrum.js
Created May 1, 2010 17:02
...
introView: SC.StackedView.design({
layout: { top: 20, bottom: 20 },
childViews: [
SC.LabelView.design(SC.StaticLayout, {
useStaticLayout: YES,
classNames: ['append-to-me'],
escapeHTML: NO,
displayValue: "So, I'm a big ol' string of text. <br><br>And I'm another string of text."
})]
@rklancer
rklancer / test-raphael-group.html
Created June 21, 2010 17:48
<!DOCTYPE html>
<html>
<head>
<meta charset="utf-8">
<title>Raphael graphs</title>
<script type="text/javascript" src="http://ajax.googleapis.com/ajax/libs/jquery/1.4.1/jquery.min.js"></script>
<script type="text/javascript" src="javascripts/raphael/raphael.js"></script>
<link rel="stylesheet" href="stylesheets/apidocs.css">
@rklancer
rklancer / test-raphael-group.js
Created June 21, 2010 18:42
/*globals $ Raphael */
// make these accessible at the Firebug/Web Inspector console
var r, group;
$(function () {
var notHighlighted = {
stroke: "#aaaaaa",
fill: "#aaaaaa"
@rklancer
rklancer / test-raphael-group.js
Created June 21, 2010 17:56
/*globals $ Raphael */
// make these accessible at the Firebug/Web Inspector console
var r, group;
$(function () {
var notHighlighted = {
stroke: "#aaaaaa",
fill: "#aaaaaa"
@rklancer
rklancer / gist:450535
Created June 23, 2010 20:55
module("Smartgraphs.questionSequenceController question-sequence navigation", {
setup: function () {
Smartgraphs.Question.FIXTURES = [
SC.mixin(SC.copy(qhash), {guid: 'q1', sequence: 'test-sequence-1'}),
SC.mixin(SC.copy(qhash), {guid: 'q2', sequence: 'test-sequence-2'})
];
Smartgraphs.QuestionSequence.FIXTURES = [
{ guid: 'test-sequence-1', questions: ['q1'] },
{ guid: 'test-sequence-2', questions: ['q2'] }