| /* I, Brandon Martin-Anderson, release this into the public domain or whatever. */ | |
| BufferedReader reader; | |
| double ll, bb, rr, tt; | |
| float A = 1000.0; | |
| GlobalMercator proj = new GlobalMercator(); |
| #------------------------------------------------------------ | |
| # REVOLUTION ANALYTICS WEBINAR: INTRODUCTION TO R FOR DATA MINING | |
| # February 14, 2013 | |
| # Joseph B. Rickert | |
| # Technical Marketing Manager | |
| # | |
| # BIG DATA with RevoScaleR | |
| # | |
| # Copyright: Revolution Analytics |
| # load required packages | |
| library(shiny) | |
| library(shinyIncubator) | |
| library(googleVis) | |
| library(ggplot2) | |
| library(stringr) | |
| library(plyr) | |
| library(XML) | |
| library(httr) | |
| library(Hmisc) |
| #tell R where you're working | |
| setwd("~/YourDataFolder") | |
| #load libraries | |
| library(ggplot2) | |
| library(gdata) | |
| #load data | |
| crime <- read.csv("crime2012.csv") |
| # | |
| # Get appraised value of car from Edmunds.com using the developer API with R | |
| # Reference: http://developer.edmunds.com/docs/read/The_Vehicle_API | |
| # | |
| # set working dir | |
| setwd('~/R/carvalue') | |
| #load libraries | |
| library(RJSONIO) |
| import csv | |
| from bs4 import BeautifulSoup | |
| # Read in wheat production ----- | |
| wheat = {} | |
| reader = csv.reader(open('aw98.csv'), delimiter=",") | |
| #file has four lines of headers | |
| next(reader, None) | |
| next(reader, None) | |
| next(reader, None) |
9:00 - 10:00 Opening keynote:
Montserrat Guillen and Leo Guelman: New trends in predictive modelling - the uplift models success story
10:00 - 11:00 Session 1: Reserving (20 min. each)
9:00 - 10:00 Opening keynote:
Montserrat Guillen and Leo Guelman: New trends in predictive modelling - the uplift models success story
10:00 - 11:00 Session 1: Reserving (20 min. each)
| * Script to record and tag spotify tracks, by Lloyd Moore *) | |
| (* Make sure you are already recording in Audio Hijack Pro with a session called 'spotifySession' *) | |
| tell application "Spotify" | |
| set currentTrack to (current track) | |
| set trackName to (name of currentTrack) | |
| tell application "Audio Hijack Pro" | |
| set theSession to my getSession() | |
| end tell | |
| repeat |
| #data from http://www.transtats.bts.gov/DL_SelectFields.asp?Table_ID=236&DB_Short_Name=On-Time | |
| #Ask for these fields | |
| #"DAY_OF_WEEK" (IN UI DayOfWeek) | |
| #"FL_DATE" (FlightDate) | |
| #"CARRIER" (Carrier) | |
| #"ORIGIN_CITY_MARKET_ID" (OriginCityMarketID) | |
| #"ORIGIN" (Origin) | |
| #"CRS_DEP_TIME" (CRSDepTime) | |
| #"DEP_DELAY" (DepDelay) | |
| #"ARR_DELAY" (ArrDelay) |