if(interactive()){
# initialize connection to Lahman baseball database in Aster
conn = odbcDriverConnect(connection="driver={Aster ODBC Driver};
server=<dbhost>;port=2406;database=<dbname>;uid=<user>;pwd=<pw>")
batters = computeSample(conn, "batting", sampleFraction=0.01)
dim(batters)
pitchersAL = computeSample(conn, "pitching", sampleSize=1000, where="lgid = 'AL'")
dim(ptichersAL)
battersByDecadesSingleSize = computeSample(conn, tableName = 'batting_enh',
sampleSize=1000,
conditionColumn = 'decadeid',
conditionValues = c(1990,2000,2010))
dim(battersByDecadesSingleSize)
battersByDecades = computeSample(conn, tableName = 'batting_enh',
sampleFraction = c(0.01,0.01,0.02),
conditionColumn = 'decadeid', conditionValues = c(1990,2000,2010))
dim(battersByDecades)
battersByOddEvenYears = computeSample(channel=NULL, tableName = 'batting_enh',
sampleFraction = c(0.01,0.02),
include = c('decadeid','g','ab','r','h'),
conditionStratum = "yearid % 2",
conditionValues = c('0','1'),
where = "lgid = 'NL'")
dim(battersByOddEvenYears)
battersBeforeAfter1960 = computeSample(channel=NULL, tableName = 'batting_enh',
sampleSize = c(200, 200),
conditionStratum = "CASE WHEN yearid <- 1960 THEN 'before'
ELSE 'after'
END",
conditionValues = c('before','after'))
dim(battersBeforeAfter1960)
}
Run the code above in your browser using DataLab