nbest937

// =============================================================================
// emr.sc -- import it in predef.sc
import ammonite.ops._
// add emr jars and config dir to interp class path
//
def loadEmrJars() = {
  // /etc/zeppelin/conf/zeppelin-env.sh
  val libDirs = List( //
                     "/usr/lib/hadoop-lzo/lib",
                     "/usr/lib/spark/jars",

nbest937

library(maps)
library(geosphere)
library(plyr) 
library(ggplot2)
library(sp)

airports <- read.csv("http://www.stanford.edu/~cengel/cgi-bin/anthrospace/wp-content/uploads/2012/03/airports.csv", as.is=TRUE, header=TRUE)
flights <- read.csv("http://www.stanford.edu/~cengel/cgi-bin/anthrospace/wp-content/uploads/2012/03/PEK-openflights-export-2012-03-19.csv", as.is=TRUE, header=TRUE)

# aggregate nunber of flights

nbest937

#!/software/R-2.15-el6-x86_64/bin/Rscript --vanilla
##!/usr/bin/Rscript --vanilla

library( raster, quietly= TRUE)

args <- commandArgs(TRUE)

grbFile <- args[ 1]
scanHowMany <- args[ 2]

nbest937

#!/bin/bash                                                                                                                                                                                                                                                    

# arguments should be relative paths from the working directory (not                                                                                                                                                                                           
# necessarily the directory where this script lives) to the top level                                                                                                                                                                                          
# of a grid/1234567 structure so that it can be converted to the                                                                                                                                                                                               

nbest937

#!/soft/R/gnu-4.1/2.14.0/bin/Rscript --vanilla

library( stringr)

args <- commandArgs()
args <- args[-(1:match("--args", args))]

inputLines <- readLines( args[ 1])
## inputLines <- readLines( "input/mail merge sample.txt")