Learn R Programming

FMsmsnReg (version 1.0)

horses: 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.

Arguments

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

Run this code
##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)

Run the code above in your browser using DataLab