vikjam

#!/usr/local/bin/env python

"""
Assign colors to each school's pin
"""
from BeautifulSoup import BeautifulSoup

# Hash to store style values
styles = {}

vikjam

library(googleVis)
gSee <- function(df) {
          return(plot(gvisTable(df, options = list(showRowNumber = TRUE,
                                                   page          = 'enable',
                                                   pageSize      = 30))))
}

vikjam

ps -eo pmem,pcpu, vsize, user, pid, cmd | sort -k 1 -nr | head -15

vikjam

import xlrd
import os
import gzip

workbook  = xlrd.open_workbook("example.xlsx")
worksheet = workbook.sheet_by_index(0)

for row_num in range(0, worksheet.nrows):
    row_values = [v.value for v in worksheet.row(row_num) if v.value]
    

vikjam

# Save file as matplotlibrc in folder ~/.matplotlib

backend: TkAgg

# Enable fonts
# See: http://matplotlib.org/1.3.1/users/usetex.html
font.family        : serif
font.serif         : Times, Palatino, New Century Schoolbook, Bookman, Computer Modern Roman
font.sans-serif    : Helvetica, Avant Garde, Computer Modern Sans serif
font.cursive       : Zapf Chancery

vikjam

webuse nlswork, clear

gen count_ln_wage = !missing(ln_wage)
collapse (sum) count_ln_wage (mean) ln_wage, by(grade year)

label var count_ln_wage "Number of individuals"
label var ln_wage       "Average log(wage)"

levelsof year, local(years)
foreach yr of local years {

vikjam

webuse nlswork, clear
gen grade_bin = floor(grade/2) * 2 + 1
levelsof year, local(years)
foreach yr of local years {
  binscatter ln_wage grade if year == `yr', linetype(connect) xq(grade_bin) msymbol(none) title("`yr'")
}

vikjam

library(readxl)
library(ggplot2)
library(reshape2)

asq.data     <- read_excel("ASQ.xlsx")
variables    <- c("Interval"             ,
                  "CommunicationResults" ,
                  "GrossMotorResults"    ,
                  "FineMotorResults"     ,
                  "ProblemSolvingResults",

vikjam

cut -d , -f1-3 input.csv > output.csv

vikjam

clear all
set obs 10000

capture program drop detect_rd
program define detect_rd, rclass
  syntax varlist(numeric max=1) [if]
  if "`if'" == "" {
    local ifcond ""
  }
  else {