bchartoff

(*
	Create Calendar event from Message
*)
set theContent to string

-- A subroutine to strip all tags from html
on remove_markup(this_text)
	set copy_flag to true
	set the clean_text to ""
	repeat with this_char in this_text

bchartoff

import urllib, urlparse
import re
import random
import numpy

API_KEY = "SDQL_KEY"

#  I want to jiggle Y and Yo?
def jiggler(lst,jiggle):
    return [x + jiggle * ( random.random() - 0.6 ) for x in lst]

bchartoff

Policy or Program,What it does     ,Policy proposals tested by TRIM3
Earned Income Tax Credit ,Provides refundable credits for low-income working families  ,"Tested two options for increasing the EITC, including an increase of 40 percent in the maximum credit"
Child and Dependent Care Tax Credit ,A non-refundable credit to cover expenses for child care or care for an incapacitated dependent  ,"Tested a fully-refundable credit with higher rates for families with under $70,000 adjusted gross income, but no eligibility over $70,000"
Child Care and Development Fund ,Federally-funded child care subsidies,Guarantee a subsidy to eligible families under 150 percent of poverty
Minimum Wage,Federally-mandated wage of $7.25 per hour,Tested increasing the wage to $10.25 per hour by 2020; second option set a ceiling of 10th percentile of state’s actual wages
Supplemental Nutrition Assistance Program (SNAP),"Federal entitlement program that gives in-kind, noncash benefits to eligible adults and children ","Tested increasin

bchartoff

import urllib, urlparse
import re
import random
import numpy

API_KEY = "SDQL_KEY"

#  I want to jiggle Y and Yo?
def jiggler(lst,jiggle):
    return [x + jiggle * ( random.random() - 0.6 ) for x in lst]

bchartoff

import csv
import json
import subprocess


jData = []
remap = {"Custodial Arrest":"custodial","NonCustodial Arrest":"noncustodial","Contact":"contact"}
cr = csv.reader(open("data/source_data.csv",'rU'))

bchartoff

#aliases
alias ll="ls -lha"
alias h=history
alias hg="history | grep"
alias ..="cd .."

#Path
export PATH=/usr/local/bin:/usr/local/sbin:/usr/local/bin:/usr/bin:/usr/local/git/bin:/bin:/usr/sbin:/sbin:~/bin

#Sublime

bchartoff

#combine elements with same name in two named lists (useful for combining layouts)
appendList <- function (x, val)
{
    stopifnot(is.list(x), is.list(val))
    xnames <- names(x)
    for (v in names(val)) {
        x[[v]] <- if (v %in% xnames && is.list(x[[v]]) && is.list(val[[v]])) 
            appendList(x[[v]], val[[v]])
        else c(x[[v]], val[[v]])
    }

bchartoff

#combine elements with same name in two named lists (useful for combining layouts)
appendList <- function (x, val)
{
    stopifnot(is.list(x), is.list(val))
    xnames <- names(x)
    for (v in names(val)) {
        x[[v]] <- if (v %in% xnames && is.list(x[[v]]) && is.list(val[[v]])) 
            appendList(x[[v]], val[[v]])
        else c(x[[v]], val[[v]])
    }

bchartoff

####################################
# diamond data bar chart
# Questions? Email feedback@plot.ly
# For more docs, see plot.ly/api
####################################
library(plotly)

py <- plotly(username='USERNAME', key='API_KEY')

bchartoff

####################################
# diamond data bar chart
# Questions? Email feedback@plot.ly
# For more docs, see plot.ly/api
####################################
library(plotly)

py <- plotly(username='USERNAME', key='API_KEY')