Horse Racing at Eagle Farm data

Description

Results of horse races at Eagle Farm, Brisbane, on 31 August 1998. The data, collected by Donald Forbes for his MS305 Data Analysis Project, give results for each horse in a sequence of 8 races.

Format

This data frame contains the following columns:

Position

(Finishing position)

Starters

Number of horses in race

Last

Finishing position in last race

Since

Days since last race

Number

Identifying number of horse in race

Carried

Weight carried

Weight

Handicap weight

Barrier

Barrier position at start of race

Distance

Length of race

Lengths

Number of lengths that horse finished from winner

Odds

Starting odds

Starts

Number of races previously started in

Age

Age of horse in years

Ratio

Proportion of wins in previous starts

References

Forbes, D. (1998). A Day at the Races. MS305 Data Analysis Project, Department of Mathematics, University of Queensland.

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
##Load the data
 library(FMsmsnReg)
 data(horses)
 attach(horses)

#Set the response y and covariate x
 x1 <- cbind(1,Last,Carried)
 y  <- Position

##Fits a linear Regression Model with Finite Mixtures of Skew Contaminated Normal

parCN  <- FMsmsnReg(y, x1, g=2, get.init = TRUE, criteria = TRUE, group = FALSE,
         family = "Skew.cn", error = 10^-4, iter.max = 5000,obs.prob= FALSE,
         kmeans.param = NULL,show.converge=FALSE,cp=0.5)

##Fits a linear Regression Model with Finite Mixtures of Skew normal
 parSN <- FMsmsnReg(y, x1, g=2, get.init = TRUE, criteria = TRUE,
          group = FALSE,family = "Skew.normal", error = 10^-4,
          iter.max = 5000,obs.prob= FALSE, kmeans.param = NULL,show.converge=FALSE,cp=0.5)