# This is Mary's notes for the first day of class.
# It's name is day1.R and I have stored it on my 
# WD Passport drive in the directory .../Lx795Q/summer2008

# I'm going to start by setting my working directory to 
# the place where I have stored the Bresnan et al. data.
# (Here, I have put it on the Desktop)
setwd("/Users/buckeye/Desktop")

# Then read in the data from the file.
bresnan=read.table("BresDative.txt",header=TRUE)

# Check to see what the first three rows of data look like.
bresnan[1:3,]

# Ask how many of the observations were PP realizations and 
# how many were NP realizations.
summary(bresnan$real)
# Convert that into a pair of proportions.
summary(bresnan$real)/dim(bresnan)[1]