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>")
# ipouts percentiles for pitching ipouts for AL in 2000s
ipop = computePercentiles(conn, "pitching", "ipouts",
where = "lgid = 'AL' and yearid >= 2000")
# ipouts percentiles by league
ipopLg = computePercentiles(conn, "pitching", "ipouts", by="lgid")
# percentiles on temporal columns
playerAllDates = computePercentiles(conn, "master_enh",
columns=c('debut','finalgame','birthdate','deathdate'),
temporal=TRUE, percentiles=c(0))
createBoxplot(playerAllDates, x='column', value='epoch', useIQR=TRUE,
title="Boxplots for Date columns (epoch values)",
legendPosition="none")
}
Run the code above in your browser using DataLab