############################################################
# Create the Monte Carlo class
#
# This class is used to make many simulations
MonteCarlo <- function()
{

    # Define the slots
    me = list(

        ## First define the parameters for the stochastic model
        N        = 0,
        T        = 0,
        x0       = 0,
        y0       = 0,
        alpha    = 0,
        beta     = 0,
        gamma    = 0,
        delta    = 0,
        noiseOne = 0,
        noiseTwo = 0,

        ## Define the data to track and the number of trials
        xData = 0,
        yData = 0


      )
  ## Set the name for the class
  class(me) <- append...