{ "cells": [ { "cell_type": "markdown", "metadata": {}, "source": [ "# Parameter space exploration with Latin Hypercube in R\n", "\n", "*This tutorial assumes you have read the [tutorial on numerical integration](http://nbviewer.ipython.org/github/diogro/ode_examples/blob/master/Numerical%20Integration%20Tutorial%20-%20R.ipynb?create=1). and the [tutorial on bifurcation analysis](http://nbviewer.ipython.org/github/diogro/ode_examples/blob/master/Qualitative%20analysis%20and%20Bifurcation%20diagram%20Tutorial%20-%20R.ipynb)\n", "\n", "## Software required\n", "### R\n", "*In order to run the R codes in this notebook in your own computer, you need to install the following software:*\n", "\n", "* [R](http://www.r-project.org/), along with the packages from [CRAN](http://cran.r-project.org/):\n", "* [deSolve](http://www.vps.fmvz.usp.br/CRAN/web/packages/deSolve/index.html), a library for solving differential equations\n", "* [rootsolve](https://cran.r-project.org/web/packages/rootSolve/index.html): root finding and equilibrium and steady-state analyses.\n", "* [pse](http://cran.r-project.org/web/packages/pse/), a library to run parameter space exploration of models\n", "* [ggplot2](http://www.vps.fmvz.usp.br/CRAN/web/packages/ggplot2/index.html), a library for plotting\n", "* [reshape2](http://cran.r-project.org/web/packages/reshape2/index.html), for manipulating data.frames\n", "\n", "To install R, download it from its homepage (Windows or Mac): http://www.r-project.org/. On Linux, you can install it using your distribution's prefered way, e.g.:\n", "\n", "* Debian/Ubuntu: `sudo apt-get install r-base`\n", "* Fedora: `sudo yum install R`\n", "* Arch: `sudo pacman -S r`\n", "\n", "To install the packages, all you have to do is run the following in the `R` prompt\n", "\n", " install.packages(c(\"deSolve\", \"rootSolve, \"\"ggplot2\", \"pse\"))\n", "\n", "And then load the packages" ] }, { "cell_type": "code", "execution_count": 48, "metadata": { "collapsed": false }, "outputs": [], "source": [ "library(ggplot2)\n", "library(pse)\n", "library(deSolve)\n", "library(rootSolve)\n", "\n", "#### For jupyter notebook only\n", "options(jupyter.plot_mimetypes = 'image/png')\n", "####" ] }, { "cell_type": "markdown", "metadata": {}, "source": [ "The R code presented here and some additional examples are available at https://github.com/diogro/ode_examples (thanks, [Diogro](https://github.com/diogro)!).\n", "\n", "\n", "## Exploring the parameter space with the Latin Hypercube\n", "\n", "### First example: two competitors in a Lotka-Volterra System\n", "\n", "#### 1. Create a R function that runs the model once\n", "Create a function that gets the model parameters and time sequence\n", "and outputs the final size of populations, by numerical integration. \n", "If argument `runsteady=TRUE` the function uses the `runsteady` function of package *rootSolve*\n", "to run numerical integration till a stationary point (hopefully, please see help of the function).\n", "If `runsteady=FALSE` the function uses the `ode` function to do the integration." ] }, { "cell_type": "code", "execution_count": 49, "metadata": { "collapsed": true }, "outputs": [], "source": [ "oneRun <- function(X0, Y0, a, b, times, runsteady=TRUE){\n", " ## parameters: initial sizes and competition coefficients\n", " parameters <- c(a = a, b = b)\n", " state <- c(X = X0, Y = Y0)\n", " ## The function to be integrated\n", " LV <- function(t, state, parameters){\n", " with(as.list(c(state, parameters)), {\n", " dX = X*(1 - X - a*Y)\n", " dY = Y*(1 - Y - b*X)\n", " list(c(dX, dY))\n", " })\n", " }\n", " ## Integrating: runsteady to run untill convergence (be carefull using that!)\n", " ## Or the usual integration with the function ode\n", " if(runsteady){\n", " out <- runsteady(y = state, times = times, func = LV, parms = parameters)\n", " return(out$y) # runsteady returns only final states\n", " }\n", " else{\n", " out <- ode(y = state, times = times, func = LV, parms = parameters)\n", " return(out[nrow(out),-1]) # indexing to get final state values\n", " }\n", "}" ] }, { "cell_type": "markdown", "metadata": {}, "source": [ "#### 2. Create a R function for running the model for each combination of parameters\n", "Create a function with `mapply` that gets a matrix of parameter combinations\n", "(combinations are lines and parameters are columns)\n", "and returns the output of the function above for each parameter combination.\n", "Use argument `MoreArgs` to input the values for additional arguments that are not in the matrix of parameter\n", "(arguments `runsteady` and `times` in this case)." ] }, { "cell_type": "code", "execution_count": 50, "metadata": { "collapsed": true }, "outputs": [], "source": [ "modelRun <- function (my.pars) {\n", " return(mapply(oneRun, my.pars[,1], my.pars[,2], my.pars[,3], my.pars[,4],\n", " MoreArgs=list(times=c(0,Inf), runsteady=TRUE)))\n", "}" ] }, { "cell_type": "markdown", "metadata": {}, "source": [ "#### 3. Set the hypercube\n", "Now prepare the hypercube. You have to specify:\n", "\n", "* A character vector to name the parameters. In this case the initial conditions and the two competition coefficients" ] }, { "cell_type": "code", "execution_count": 51, "metadata": { "collapsed": true }, "outputs": [], "source": [ "factors <- c(\"X0\", \"Y0\", \"a\", \"b\")" ] }, { "cell_type": "markdown", "metadata": {}, "source": [ "* The probability quantile function used to draw values of each parameter. If you do not information on the distribution of parameters use uniform distribution to have equiprobable values in a range from `min` to `max`:" ] }, { "cell_type": "code", "execution_count": 52, "metadata": { "collapsed": true }, "outputs": [], "source": [ "q <- c(\"qunif\", \"qunif\", \"qunif\", \"qunif\")" ] }, { "cell_type": "markdown", "metadata": {}, "source": [ "* A list of the parameters of the above probability distributions. For the uniform the parameters are minimum and maximun values. So in this case each element of the list is another listwith the `max` and `min` of the corresponding model parameter, in the same order as above" ] }, { "cell_type": "code", "execution_count": 53, "metadata": { "collapsed": true }, "outputs": [], "source": [ "q.arg <- list(list(min=0, max=1), list(min=0, max=1), list(min=0, max=2), list(min=0, max=2))" ] }, { "cell_type": "markdown", "metadata": {}, "source": [ "#### 4. Run the hypercube\n", "Now create the hypercube and run the model for each combination of parameters with `LHS`,\n", "the working horse function of *pse* package.\n", "The argument `N=200` sets 200 combinations of parameters, please see help for further information" ] }, { "cell_type": "code", "execution_count": 54, "metadata": { "collapsed": true }, "outputs": [], "source": [ "myLHS <- LHS(model=modelRun, factors=factors, \n", " N=200, q=q, q.arg=q.arg, nboot=100) # use nboot=0 if do not need partial correlations" ] }, { "cell_type": "markdown", "metadata": {}, "source": [ "#### 5. Explore your results\n", "And now use exploratory statistics to identify interesting regions of the parameter space. The *pse* package provides some options like:\n", "\n", "###### Cumulative distribution of outputs. \n", "Shows that about 40% of the population sizes are $\\simeq 0$, so coexistence is not granted:" ] }, { "cell_type": "code", "execution_count": 55, "metadata": { "collapsed": false }, "outputs": [ { "data": { "image/png": "iVBORw0KGgoAAAANSUhEUgAAAtAAAAJYCAYAAABLtNEpAAAACXBIWXMAABJ0AAASdAHeZh94AAAgAElEQVR4nO3debAsZ3kf4N9chCSQBAQoJBYJCTBCCCSEIEhsIZQFxCRVxA5gbENMbAwVoLCdsrENNhXMIpwSCTYVE5cDgcQuwMTGbDEBExEQOwbCTkCsNsisQUKAltv5o8/hzp0zS38zPdM9089TNXXOmenueWfmLL/zztfflwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACNjbougB85N8kxXRcBALAm1yX5SNdFtEGA7od7JXl/10UAAKzZvZN8oOsiVqXj2Q/H7n08Lsk1XRYCALAGxyb5YY5knq12qOsCAABgmwyxA13Nuc2QFgAA5hpSgJ4XnCe3EaQBAJhqKAF6PDzPC8fV2EchGgCAA4Y2BnpRKBaaAQCYa2gBGgAAVjK0AL1oHHSTcdIAAAzYUMZAj3L0+OYm2wMAwAFDCdDJkVBsGjsAAJY2pAC9T0gGAGBpQxsDDQAAKxliB3pTzk5yfMNtz1xnIQAAJZ6b3OMZyYe7roPtUWX12TjumOTw2LGaXk5Y8X4BAFbye8lDrkuq5yYnt3jYY1Nnnfu2eMzO6ECvx+eS3DTNn9+fT/LCGJ8NAGzefuNwlCSHkpvcIMnh5MQkV3RWVY8J0Ae1FWKvLNj26pbuEwCgCWtfrMBJhAAAUEAHGgBgeMbfcdeNLqQDDQAABYbSgV7mPysn9AEAcIAONAAAFBhKB3qUiSlaAABgGTrQAABQQIAGAIACQxnCkRi6AQBAC3SgAQCggAANAAAFhjSEAwCAgwxzLaQDDQAABQRoAAAoIEADAEABARoAAAoI0AAAUECABgCAAgI0AAAUEKABAKCAAA0AAAUEaAAAKCBAAwBAAQEaAAAKCNAAAFBAgAYAgAICNAAAFBCgAQCggAANAAAFBGgAACggQAMAQAEBGgAACgjQAABQQIAGAIACAjQAABQQoAEAoIAADQAABQRoAAAoIEADAEABARoAAAoI0AAAUECABgCAAgI0AAAUEKABAKCAAA0AAAUEaAAAKCBAAwBAAQEaAAAKCNAAAFBAgAYAgAICNAAAFBCgAQCggAANAAAFBGgAACggQAMAQAEBGgAAChzTdQEbVo19Pppy3fj1AABwwJA60JNBuZpy3bTtAADgR4YSoCc7z5Nd5snrhGgAAKYaSoDeN5ry+bTrAABgqqEFaAAAWMnQAnQ15fNp1wEAwFRDmYVjlOmBOTOuM5QDAICphtSBXnTi4KztAADgR4bSgd4nMAMAsJIhdaABAGBlAjQAABQY2hCOJvZPKFxlaMcZSd6b5s/vcS3cJwAAGyBAr8cXkzwqzZ/ff5rkaTGNHgBA7wnQB7XRBT6c5NKC7e/Ywn0CALABxkADAECBIXag5w2TMAYZAIC5hhSgm4wvbuMEQgAAdthQAvR4eJ4XjseX+xaiAQA4YGhjoBeFYqEZAIC5hhagAQBgJUML0IvGQZuHGQCAuYYyBnqUo8c3N9keAAAOGEqATo6EYtPYAQCwtCEF6H1CMgAASxvaGGgAAFiJAA0AAAUEaAAAKCBAAwBAAQEaAAAKCNAAAFBAgAYAgAICNAAAFBCgAQCggAANAAAFBGgAACggQAMAQAEBGgAACgjQAABQQIAGAIACAjQAABQQoAEAoIAADQAABQRoAAAoIEADAEABARoAAAoI0AAAUECABgCAAgI0AAAUEKABAKCAAA0AAAUEaAAAKCBAAwBAAQEaAAAKLBOgq73LsrcDAMDWWqUDPS0kC84AAOy0ZQL0aOzzasbn49sAAMDOOGbJ/fYD8uRwDcEZAICd5iRCAAAosGwHelrXebwbrRMNAMBOWnYWjn2jGZ87mRAAgJ20yhCOaV1mnWcAAHbaMkM4FoVkIRoAgJ3lJEIAACggQAMAQAEBGgAACgjQAABQQIAGAIACAjQAABQQoAEAoMCyS3nvG1+62zLeAABbrEoel+TlVZKvJ9d2XU9frRqgt8msgD+57Lh/AACAnVQlN0xy/yQ3mLHJfX+QXH5ecodPJVdtsLStMqQAPc1keN6/TogGAHbRP0nyl/M2+F5y6aeSO2yonq00lAA9rfs8ryMtRAMAO6VK7p3k8Um+OUpuOWfTc5J8ZDNVbScnEQIADMPjk1yY5FVdF7LthtKBBgDYOVVydpJ/n2bvnN8lyaWj5MnrrWr3DS1Ajw/NGJ85ZPx2AIBtcXbqrvJzGmz71iTvWG857Jqq4LJpT9y73xM7uG8AoIeq5LIqqRpcvtLC3T0lR2ehw0lu0sJx9x27d9z7tnjMzgypA73feV4UkJ08CAB0pkruluSUJGckuSTJXy3Y5cst3O0pSf4mydP3vv5Wku+2cNydNKQAvU9ABgD67D1JTkjdBf5fo3roxbrdK8lns5n72nrLBuh5qw5akRAAYI6qngntX6cOypOOT/LQUfI/N1TOTye5U5I/2dD9bb0hdqABALp2qyR/kORdSa6euO2vk3xmg7W8MMk3krx3g/e51ZYN0PszWEwuOLIL3ec2HsPJSV6aesB8E7dt4T4BgC1Q1dPJ/eHel48fbTYsTzqUugv+K0ne1GEdW0UHej2uSvL+1G/BNHF9krNiGj0AGIK7JblPkt9O8oVuS8mNU8+28aWO6xiU8WnfupoCbheYxg4AdlyV3L5Kvrc39dxXOyjhPZk9he+5a75v09gBALBYldw6yW32vjwzdcf3EalnvNikM1NPi/f8JG+buO2HSf7PhusZvC4XIFlGnxZQ2acDDQA7qErePrHoyf+rmg/xbMsJqYeLHk7y0A3f9z4d6An7JxT2/QS4JgF5F06CBAA6UCWnJnlMjs4Rpyf5zVFycSdF1X4q9cmC90zyoQ7r2BltDeHoe+AcD8/zah0fz933xwQA9MtPJnlWkk+OXXdF6hX+uvTvknws7Sz5TYY3BnpRKN7vpgMApKoXGfmFhpufluQzo3pVv65clOTXcnTmuVmSJyf5eicV7aChBWgAgBIXJTklyRsbbPvBdN9tfkCSOyd55dh170vyzm7KYZs1PVGwqxMKnUQIAD1TJT9bJT+o6sXR+uRuqbvJ35py+X6SN3dX2kxOItxC40MzmoRj458BYIdUdeg8rnC3C5JcnuSZ7Vf0Iz+WeiGTEvdOcvPMnlHjcytVxEJDCdDJkVA8L0ALzgCwY6rkrkk+uuTubxolf9dmPWNOSPKp1DNklPp6kre2Ww5NDSlA7xOSAWAgquQuqYdKJvWUct8tPMSVrRZ0tPNTh+d/lPKAf3X75dDUsgHaMAgAYBs8Icnjkvx1kr8dJdd1XM+4pyb5cuou9Lc7roUCywRo07wBAL1T1UtmX5LkBmNXn5vk7aN6+eyu/W7qJbX3XZDkL5L8fTflsKxVhnDoMAMAfXJWkkcn+b2x6y5P8vZuyjng8amnufvE3teXJ/nL7sphWUMcAw0A9ECVfDzJrVs85DFJrh0lv9HiMdt0oyR/kuRVXRfCagRoAGAtquTGqbvCs5yV5Nmpg3Rb1jVjxirunOSk1Os9fKfjWuhQF4uN7DILqQCwc6rkkiqp5lwOV8k9u65zzU5JcjhHstN9ui2nM4NfSKWa8fkkY6QBYCCqejGQR+fov//nJ3ltkn81Y7frRuudJq4L5+9d9t0i9XNyXuoFTnbt8Q6SIRwAQBselOQPk3x44vrXjYY1Rdszk1yY5Ctj112W+oRB4XlHLBOgdZYBYAdVyampZ7C4waJtp7htkitHyb3arar37pfkaWNf/8Mkf5rkV7sph03QgQYA9p2b5KeSvGyJfb+dek7joXlwkgcked3e129I8pruymETVg3Qk2OgdacBoCNV8qIkj13hEDdMcvXoyNLXHHHXJG9LfTLcuOOTvDees0Fpeynv/esFaQDYvLNSLxrypysc46st1bLtDiU5fezr85PcMsljpmz7iSnXwVGqzJ7Gbt5tzGYaOwBWUiUnVsl1VX8XEdk2j8nRuaZK8s1OK9pug5/Gbt+0LvMowjMA/EhVdzJ/JvWiIut0QuqT/9605vvZdacneUjqkwM/n6OnpPthFwXRP04iBID1Oj3Jf03ypSTXrfm+Ppbka2u+j133pCRPTf08XpZhTcFHQwI0AKxJVS/hfMnel/cbHT03MP3xhCQX7X1+TpJLkzy8s2rovVUCdJWDwzgM3wCAIy5IvcDIC5Nc0W0pzPGzqc9D+mDqkzDf0m057KrJQfWTF8o4iRBgR1TJj1fJ5/YuV1T1OFr654wkn069vPb3U68gyPo4iTBHOs/mgQZgJ1T1SnrHtXCo+6SeG/iX9742bKOfTk09xOZnUo9Nf0e35QCldKABOlQld6qSw1VStXT5QNePiYVen+R7WW7ZcsrpQAPArqiSU5L8XOp3Uc9P8p0WDvuNFo7BbD+W5B+3cIz/kOT61cthaJoE6MnVBZuOcTacA4Bt8PNJnp7kQ0k+PjLX7zZ4epJHJfn6isf5aAu1MEA60AD0VlV3hH9pzXdzXpK/GdULZ9BPT0ty17Gv75/kz1P/8wMbd6jBNqMc3U0eNbwAwKouSvKINd/Hh5L88Zrvg9U8NcmZY1+/PcmfdVQLLNWBnhzSUXo7AD1SJT+R5PfTz9/bN0vyqVF9sjW74cIkr0izJt6+U5M8N8nL1lIRFDKEA2DA9k6gu2/qM+Sf03E5s3y46wJY2olJbjVx3QVJbpl6HHNT1yd5bVtFwaYsWjjFYiqrMY0dsHFVcrsquX5v2jVz4LIOl2Z6Rvh0hzXRDdPYNdDHtwEBBqmqx46eM+WmW6d+G/3CJJ/YaFHsuhulHhp0apLnJfnPE7d/e+MVQYuaBujxQGyMM8B2eXaSh2X63MQfS/KxUXLVZktixz0oyauTfCHJe5Nc3mUx0DZjoAG2QFVPsfa4JXe/d5JXjOqZDKDUU5PcrXCf05JcneSO7ZcD3ROgAbbDI5L8syTvXGLfDyR5Q7vlMCC/kvrdiy8U7HNlkhevpRroAQEaoCeq5OIkj5xx8y2S/O9RvfoarNMpSd6aehxzUo9j/rdJXt5ZRdAzywTo8SW9jYMGSFIlx+dI4FjWhUk+meR1M25//4rHh2OTnLBgmzOTnJ3kl5N8P8nhJK9fc12w80xj1z7T2MGWq5KP7E0Ht+rlN7t+LOy0t6TZ3/Brk9y4oxrZTaaxA6BWJXdOcm7qKeF+Pcl/X/GQX1m5KHbZLZI8eIX9T0/ygiR/tGC776c+CRCYYpUhHADUYeRhqaeB+8DIdF2s1y+mXjHyyiX3P5z6pFLfp7ACHWiAKap6yrj7Ndj0vCT/cZT8mzWXxHrcKsnvJLlh14U0dF6S96XZ9yawJqsG6MmxzrrTwK54SpLjsnjJ4fclefP6y2FN7pXkSUn+vOtCGvpCkrd3XQQM3bIBetZJglYpBHqnqk+G+h9ZPPvAuLskedYouWQ9VbEBr0hy1wXb3DTJD2J6QKDAMgF6PDxPBuVq7KMQDazFXiA+rmCXk5M8MPVb9VcU7PfGkrpYuyZTsI378SRvSv0uwTxfW7oigIYWTVNnGrtyprGDhqrkhCr5/pJTxN2+6/pZyTvTfCrV/ctPdlIpMMk0dgDrUtVvuZ89Z5OTUi9a8tNJPltw6KtGyRdXqY1O/IPU07YdSnJa6llP/qzhvtcl+eia6gIGTIAG+uaPktwz9bjUWb6a5B2j5O82UxId+oUkz089bVuV5LIkH+y0ImDwVgnQ08Y5G7oBO6aqFwe5+Qbv8owkzx4lF2/wPumf+yT550kuSD1v8YXdlgNwxLILqYyfLDhrG2DLVfWYtRckeVuSb27obi9L8o4N3Rf99ei9y2VJ3tVxLQBHWbYDvR+QzQMNO6ZKbpt6jOmxOfIz/cxR8u7uqmIHvChli3/cLvX3nOnlgN5ZdQy0wAwbVtUnVa3T2anfLn9m6pOwXpHkQ2u+Tzbjhulutp+LknwmZf+IXbqeUgBoQ9dT75nGjkaq5PlLTt9Werm2cpLxLnp3yqeBa/PyhPU/RKCnTGM3ZluGcDQNx/MWiYG12hs6cdaCze6eetnoZ6y5nO+M6u4zqzk59WvWF7dL8twkf9HBfVdJPtbB/QK0zlLe0B8XJ3lkkqsXbPeSkWm8tsUzUr/D9L2uCxnzrvj+AVjJUJbyHp85ZFpdgj+tqpJHpJ5+q8T5Sf7LKHnSGkpittOT/FLqhTradv8kr009mwQAO2KVIRzTwuZ4UO2b/dr6Fu7ZTb+a5DZJPl+wz98meet6ymGOi5I8LeuZKu2bSf5qDccFoENDO0loPETvfw0HVHXH8NdWOMSZSV4wSp7TUkmUOSbJG5LcssG2t0zy5dRBGgAWGlqATg4uBCNEM80FSW6Uegq3Zb2mpVood0KShyb5/TRb7vuT6y0HAGZP+9b1dHClJqdY6opp7DakSi4umMrtVV3XS7HX5+if6bO7LQeAPYOfxq6a8fmsbfb1sdPb5zHbFKrqk8AekHqxiFnOTfLGJM9qcMgvtlEXa3dh6o5zktwpyR8keXmSa5N8vKuiAGDcshPoM5sOdAuq5P4NO8vP67pWWnNajv49c32Sx3ZaEQDTDL4D3cdOct+ckPoEtOMbbn+PNdbSO1XdIf71JCe1fOjTklSj9UxHxno9KMnDltjvZnsfb5/kS61VAwBzDPEkwkXamKHjxCT3Tv3fVhO3beE+t8lpqWeneEeSH7Z87P/W8vHYjCcnuU+STy+x72uTfKPdcgBgtqEs5b1pVyR5eMH2T0zykvR4qEtVjy3+nZYOd+O9j48Z1XMfszk/l+Rfdl3EFOckeXWSp3ZdCAAsYinvg7a59nU6P/WMBi9q6XivTPLVlo5Fcw9MPe/xK7suZMJbk7y56yIAYF3mnRjopMHl9PYkwio5u0qu2Tv57n1d17NFHpz6hLZlT7pd5+Vla3zcADDN4E8i3LdtS3nvm1ffTnWfq+SeSW6+4mHunvqkv4ck+ezKRW2Hmya5V1b7fnhQku+kXtGwbz7SdQEAMDSLOsx97UD3ecq91jvQVXJSlRxuOK3bosvXqh3752KB56SdTu+HNl04APSUDvQWGg/F84JgNfZx2wPjMakfwz1Gu9lxfGyS26zp2PdP8qaUnQgKAAzEKgF6WsjsY+d53KJQvA1DUJraf6y78ngmvTjJ5VnP9GXXJnnLGo4LAOyAZRdSGe/UztoGkuTkJC9N8zmxmzohyW8neUPLxwUAmGvZDvSs7mbfg/OioRm72q3t0hlJfiLJJUmua/G470ny7haPBwDQyKpjoPsemPc16ZpPbr9rbp3kM+lmqrzDSX4ryTUd3DcAQKuWCdDbulhKkzHB2/aYFnpectfU09CdkTo8PyrJtzdcxrciPAMAA9bXaeq2WevT2P2n5LQqqc45elq1q5Kc1NZ9AAA0tFPT2B1aYp9Rdmu2ip3093XXOY9LHpkjr9mJSa7ssi4AgG23yhCOyc8n7dxwCAAAWKYDDQAAg7XsPNAAADBIOtAAAFCgpAO9bYumAABA65p2oKedLGgWDgAABqdJgB4PyvvToU27DQAAdl7JGOjRjM8BAGAwnEQIAAAFBGgAACggQAMAQAEBGgAACqwyD/Si651oCADAztGBBgCAAk060DrJAACwRwcaAAAKCNAAAFBAgAYAgAICNAAAFBCgAQCggAANAAAFBGgAACggQAMAQAEBGgAACgjQAABQQIAGAIACAjQAABQQoAEAoIAADQAABQRoAAAoIEADAEABARoAAAoI0AAAUECABgCAAgI0AAAUEKABAKCAAA0AAAUEaAAAKCBAAwBAAQEaAAAKCNAAAFBAgAYAgAICNAAAFBCgAQCggAANAAAFjum6gA2rxj4fLdhm1u0AAAzYkDrQ1YKvAQBgoaEE6PGu8mjK9QAA0MhQAvQkIRoAgKUMNUAnQjQAAEsYcoBOhGgAAAoNJUDvB+VpIVmIBgCgsaEE6EVMWQcAQCNDmgd6UUgWogEAWEgHGgAACgypA71Jh5I8MM2f37PWWAsAAC0SoA9qYynv2yd5dZo/v8e1cJ8AAGyAAL0en09yq4Ltn5jkJTELCABA7wnQB+kCAwAwk5MIAQCgwBA70POGSeg+AwAw15ACdJPxxW2cQAgAwA4bSoAeD8/zwnE19lGIBgDggKGNgbYaIQAAKxlagAYAgJUMLUAvGgdtHmYAAOYayhjoUY4e39xkewAAOGAoATo5EopNYwcAwNKGFKD3CckAACxtaGOgAQBgJQI0AAAUEKABAKCAAA0AAAUEaAAAKCBAAwBAAQEaAAAKCNAAAFBAgAYAgAICNAAAFBCgAQCggAANAAAFBGgAACggQAMAQAEBGgAACgjQAABQQIAGAIACAjQAABQQoAEAoIAADQAABQRoAAAoIEADAEABARoAAAoI0AAAUECABgCAAgI0AAAUEKABAKCAAA0AAAUEaAAAKCBAAwBAAQEaAAAKCNAAAFBAgAYAgAICNAAAFBCgAQCggAANAAAFBGgAACggQAMAQAEBGgAACgjQAABQQIAGAIACAjQAABQQoAEAoIAADQAABQRoAAAoIEADAECBY7ouoAPVnNtGG6sCAICtNKQAPS84T24jSAMAMNVQAvR4eJ4Xjquxj0I0AAAHDG0M9KJQLDQDADDX0AI0AACsZGgBetE46CbjpAEAGLChjIEe5ejxzU22BwCAA4YSoJMjodg0dgAALG1IAXqfkAwAwNKGNgYaAABWMsQO9KaclObP743XWQgAAO0RoA9qYzXCOyb5v0scY6lZQKqJ/UbJ6FBy1fVJDiffXeaYAABMJ0Cvx+eS3D3J8Q23PyfJS5NcW3Ink8F5/PpRHd7Pe0by4ZJjAgAwnwB9UFsnGX68YNvjVrmj0UTNVVKNhWgAAFokQG8xARkAYPOGGKB3eh7oWcM6AABox5ACdJNg2cYJhJ0ZD8+60wAA6zGUAD0enucFy/HlvrcqgArPAACbMbSFVBYFy60MnsIzAMDmDC1A7xzhGQBgs4YWoBeNg96qE/CEZwCAzRvKGOhRjh7f3GT7rSE8AwBszlACdHIkZO7cNHazpq4TrAEA2jekAL1PqAQAYGlDDNA7Q4cZAGDzBOh+uGbv4w87rQIAYL2uWbxJ/+lg9se5afcfmpskeVuS30ry5RaPS7vukeQpSX6x60KY618kuVOSi7suhLl+I8lnk7ym60KY64+TvDjJh7suhJlOTfK8JA9O8t0Wj3tdko+0eDxo3c1Tn1x4TteFMNfDk1zVdREs9LtJ3tJ1ESz0ltSvFf12VerfffTXOakzxM27LqSvhjYPNAAArESABgCAAgI0AAAUEKABAKCAAA0AAAUEaAAAKCBAAwBAAQEaAAAKCNAAAFBAgN5d16ZeRWgn1pzfYdfEa7QNro3XaRtck/q1ot/83uu/a1JnCD9PDNIdui6AhQ4lOb3rIljohCQnd10EC52c+rWi306PBt42kCEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABieUdcFsLRq4uuS13KVfSnjddoObT3X+8fxWrXPz9J28Dptl2V+Z3mdMtAHvQMmv3n3NXk9V9mXMss+17P2a7Iv5dr6mRg/jtepXev4ndd0f5rzt2k7THuumz7PXqc9x3RdACvZ/4ad9wdiHftSZtnnevIXUrV3Gdwvqg1Z5WfCz9FmtPE7b9n9aa70dZr2z2c19tHvvP4ZfIY41HUBFJv2dkvTb+RV9qXMKs/1KP5gbEobPxOGbaxX27/z9r/2erWrjZ+lafvSvlGW+xmQIcYI0LAdBvfLaUsIzwADJEBD/xlbC6urxi70y7Qupn9O6TUBGvpNeO4vf+C3x2RoFqL7yz85bAUBGvpLeO4v4Xm7jHJw3KeQ1h+Tv+uc8EnvmYUD+kl43g6z/ribOQDKTZ6cJjzTWzrQ0D/CMwD0mAC9fVY52cKJGpvTxnPtNVm/ZV+nySEBk287e+3a08bPkk7m+rX9OnnN+keGGGMIx3ab9wtm0Te1X06bs+zrZMWnzVrl54nNKH2NxocBWH54c7xO20+GWEAHejtN+4ZepavpF9R6eK63g9ep//zO2w5ep93ndQIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAttCo6wKAwasW3N6331P79bZZ1zqOuQlDei76WhfQgUNdFwCwwKKAvW2q7N5jWpbnAthKx3RdAMCeaZ29auzjLnf+dvmxlerrc9HXuoAO6EADfSa0ANA7OtDAtpr21v9k4B4ftzq5/bxtm1y/qJbJfSa3mVbbrPuedcxZx5m17aRFNZQeb9o+0/YteS5KX5dlam6y76y6pmmzJqCHdKCBPpsVUtq4vq2xt+PHGWV+UFz2uMte3/b9Lzreup6LplZ5Dtb1PbLO7z2gIzrQQF+UdPSmXV8ym8c6Asxo4vNZXcfS2Rw28Rgnx5jP6+42GY++rudinlVqbtJ9nzRvzH4bNQE9pgMN9F3Tt+7nvbVesm2pyU5rG8dt4zGWaCvIreO5mPaYNzGl3LTHMo9p7mBAdKCBvtjm4LGrb8kv87i6fi7aHLbS9HtyUfeGEfoAAAIYSURBVHju+jkBWiZAA6xmctzvtOu3Vek/NX14Lpb5R2xWZ7/JMIsmnedt/ucQmMIQDoB2CElHtP1cTDveOp7vUcqGbhi2AQMlQAPbZl63cPz2abc12XbefpuyzGNch2n332Vnvcn9L1PzMo+r5LXo2/MIrMgQDmCblc400fYxJ/ebdcLbvFDfxxA/PnPGsuOg234u5s2XPXn7Kq/h5DFL9xnfr42agB7SgQa2UZNp7RZdP2uGiybHm7XN+PRkpTU23W5T3edZz0fTsb5tPhdNLVPzvP3asGxNAACd8FY5AK3TgQYAgAICNAAAFBCgAQAAAAAAAAAAAAAAAAAAAAAAAAAAANZj1HUBrNX+EsbTXufJ5Y1nfS803W5T+lYPADAwFlLZXZNBc9Ftq1y3KX2rBwAYIAF6NzUNlaM06+A23W5T+lYPADAgQki/jA+5mDdUocnQjNGM7WbtO3l90+2mafI4Sh/fKvUAALRGB7qflh2q0LcwOetxGIoBAGytY7ougJmmdV+n3dZ3sx7Hrjw+AGBgdKD7aZkA2bfuczK7lj7VCABQRIDeDX0MzwAAO8kQjt0yaxxxFeEaAKAVOtAAAFBAgN4NoxmX8dsnPx/vVk8bAtJ0u03pWz0AwEAZwrGd2gqOTaeO2/QUc4senynvAIDO6EAP07Rgusp1m9K3egAAAAAAAAAAAAAAAAAAAAAAAAAAAGCe/w+yqNm/+Q/QCQAAAABJRU5ErkJggg==" }, "metadata": {}, "output_type": "display_data" } ], "source": [ "plotecdf(myLHS, stack=TRUE, xlab=\"Population relative size\")" ] }, { "cell_type": "markdown", "metadata": {}, "source": [ "##### Scatterplots of response x parameter values\n", "Again we see that many runs resulted in exclusion of one of the species.\n", "We see also that initial conditions do not affect the final result, but\n", "competition coefficients do:" ] }, { "cell_type": "code", "execution_count": 56, "metadata": { "collapsed": false }, "outputs": [ { "data": { "image/png": "iVBORw0KGgoAAAANSUhEUgAAAtAAAAJYCAMAAAB8aiEbAAABOFBMVEUAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACntbG3AAAAaHRSTlMAAQIDBAUGBwgJCgwNDxARExQWFxgaGyssMjM6P0JESk9QUlVYXmZsbnF1dnd5fX6AhYiLjY6RlJWZmpyio6apqq2vsbKztrm7v8HFx8jJzM3U1dja3d7f4uTl5+vt7vL09fn7/P3+/8ENgeAAAAAJcEhZcwAAEnQAABJ0Ad5mH3gAABibSURBVHic7Z0Lv+1GWYdDKZSiSAsFUeoGQUA4KBSkWi0VsByg3OWiIEX00Ob7fwM965KVtVYyk7m9mf/M8/zavXOSlcnzvvtduUxuwwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADQAuOZhWmf+N3vDXkVZ5zTnReGJh7++Fk73vwuzjinOnukn2xuJ52vZ0o0zm7adpaUxjmFtp0lpXFOoW1n945/rdI4J9C4sxNFaZw99Oj83k8fDy5feSePzyYSpXHeSC/O8+3KR3/xqwNvj6cJh//G08fO/zj+OG6SDh88Tjxtog4/j5OmT58+Oo7DaTN2HHGcP0J61fnY5llw8r4s/aw3Ux7Pn59rnoI+TRimWIfjfmVO5/GcolMmz4kfxrPetANwmn4tPw6Xfd1xamwcrwYyO19q4KR6HDVOY07/uAxc1Me7mhmnjE9/jtPcuXY5Hi3tPC2NC2HtUCOT9KJzKepyHqcfLupy3kaBgi6v33GiyzrfNC7hfEPRNXQpaky0r60anX1U4Bw8a4mCTsz5ePP7nmKJLlgt5YsjQH7j5tS2oPMkP6arcamzsdI1B84ptO3s/goFSKeHF3V6855aE53POTHAxvMsKV3QOWzuOpzDKONcNoIdDgpN19Auai0OF2vORULpOM+S0jh76NhZUhpnDx07S0ovOJeLouPiCHROi5CC3opdj4EL3TwbiVd9Lcca3RdHUS5L0HG+sMcaOjm+vRM9Xv3aBr0cm0laN+60yzEm/QXME52hXLI7O5xyVXduZ4s1dZ370J7G9l5Dh3BeRj3O21so6Fws9XUWtId6imM7ONuQtaCtxEskurR72eIoY19XQW9rRWwNfVxKXYneRlHnQoF0nGdJaZw9dOw8SZu4d5zoQs7LrdbtvMyea+joOEt3gZX4A1h22+XCrqDzVU/pgm6pwz+JCpyDZ63AOZgd19DxYXac6HLOCw1X77zA7geF4+znVjpOdA7nzRvTipw3s3tBx9BxonH2QEFvQ/6Cqhg6vqCqqURfkykwCjofrvYo6ImyEdRaHC5KOZeMIegxBrOHV95Sa6JxTqB15+sf11QqjXMKbTsnSucMqu1E7+l83bqG8zX1raE3NNR2opOds4XVdp4lpXFOoW1n0R1/nONp3NmJojTOHnp0fvZznz/wbSHpO2cL99zOFhg4Zw8nxnm+XfnIz+dvOlr6cJSWmwjpIOcS2Dnni6qTPC/CaeQr7luu1dngNLLiMwTvpIt+KWstDhcdP+Oi2jw7XqNRrbShs7u1Op3d7OWcEmNoP/TaAitNNM4ptO0sKY1zCm07S0rjnELbzhul6+rTVUx0tPOOfbqKed7pYGWp3ZIHK6XiqPOgsJUD2csSOPVtBM42UNBG4GwDBW0EzjZUWtDZ9u1cKCa61pMULhTzLCmNs4eOnSWlzY6+n/7Ucb5Qi/N4N7AOBW0EzjZQ0EbgbEPNBb3aZMeJjnOODLTjPEtK4+yhY2dJaZw9dOwsKY2zh46dJaVx9tCxs6Q0zh46dpaUxtlDx86S0iXuVKer8Z64O9X37WpsJtEe4qOkoAuw0DAFbQTONlDQRuBsAwVtBM42UNBG4GxD0F3fw+nu3oVptUrjnEAPztPQDZVK45xC286S0obOnsaqdPZQj/P2Fuop6IAG6km0e8lzanT2tVXSuVTuQx8FdvlxTcVrDpxjadt598c9XdB5RNUFnG2opdsuaPbWu5MchDonhdhjnt/3hS8feCwkjfNGenGeb1de/OFPD/ymcmmcI+jEeRGpzcoJnD107CwpjbOH1p2rOJJ9upzGj76LOofMX4tzCKH90DdDE7mlx5XhA4H9o8uNlE10aWeTk2/V5Tmrs+R7NHBOoW1nSWmcU2jbWVIa5xTadhbd8cc5nsadnSxIlwuj9e4kB4HOaRF2nGdJaZw9dOy8n/S0lQsXUEw0efagXtDj4Liy3INiosmzh5svoWPX3s2eiV69stzDbs7kuRxXK46EBe+a6Nn6I4T91hzxzZBnD20U9NNfQokmz+VQ34c+X4CrtPlOgTx7kC/oBHD20LGzpPSjuF3CGQEzd1wcK85xkfjmunGOO/Qedk00zqWQd572k8Lb2e0BKLU4Dx7tCpyDZ83sbFLXi70cFRSHk6UeA5zz04qzUtcMzgURd5aUxrkg4s6S0jgXRNxZez8J5/yoO9fUY+Bkrx6DlBgr6OUIJruzgTz90EbgbEP3Zwpzs9Zmzc5r1OW8rZVw5+V26040zlE07uy8Lr1SaZxTaNvZfQtOrdI4J9C4s/MWnGqlcY6ndWfXLThFpW/bDv4WqiU60LlUHM3n2XELTsXSOMfSvvP6LTg1S0c7u6eHRWzlnJP6ne83C/RDG4GzDanOz31R5E1HM3DeSC/O8y3LC4+/f+CXlUvjHEEnzotIbVZO5HPe0FB1zhswdM4WFgVtBM42BPWd7/1Q6/MyYs7XL0yrNdGhzsXCaD3PC0MTlUrjnELbzpLS1s7rLdbrvE5VzhsboaCNwNkGgYK+b7ntRIc6l4ui7TyH7vgXjKL1g5V05zyRNZ5nJ3veCBmLYqLLOK80WrXzCvRDF2Cp3dqdl6jT2d0aBW0EzjZQ0EbgbAMFfU+RUDoujt0eAZyCQaIvS6gg0cFU58wFVU4UpXH20LGzpDTOHjp2lpTG2UPHzpLSOHvo2FlSGmcPHTtLSuPsoWNnSWmcPXTsLCmNs4eOnSWljZyPS9FyPlLUuVAgFPSR4voUdDaczVHQRuBsAwVtBM42UNBG4GxDoYIuG0LHib5zLhlDx3mWlMbZQ+vO0z29Qreq45xA686D42VHlUrjnELbzrP3HOlI45xC286zb6COdC7n9OjsndMp7FwklPBHgY16icY5jradp9cNSL3+FucEGnd2oiiNs4cenZ//6tcO/EBI+tbZRD2zswl1Oy+3GuM836x8+E2NNx3hHEEnzotIbVZO4OyhY2dJaZw9tO68+aHWpQMIOyUb9iDuUu4lncPZ1kpdzsfl+D4Q3g+93Gql30KcU2jbWVIa5xTadpaUxjmFtp0lpXFOoW1nzTcd4ZxA485OtktniG7H7qRo+9zOFkWSPc8G0vRDG4GzDRS0ETjbQEEbgbMNFPRm0iLsuDg2OeeKi4I2AmcbKGgjcLaBgt5EenQdF0eYc2KAFLQRONuwT0HX8S1UTPTR2Ui84zxLSuPsoWNnSWmcPXTsLCmNs4eOnSWlcfbQsbOkNM4eOnaWlJ45l7fvuDjKOt80XklBh80tkegbyjiXjaDjPEtK4+yhY2dJaZw9dOwsKY2zh46dJaVx9tC6s+KdvTgn0LrzwtBEpdJWzkstXY+rz9lPeefgaLwzUNBG4GwDBW0EzjZQ0EbgbAMHhUbgbEOF3Xb+llrvTnLA9SceUp0/+I3XDvxYSBrnjfTiPN+ufOib3zrwo3ePU8anU8fpDYyHf0w/xuPocRp1GnMedxw7HH+cfh1nGMfZy0pjpFedD+1fFnlZ/jmM87Ln0sM5kKPw6dPnAMZL9JcAczqfbMeT+6Q3jpdozsPjxWpmP49lSvsw2Z7mzprnc4qGs8xZ/pylaaflIjsrknOcp4WMl4BnA0O+XY6HJ3na2UQmaZw9dOwsKY2zh9adXUeytUrjnEDrzgtDE5VK45xC286S0jin0LazpDTOKbTt7JZ+ebTkOzjjnOrs3vF/5uWHhzd+/eiO1969H/d34z/dj/zPx/fj3vr3+3Gv/+Hh4eHjOOOc7OzlK2/dj/urd+7HvX/85P3Inzy6H/cP/3Y/7jNvh4s5wHnAeQ1FaZwHnNdQlMZ5wHkNRWmcB5zXUJTGecB5DUVpnAec1/jS9+7HffJ/7sc9+79/cT/yrb+9H/fKv96P+9Rvw8Uc4DzgvMZzLyyM/NjGcS++/37c8392P+49LwVaucF5wBkAAAAAAAAAAAAAwJbZld0rF3kvTtz0QWeDCeAc0GACks4Xg9mg83NHndQGE8A5oMEEFJ0jpcd1l2oTjXMois5x0qPDpdZE4xyMonOU9OhyqTTROIej6Bwj7Xa5iq7Mjj/OA84blpFduqI1B84RKDpHSa8+xSGkwQRwDmgwAUXnGOnB9blKEz24Podz2iJqcp4aHjdKj/N/pzSYAM4BDSag6DzMXxmw5WyQV3pzgwngHNBgAorOAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAdMLu3V+bOXZxtUHSePSmk3LMVsiPofKqHccS5NOPsfxVpQWfBL6Gk8/BU9OKrIi3oLPgllHQeZl9EIWk9Z8XiUHQeFItD0llwqyLpLCkt6TzibIHiZkXRWXKrIuiseCSr6DwoFoeis2JxKDoPisUh6Kx4NkjR+SknU5wBAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAGCR8czCtE/87veGvIozzunOC0MTD3/8rB1vfhdnnFOdPdJPNreTztczJRpnN207S0rjnELbzpLSOKfQtrN7x79WaZwTaNzZiaI0zh56dH7vp48Hl6+8k8dnE4nSOG+kF+f5duWjv/jVgbfHw4TDi7DH08uDx/nPyzbpevxwGXuYMhwbOg5ML3ser5YaIb3qHBP+eIn0NrQVKnEOIq/zVYquXQ5/61kVTH//2QeHadIwDZ4/M5yq5kCuXY5H5wVdQsvT8BKZpB9Zvkfaynlc+kdkoB3neS5dXr/jRMc4R4fZcZ4lpT3OeSPquDgeTXuOBuQuaId2vohMiyOTtqXzXQFVscthU9ExXY1LnY2VrjlwTqFtZ/dXbEG6XBhRpzfvqTXRmZ3jo2w8z5LS+Z3Lb757zHO2sAodFJZNe/cHWFtJDLDjPEtK4+yhY2dJaZw9dOwsKe10zh1Px8VxcTaQp6ADiY2TgnZR3TmKi7RFwimOGVwzcwUFfaR4J01x5wLkdh4NqqPILseKdm19jbWepHDhd854hsvIOWuVc7WdlzzxlHYukfVCzkULhINCI3C2oUxBF45gt0QnxNXx5lvxMt016TKV3fGaI8g5Nb6O8ywpjbOHjp1b3BTmhd0kG3ZZQ1e6KVzXyvAX4ezmjUqhKi9d0EW0O15zBDinR9dxnjvp5UigsDMrjhMlCrr4xVUdJ3rjJQYaJ4NKQC+HETjbQEEPshdUFafjC6rkE32gZAwU9AmN46sGEr2BlBgpaCe7XIk5PTdyYVqticY5gdadr39cU6k0zim07Rwpve91uoqJzuKcJbS28xwtnT+cthOdydn0dL1iniWlcU6hbWfRHX+c42nc2YmiNM4eenR+9nOfP/BtIWmXc7EwCjoXo5hzwSBinOfblY/8fPntTEXzHiG9xbkoBZxrPI2smOdFmj+NnBpPx6eRY54lEk3RfehS+e5x3+7EunOBYFrPs+M1GtVKhzsXCqSocyEKOtdwrDIuDE1UmmicU2jbWVIa5xTadpaUxjmFtp3DpSvYT1JMdKBzFX26innOc7CSJbbcBysWCd/poDAptGLOVXwJ3VT7LXSAs4eOnSWlcfbQsbOkNM4eOnau9iSFC8VEV3rw7UQxz5LSOHvo2FlSOuaimegwOy4Op3PuLQ4FbQTONlDQRuBsg0FB5w+n40S7nLOH03GeJaVx9tCxs6Q0zh46dpaUxtlDx86S0jh76NhZUhpnDx07S0rj7KFjZ0lpx53qdDU+xeBO9Vq7GhtIdOEAKOg7ioRCQRuBsw0UtBE420BBG4GzDRS0ETjbEHTX93C6u3dhWq3SOCfQg/M0dEOl0jin0LazpPRW5/L2bRdHnHOJWOwLOkMU+xVHvPwezqmp3ivPKd6hjwK7/Lim4jUHzrG07dzHc4uLgbMN5bvtCkTTeneSg0r3+51I5fl9X/jygcdC0jhvpBfn+XblxR/+9MBvKpfGOYJOnBeR2qycwNlDx86S0jh7aN057Ug2Y1SNH31HO+eOp/U8LwxNbJYeV5vYTmD/6NoCQ52T2MvZ5iSFYp4l36OBcwptO0tK45xC286S0jin0Laz6I4/zvE07uyk1qNvF4qJvjgbyHecZ0lpnD107Lyf9LSVCxdQTDR59qBe0OPguLLcg2KiybOHmy+hY9fezZ6JXr2y3MNuzuS5HFcrjoQF75ro2fojhP3WHPHNkGcPbRT0019CiSbP5VDfhz5fgKu0+U6BPHuQL+gEcPbQsbOk9PbH6WYIruPi8Dlv/jNs4cY57tB72DXROJdC3nnaTwpvxyOdN6TFfbvwZkITnRREVmejCtkpz/mu4R5vfgewe48BzvlpxVmpawbngog7S0rjXBBxZ0lpnAsi7qy9n4RzftSdTY9kUyhx9F3af68egxTMnDMGRT+0ETjb0P2ZQitvzhSukzOmcOflpdedaJyjaNzZeV16pdI4p9C2s/sWnFqlcU6gcWfnLTjVSuMcT+vOrltwIqTjwwz+FqolOqNzSozN59lxC07F0jjH0r7z+i04NUsHOZfqyivpXApb57hO7lu674e2AmcbUp2f+6LIm45m4LyRXpzn24YXHn//wC8rl8Y5gk6cF5HarJxwOOePpsfN94ntzhmCo6CNwNmGoL7z9Ida5wkt5nz9wrRaEx3iXDSE1vO8MDRRqTTOKbTtLCm9ydlEve3iSHfOFRcFbQTONuxS0KkBtp3oROeMQbWd5xw7/pkia/1gxe9sY954np0o9jUqJnrZuVAgHedZUnqrc00XzbSc5zNJIVLQRuBsAwVtBM42UND3FAml4+IIcE6Pbs+CjranODZTw/6oYp4lpXH20LGzpDTOHjp2lpTG2UPHzpLSOHvo2FlSGmcPHTtLSuPsoWNnSWmcPXTsLCmNs4eOnSWlV5zLRNJxcVR6rbwb5URXdguWE+U8+6nn0uLGE50BnG2goI3A2QYK2gicbditoFOC7DjRW5yzhdVxniWlcfbQuvN0T6/Qreo4J9C68+B42VGl0jin0Lbz7D1HOtI4p9C28+wbqCMd4lw2gjLOZdnFOTHA8EeBjXqJxjmOtp2n1w1Ivf4W5wQad3aiKI2zhx6dn//q1w78QEh6q3PWkIycs7Kbc0KQMc7zzcqH39R40xHOEXTivIjUZuUEzh46dpaUxtlD6855H2pts5/kdzbKdlbn9VkDrdzYON+2FPLhe8L7oZeXWem3EOcU2naWlMY5hbadJaVxTqFtZ0lpnFNo21nzTUc4J9C4s5MI6fgwO35ehM+5prObZ6IKOjYQ+qGNwNkGCtoInG2goI3A2QYK2k22sDoujhjn6DApaCNwtoGCNgJnGyjoK8pF0XFxKHbp9pLoeHC2YdeC3rnzXDHRG5zzRdVxniWlcfbQsbOkNM4eOnaWlMbZQ8fOktI4e+jYWVIaZw8dO0tKz5zL23dcHB2d+o7UpjiccP1JBhSlcfbQsbOkNM4eOnaWlMbZQ8fOktI4e2jdWfHOXpwTaN15YWiiUulAZ/+IaNp+xkUB5/I9YCQ6BZxtoKCNwNkGCtoInG3goNAInG3Yudsubq7Wu5McLDqXiqPHPH/wG68d+LGQNM4b6cV5vl350De/deBH78Yt///bOmynxstG67TpGteIkl51npZ+2mwOS0sfrscPl7GHKcd3Ap8GDgsaj//PlprZeU314DCzm7xmHxymScM0eP7McIomu3M4ziLIWRuLPDzJ084mMknj7KFjZ0lpnD207jxbsd9RqzTOCbTuvDA0Uak0zim07SwpjXMKbTtLSuOcQtvObumXQztYkvgOzjinOrt3/J95+eHhjV8/WubV8e9Xpvz3GysTfvKzlQmv/+Hh4eHjOOOc7OzlK2+tTPjL8U9XpvzX36xM+JfXVyZ85u0wKQ84r0zAWVMa55UJOGtK47wyAWdNaZxXJuCsKY3zygScNaVxXpmA8zB86XsrE/78yQdWpvzHX69M+Md/Xpnwqd+GSXnAeWUCzsPw3AtrUz62NuGlZ1Ym/Mna9/Y9L4UoecF5ZQLOAAAAAAAAAAAAAAClmF3ZvXKR98I8CzNnX0jm5nAOR9L5IjEb9Bncz5x7IZmbwzkCRee49vQSjXMEis420rOZZBI9mwlnHWc76TF8FmdTODvn6dXZTDrqi+tqC+dcs7jbEnO2kh6vBjQSjfOlDRlnI+nxekgi0TgrOttIjzeDConGWdJ5amQMlg6YYxZkzkTjvPT5sFk2Ll7GeTifnRkvgxslAuY4P2kqaCGe9sIMcI5B0RkAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACArindBKzqDEYrFoegMRigWh6Kz5kNBBJ3HAWcTDg+7EbPG2QZF5yOK0mLOeZ73Zoui8+mZZHtLBCLorFgcis7D9BQ/ISSdpx86KDpLSuNsg6Kz5I4/zjYoOh/2R+WsBZ0Vu8AUnQEAAKA//g86j3JljczlOgAAAABJRU5ErkJggg==" }, "metadata": {}, "output_type": "display_data" } ], "source": [ "plotscatter(myLHS, add.lm=FALSE)" ] }, { "cell_type": "markdown", "metadata": {}, "source": [ "##### Partial correlation plots\n", "Partial correlations are the non-parametric correlation of each output with each parameter,\n", "with the effects of the other variables partialed out.\n", "Confidence bars crossing the zero horizontal line indicate no-significant partial correlation.\n", "These plots show that final population sizes have a strong correlation with competition coefficients." ] }, { "cell_type": "code", "execution_count": 57, "metadata": { "collapsed": false }, "outputs": [ { "data": { "image/png": "iVBORw0KGgoAAAANSUhEUgAAAtAAAAJYCAMAAAB8aiEbAAAB2lBMVEUAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAQAKBgARCwAYEAAaEQAkFwAnGQAxIAAzIQA0IgBBKgBELABcPABkQQBpRABuRwBySgB3TQCCVACIWACVYACdZgCqbgC3dgC7eQDDfgDEfwDMhADklADumgD0ngD/pQBoCHIrAAAAnnRSTlMAAQIDBAUGBwgJCgsMDQ4PERUWFxkcHR4gIiMkJSYoKy0uLzIzNDU3ODk6O0JDREVGR0hKS09SVVZcXl9gYWRmZ21wcXJ1d3t9f4CHiImMkJGVl5manqKkp6qsrrCytLW3u7y9wsPKzM3Q0dLV19jd4uXm6+zt7vT1+fr8/v///////////////////////////////////////////6/6rlYAAAAJcEhZcwAAEnQAABJ0Ad5mH3gAAA//SURBVHic7d37n5z1Xcbh0JKQilhQQcUDLU0ooq7WU6wSiK2m2lIRT3huVxS1RIqlrtj0aUtRe0BbRVRU+F9lJ7uzs6eZ2fl+557PDNf1Q3Zfk5mnD+/c3TltsufOAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAOQNB065YOLC47eLnus60zlkGI6UPXbBSe1P/NNgCp1DDsU78YJz+z0Puh6/hBl0DpkoNY537ILJLxgnXsIsOofMFfrcrEuYReeQmaGPf23w1WIBOofME/r0mzAvnUNmPlkRugudQ4ZJJ10gdBc6hxztfOwCobvQOeSkpyLjT3zl6EbnkNNDe2zXk84hU0J79t2RziHzhD7y8v7xS5hJ55CZob2D1YXOIXOFnni0d/IlzKJzyOzQ54aJvhMvOR26hBl0Dpkj9ORLpge/c+QSptM5ZJ7Q47CHrybzGegMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAC9PXhp4zy46qYn0Tnj8rCBLq+66nE6hzwyXFj1KfR2YXhk1adwnM4hQmfo3G7vfmH6lYRupnPExEOdaVcTupHOGcPkjzGfcj2h2+gcMlFX6CXSOUToDJ1D3BVm6JziyUqGzjFeTsrQuRKhM3QOETpD52V64OA7pq4KvTw6L8Wxh3f3f3HyW6buXMlJLdGqQusccvz5yl13j310+M5VnNMylRm0zitwTegInUOEztA5ROgMnUOEztC50aG/+zXlekK30TlE6AydU2Z9c8EeoRvpHCJ0hs4hQmfoXIvQGTqHCJ2hc4jQGTqHCJ2hc4jQGTqHCJ2hc4jQGTqHCJ2hc4jQGTqHCJ2hc4jQGTqHCJ2hc4jQGTqHCJ2hc4jQGTqHCJ2hc4jQGTqHCJ2hc4jQGTqHCJ2hc4jQGTqHCJ2hc4jQGTqHCJ2hc4jQGTqHCJ2hc8gmhf7Uz44+lAy9SZ33lOy8UaGfvzb6UDL0JnXeU7LzRoU26KiSnTcqtEFHley8UaENOqpk540KbdBRJTtvVGiDjirZeWNC/8nOzs7Nl97+5adrhi7U+bs7Hadk50qhm9z41/8a+epjNUPX6Xz+Hx7sc6CSnQuFbnPjtbdGXjHoGS4OD/c5UMnOhUK3Meh5GfRaMOh5GfRaMOh5GfRaMOh5GfRaMOh5GfRa+Mz+D5D/pZqhi3R+7Pr1jw1PXb/+Kxfbj1Wyc5XQzX5oa2vrhSe3tn78Ys3QNTrfPnztG7u+PlxuP1jJzkVC9+Gt71nOD2+MHpi9OTzUfrCSnYuE7sOgZzHotWLQsxj0WjHoWQx6rfzVh0cfSoau0dmg18p3vWv0oWToGp0Neh2VDF2j8/nhm9/e9S2DXiMlQ9fofNvvb28/Mzy7vf2pe9oPVrJzkdBdlQxdp7O3vtdNydB1Ohv0uikZuk5ng143JUPX6WzQ66Zk6DqdDXrdlAxdp7NBr5uSoet0Nuh1UzJ0oc6//t4+xynZuVLoXkqG1jlE6AydQ4TO0DlE6AydQ4TO0DlE6AydQ4TO0LmL0T+9MvUaQveg89KN+u79Y0LTrid0G51DdvMO+7WnXE/oNjqH3Ao9/vRUQrfROUToDJ1DhM7QOWT8PGXGsxWh2+gcMhl62vWEbqNzMUJn6BwidIbOS3Th0cfHnhZ6aXRejmMP7u678dmxF4e7VnJSS7Sq0DqHePadoXMFQmfoHCJ0hs7t5vgeMKE70DliODDtakI30jnjoK+3ZJdJ55CJukIvkc4hQmfoHOKuMEPnFE9WMnSO8XJShs6VCJ2hc4jQGTqHCJ2hc4jQGTqHCJ2hc4jQGTqHCJ2hc4jQGTqHCJ2hc4jQGTqHCJ2hc4jQGTqHCJ2hc4jQGTqHCJ2hc4jQGTqHCJ2hc4jQGTqHCJ2hc4jQGd0633Glz3Halexs0CHdOn9wuKPPgZqV7GzQId06Pzxc7HOgZiU7G3SIQYcYdIZBhxh0hkGHGHSGQYcYdIZBhxh0hkGHGHSGQYcYdIZBhxh0hkGHGHSGQYcYdIZBhxh0hkGHGHSGQYcYdIZBhxh0hkGHGHSGQYcYdIZBhxh0hkGHGHRGl873/On29rPDM9vbT9/WfrBmJTuPQ//cn634RPopGbrLoB8avvXtXd8czrcfrFnJzuPQ155f8Yn0UzJ0p0G/+dauNwz6VAadYdAhBp1h0CEGnWHQIQadYdAhBp1h0CEGndFl0JeHr39j19cM+lQGndFl0O/5tSee+L3hN5544pfbj9WuZGeDDvHWd4hBZxh0iEFnGHSIQWcYdIhBZxh0yG7oD/3dzs5LN3d2dv541WfTRcnQBh2yG/qxl18fefXGqs+mi5KhDTpkNOhXRu8/vfWaQS+NQYcYdIZBhxh0hkGHGHSGQYcYdIZBhxh0hkGH7IZ+dNjzmVWfTRclQxt0yG7o9/zE1taTL2xtbf3wqs+mi5KhDbrd3pfd6Vfy1vdR42Sz0k3cYP7Ozd6xgx4OTLuaQR9xUGy+QZ+xc7NNGfQwzFnu4PrHPjuJQR+2G2uv2FI6N3vnDvqkT48z6MNGsYa9X+e9/rFPj+s26O/7i3f1OVCz5od2i17doM9g/4vzUHXQdaQH7SHHIsaPn4eiDznqyA7ak8IFHSy65pPCOrxsF9Jl0OfmHXT6Zbs6Sr7eb9AhBh1i0BkGfdzcL9nNcvdTvz3258Pvvv3rJ94e9K1LPzH+/bX97LeGDzXlWWrnEoVKdD7Tq9BHbnnkAoOeWmupnUsUqtJ58uOZbjrlNz3kOGzZnX/sNxc8sXr6PPk+++t30xn0YTrPrVPnzqX3Qz/+Nx0PulotoZfe2aBvWST0mV4f/d6fWfDM6kkP2uv9Czh7aO9gLWLpnQ36ljOH9j0GC1l6Z4O+ZYHQ813foA9ZemeD3nPWZ98GvZhldzboPWd9fdRDjsUsu7NB7zvrO1ieFC5myZ0N+sBZ35ANf1tjlb/q1hx6qZ0Nesm6DfqBv7+9z4GalQxt0CH+NnKGQYcYdIZBhxh0hkGHGHSGQYcYdIZBhxh0hkGHGHSGQYcYdMZu5zt//sqV3/nbK1euvH/VZ9NFyc4GHTL6SQlf+srIl59b9dl0UbKzQYf4WTYhBp1h0CEGnWHQIQadYdAhXQb9g1/Y+xbKz1f41+VLhjbokC6Dfmj47//Z9R/D+faDNSsZ2qBDOg36zdGf1BsGfZrRoF9+feRVg14eg87Y7fyTL+7svHRzZ2fnD1d9Nl2U7GzQId76DjHoDIMOMegMgw7pNOj//b9d/2nQpzHokC6Dfv/+v0zxhXe3H6xZydAGHdLnncL3Xbr06PCjly7d3+FYzUqGNugQb31nGHSIQWcYdIhBZxh0iEFnGHSIQWcYdIhBZxh0iEFnGHSIQWcYdIhBZxh0iEFnGHSIQWcYdIhBZxh0iEFn7Hd+36+u+ET6KdnZoEP8+LwQg84w6JBuoe/9dIV/ZGZXydAGHSJ0hs4hQmfoHCJ0hs4hQmfoHCJ0hs4hQmfoHCJ0hs4hQmfoHCJ0hs4hQmfoHCJ0hs4hQmfoHCJ0hs4hQmfoHCJ0hs4hQmfoHCJ0hs4hQmfoHCJ0hs4hQmfoHCJ0hs5djH7W2tRrCN2Dzks36rv30wOnXU/oNjqH7OYd9mtPuZ7QbXQOuRV6/OmphG6jc4jQGTqHCJ2hc8j4ecqMZytCt9E5ZDL0tOsJ3UbnYoTO0DlE6AydQ4TO0LkfT1YydA4ROkPnCoTO0HmJ7rvx2bEXh7tWfTq9lQmtc1+nfg/YhUcfH3vaV45WOkcMB6ZdzV1hI50zDvp6S3aZdA6ZqCv0EukcInSGziHuCjN0TvFkJUPnmDkyC92BzpUInaFziNAZOvcx445Q6E50DhE6Q+cQoTN0DhE6Q+cQoTN0rkLoDJ1DhM7QOUToDJ1DhM7QOUToDJ1DhM7QOUToDJ1DhM7QOUToDJ1DCoX+hTv6HKdk6EKdeynZuVDoO4YP9jlQydB1OndTsnOh0BeHh/scqGToOp27Kdm5UGiDXjMlOxcKbdBrpmTnQqENel3cd2H0oWTnKqGvXr/+seGp69c/0uGVjpKhi3Tu4rmrow8lOxcJffvwj/+865+Gy+0HKxm6Ruc+nr82+lCyc5HQ54c33tr15vBQ+8FKhq7RuQ+Dnsmg14lBz2TQ68SgZzLodfEjW1tbLzz59i/fUbNzkdAGvS6e+/JXRr70aM3ORUIb9Lq48droD+qtVx6r2blI6PPDv/z7rn8z6OIMei63/cH29jPDs9vbn/6e9oOVDF2jczuDnpu3vteBQc/NoNeBQc/NoNeBQc/NoNfBjVdfH3nZoGcx6HXwRzs7Ozdf2tn5/E/V7FwotEGvC299z+Xdf/n9fQ5UMnSdzu0MOqtk6E3qbNBZJUNvUmeDzioZepM6G3RWydCb1Pmvf3H0oWTnjQq9p2ToTep8z+2jDyU7b1ToPSVD6xwidIbOIUJn6BwidIbOIUJn6BwidIbOIUJn6BwidIbOIUJn6BwidIbOIUJn6BwidIbOIUJn6BwidIbOIUJn6BwidIbOIUJn6BwidIbOIUJn6BwidIbOIUJn6NxuuGX6lYRupnPEcGDa1YRupHPGQd/ppYVuo3PIRF2hl0jnEKEzdA5xV5ihc4onKxk6x3g5KUPnSoTO0DlE6AydQ4TO0Lkfz74zdA4ROkPnlbnr7rGPCr08Omfc/8WJF0+HO1d9Or2VCa1zygOXxq4OF1Z9Nr3VCa1z3iNCR+jcaPLObtqTFaHb6BwidIbOKbO+uWCP0I10DhE6Q+cQoTN0rkXoDJ1DhM7QOUToDJ37mPkAT+gudA4ROkPnEKEzdA6ZGfrysIEuJ9IeonPI7BdJH7z13WCf/NyH23x8uNp2gKvDxxtP4XOfvPXf8mAg7BE6V3Pt+cYDPDxcbDvAxeHhxlN4/lrjAQJ0DhE6Q+cQoTN0DhE6Q+cQoTN0DhE6Q+cQoTN0DhE6Q+cQoTN0DhE6Q+eQq881HuADN8+3HeD8zQ80nsJzVxsPEKBzyIV7W4/wAys/wL1r8A1tOgMAAAAAAAAAAAAAcJLxj7yZ82ffnHr7RQ/Qy4r/52fROeRI6N1/I3Wx2y96gF6Kh9Y5Ze8EDzItWHrhA3RSPbTOIbe6DPudznzGR0Ov6j+5emidU/ZCnzvy69lu33KA/cO0fc15+7Yruxuei84po1Pc/+zcAqGHQ195Fgs9eZSF7P+UhIUPsHQ6p4xPb7FOE3d/LaEXveX4AAdfAYvSOaQx9MRdUGOutq8ckx9K0jmj8a5w8hbNj+02ObTOGa1PVs51Cd18T1Y+tM4Zky8nrTT0orc8fA5lQ+sccuxecIFTPbjJggd4BzxZ0Tnj8P/pF3x8NRl6wQdo+y8nLRyq+MtJOoccuxdb/H7s3OIHGN+wJXTTn9Oy6QwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACwUf4fJnZhKQHrBHIAAAAASUVORK5CYII=" }, "metadata": {}, "output_type": "display_data" } ], "source": [ "plotprcc(myLHS)" ] }, { "cell_type": "markdown", "metadata": {}, "source": [ "##### Non-standard analyses\n", "The package *pse* allows to extract a table with the outputs for each combination of parameters." ] }, { "cell_type": "code", "execution_count": 58, "metadata": { "collapsed": true }, "outputs": [], "source": [ "## get.data export a table with parameter values\n", "hypercube <- get.data(myLHS)\n", "\n", "## get.results exports the outputs\n", "hypercube <- cbind(hypercube, get.results(myLHS)) # appending columns of outputs to the hypercube matrix\n", "names(hypercube)[5:6] <- c(\"X\", \"Y\") # cosmetic" ] }, { "cell_type": "markdown", "metadata": {}, "source": [ "And now you are free to use any exploratory tool to identify interesting regions of the parameter space\n", "There is not a single recipe, but a first guess is to try univariate and then bivariate and multivariate analyses.\n", "In some case you can also use linear models such as multiple regressions to identify patterns.\n", "\n", "For instance, we already know that there is coexistence in this parameter space.\n", "But in how many runs?" ] }, { "cell_type": "code", "execution_count": 59, "metadata": { "collapsed": false }, "outputs": [ { "data": { "text/html": [ "52" ], "text/latex": [ "52" ], "text/markdown": [ "52" ], "text/plain": [ "[1] 52" ] }, "execution_count": 59, "metadata": {}, "output_type": "execute_result" } ], "source": [ "sum(hypercube$X>1e-6&hypercube$Y>1e-6)" ] }, { "cell_type": "markdown", "metadata": {}, "source": [ "Which parameter combinations ensue coexistence?\n", "Univariate exploration with boxplot shows that\n", "there is an upper bound of coefficients to have coexistence" ] }, { "cell_type": "code", "execution_count": 60, "metadata": { "collapsed": false }, "outputs": [ { "data": { "image/png": "iVBORw0KGgoAAAANSUhEUgAAAtAAAAJYCAMAAAB8aiEbAAACKFBMVEUAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACWfJIUAAAAuHRSTlMAAQQFBgcICQoLDA0OEBESExQVFhcZGhscHR8hIiMlJicoKSovMDIzNDY4Ojs+P0FERUZISUpLTE5SVFVWV1hZWlxeYGJjZWZnaWxub3BxcnN0dXd4enx9fn+BgoOEhYaHiImKi42PkJGTlJWXmJmam6ChoqOkpqepqqussLGytLW2t7i5uru8vsDBwsPExcbHycrLzM3P0NHS09TW19vc3d7f4ePk5ufr7O3u8fLz9fb3+vv8/f7/0oe0/gAAAAlwSFlzAAASdAAAEnQB3mYfeAAAElNJREFUeJzt3Y2/ZHVdwPEriWbWpoJYuobx0IIobBpSLT6SbkEouUWGFmyGgsaa5UNkoBBuhlELLj2ZRlYCUYtocP69XnvvnXvPw+/u/c2e8/uec2be75e7M87Dmbmf15eZM+fsPbOxAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAzF1VVa0zFLBbV+eyWgMtdxntgda5mO20myfVlrGf0ipaZNW5tGon8VZtocuovzLrXNTWKG94NyyqFlfnsnbe/4QuafdlWefCFutzQpdkoKN4hY5ReeGIYR06SGNLh86l7H5OEbosAx2h9jYodFkGOkJrx4rO5TT2yupcRjuyPVjl1FvrXIh/yxGnFldnAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIAsTz63Rr6sc4gRO2+cuf3w2jjxhM4Rxuy8ceaGER882EfHHGidYwgdQ+eiHtlZ3anuyrzLwftOJHzlm6lLT7y75JM/b/GhdQ5yzZGF6s7Mu7wpGfrUM8nQN/Z9gh84nvLIPalL73hl5kLjQ0++cxGjrnK8dEevu992eqDn0fL7J1P+7x9Sl/7lgcyFjhl6op2LMNC5nr++190NdAwDnctAz4KBzmWgh/aHyVW7/3osdelXfzpzoXMe6Cs+NNDzyLK+A12q83uTH75/+BepS3/3FZkLnfNAx7rnjb3uPuOBjjXjF455he7JQGcy0PNgoDOt8UBfeXSg5xFhxgMd2/n5X+p19zkPdOxWjt94Ta+7z3igYzvflLurKq1k56ra/Kva8wazCj3dt8LV6txTyc5n/1dtnUmbVejJDvSKde6paOdF471Kzyr0VAd61Tr3ZKBzGegYnzvY6+5zHmh7Cs/SuWHO69CxJruncMU6T3egi3/6npUZb+WINeGB3tesQvc04+3QsdZ4oO0pzDSrzjPYU9h6M3zDoYXq472Wa09h02p0nvCewj38U7XjT3otyGa7c5pp555GGOhXHFiY1fbR2Q30TDv3NOd16P6hX3so3wu35N/257oPNeN1aAO9sPV+t/f1o4d+pCrjxZ/qPFTZ7aNLd7706fzDHz7/oyWOlXhb3x9msnsKdz6j7J169D1Yj955INvr8m/61uqizkMV3LFyPp2vrW48kuum38q+6ZHH7uv740x21a5Knm0Yffvoox8rstjLIwf6/DpfW72syLP5koFuuuiL95fxrtQTMNBDM9At11bJ46j19m/J0AZ6aCs80Oe7bhcZehUGeg6dlzHlPYXn8enbQJ+HyXe++mi+z9+af9vEEX2nth3aQBcweue/ee6pEv6zem3noQx0AQa6ZU06Cx1E5yBCx9A5iNAxdA4idAydgwgdQ+cgQsfQOYjQMXQOInQMnYMIHUPnon7l2EJ1vHOl0IPROcifnl6oPtO5UujB6BzOW2EMnYMIHUPnIELH0DmI0DF0DiJ0DJ2DCB1D5yBCx9A5iNAxkp1/fYlfXM33+Dp3Tocu8uuUT/1PMvTffv5wCR+cWOhk50JH9TPQTbGhHy/0aBMLPXpnAx0U2kAPbQ0GetkDoCxx6NYlvLDyA71sZ+vQ52nKR/T5u68fK+HuOQx0ZOdTT50s4e+DD7m2a4+bjB56FV455tB5Jd4Jq9ZpwuihV2KgW6cJo3deiYFeHA1zyqFXYaDn0Hk1Bnrxnb17Xz966JUYaJ3rCn9WqSqht5QNrfNC+Q/fQm8qHVrnLdPbsSL04HQeVuvF456d7YjVPZ3bCn3+dN4Y5YXjg8cXqk92rhR6MDqH81YYQ+cgQsfQeSBbG7/3vl7oYei8y/cUFuB7CltWo3PybIPQA9C5wUAXYKBbVqGz0E0GenjWodtWIrTOdbZyFGArR8uKdN6X0DF0DiJ0DJ2DCB0j2fnNB0t4cJ07G+ggic6/UOqXov4o9QTWpHN6oI8X8a8GuumSIi/QBw9ekHoCa9I5FfoNDxU5gsPJk+9JPYE1CZ0a6FBr0lnoIDoH6Rn60iN9n8CahNY5SM/QHznd9wmsSWidg/QMfZvQeXQOInQMnYv61u5GyxO9FiT0Oekc5LKdr26oPtFrQUKfk87her4VXnOs7xN4dG2/Y2UZA3Q20DG+UGj/77Ov6jzUjAe6v78u1PmlA52HWu+BDrTWA/0zRd4IDx8+1H0oA53r5f3uvtYDvYzbX9/r7nMe6P57sJbx/bf1uvuMBzq28/PX97r7nAe6/x6sZcw4tM5BRt/gv4wZh9Y5iNAxdA4idAydg8wq9LPX9bq7gc405a0cW1u/975+9D1Yy3hdv7tP7Lgcy4jt3NPUjpy0siZ25KSVNbVj262siR3bbmUZ6FxT3VO4ap0nuw5dPrQ9hWetWufpbuUovm5nD9YmnevmvJXD9tFtOu+yHTrXjEPrHGSioS88kPKDG1OXvjp3oQa64zdPpPzo4dSln8kNPcJXI1++8++zs3/X7ZI7U8er+8bTycPYvbPv831sid+ZePGSzIXGfzXy5DunB/pbX5j8QLc8vjsOd2fe5bKHU4ere+K7yaPYHe37BC8+lHI4eelbchcaH3rynYsYdZXjzA0jPniwMUPrHEToGDoPZL/NSWduTb6N53r7ze8PdMvVvZ7sp0fcbKfzQJmbp13fW/r31mfsIZ1DlOucPDukWW0fLUbnIELH0DmI0DF0jrL/ul1PQm/SOczWWnqxxQu9TefVIHQMnYMIHUPnIELH0DmI0DF0DvK+ByIf7TtXRT7alOgMAAAAAAAAAAAwB1X9V4x2TlvX127Y95eRqtpyagtcLLbaGOyRpkXnII0fpxt6N8OAP3fVOK3aF61Y4S06B6ma55v/Hdd//mKhG3FXNrTOQYSOoXOQc4dOnhvsMdfprVDnILUPBq2/Ftc3bzhEheYimxcN+0jToXOQqnW2HXrz5+5cNsxjrtMrh85Bau91te08iRtZt+tF5yCdlbfGj+rDylB0DiJ0DJ2DdJo2o+6ufpUNnVrPWyk6B0mHrn0kH3iXbP2hGqe1T+Kr+OlbZwAAAAAAAAAAAAAAAAAAAAAAAABYMfsf1c9B/4agc4icb0uo9jhPPp1jtI/Lmn0HlqJzkEa3nffE+veEbB+9u/ZdvLu3rDbqhyRuLoM6nWNU7f9T1c/U/lTpG+x1c5p0DtJda6taZ1Kh07fcfCHpLJWzdA5y7tCLctXiNWLj3KE3hN6DzkHSoVtfjbpdu9Z/cYNuaN/tkaRzlKp9tqpftvvKsXnSWXnb45WDDp2D1ApZtytI5yitb13vBE2F7hbv/KFF5zC7K2MZ20cXb4iJVb+quQxadAYAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAGDKqqoa+ynAcAw0K8VAs1IMdJiqEru8s42FjlBVJjpAVQkdYzOx0KVtzbLOMbxyFLddWOjyvBVGMNBRqu2PK2M/jxVnoINU1qFDGOggi88qOpflQ2GQyipHCJvtoiwGWumiVAYAAAAAAAAAAAAAAAAAAAAAAACAJAegjKFziEViqcvSOUaVPMvQdA4idAydgwgdQ+co+6/bPfncGvmyziGKdd7Y/9P3mdsPr40TT+gcoWTnfZ25YcQHD/bREUPrHEToGDoPq/Vu+MjO6k51V+YSDt53IuEr30xdeuLdg/8AQwgIrfPGKC8c1xxZqO7MvMubkqFPPZMMfWPRZ3++4kPrHO6lO3rd/bbTAz2PCGOG1jmI0DF0HsbOpqS9tigJPQida0p23lgkFrpkaJ3rynbe/rtQ6Cs+1OvusYqF1rmh9EDXXj+6eoaelcIDrfM2Ax3EQMcovA69dSJ0zCuHzqW3cmyfFAp95dFed49VdCvH9onOtkOHsR06hoEOYqBjGOggBjqGgQ5ioGMY6CAGOsacB9oerEw6B7F9NIbOQYSOoXMQoWPoHCQR+o2nTpfxayP8fHUTG2idS0iEvrb67WMl/ON9I/x8dRMbaJ1LSIZ+WZGH+tI6h9Y5iNAxdA4idAydgwgdQ+cgQsfQuah7Ty5U93auFHowOge56fhC9cnOlUIPRudw3gpj6BxE6Bg6BxE6hs5BhI6hcxChY+gcROgYOgcROobOQYSOoXMQoWPoHEToGDoHSYYu84W5L6xzaJ2DJEOX8eI6h9Y5iNAxdA6SDF3ml5GfWefQOgfxYSWGzkGEjqHzQLZWq/a+Xuhh6Lyr/Fd/bOydWugh6FxX/MuZWmcbhB6Azg0GOoiBjmGggxjoGNahg1iHjmErRxBbOWLYDh3EdugYBjqIge647mjKPTenLv3ABZkLjejcejf88ImF6u7ObacQ+sojKcfek7r0XblPNyD03Dr/2VMpLz6duvTbF2UudIQXjo/fv1B9qnPlFEI/kPyXvi+dSV369OszFxofevKd056/vtfdrXLkmnFonYMIHUPnIELH0DmI0DFm1flrl/e6e8kdWLv2uMmsQj9xZa+7l9v1vWKdeyq6A2u/Gwg9CJ1ryu763ud6oYeh8y7r0EHWeh363uQulP7++ZWdhzLQuQ79WK+7r/VAP/rnyZ2vfX246u4/NNC5/vcdve6+3gP9sSIPdvksBvr+bF9/Mv+2/2GzXYOBLiER+jWfPZHt1DP5tz3xi32frIHOYaB7uO30QM8ji4HOYaB7uOZY3yfwuSWOq5n+13Zp//7jnYcy0MNbtYHub5lP37/z3tl++jbQQcYf6PUIbaCDGOgYyYF+88ESHjTQ5+/SI32fwJqETnS+qtDxoRO/7bWxNp37DvRHem/lWJPQqc4/m/+q+wf/ssRL9IWpJ/DYg8nfh+3r9ybWefzNdms80Evo3/nxUu8H0+o8fmgDncNA5xo9tIHOYaBzjR7aQOfo39k6dJb+ewoNdA6dc9kOHUPnoq7fecuo7gp/8KaVDq1zkC/ufKld9dnwB29a6dA6h7OnMIbOQcbfU3jXgRLeOrHQ43c20DlsH800emcDncVAZxq9s4HOYqAzjd7ZQGfpH/rUt/N/b3wJfzWx0KN3NtBZ7MHKpHMQe7BijN/5jw+V8KsT6zyB0AY6xAOFPqq88OrOQxnoAgx0ywVLbMT/71/Ov233WI2zHmh7sDKN3nkZMz6gjz1YQUbvvIw1HmibkzKN3nkZBroHA53DQOcaPfSjn8r//fwr8m/6DgN9/r7/tl53X++B/lqhzUk//MnOQxnoTC/vd/eyXxq0ae/rR9+D9aoljqBy1RK3TXzTetEvDZp650Alv22sap52jb59NFDJL4RsnnbpPIQqebZB6AGsWueL+h0W1UDnmuq63ap1fva6Xnef80DH7sGa6qfvVes83c12xdft7MHapHPdnLdy2OC/Tedd670dehkzDj3Rzhcn/5HzC7ekLv353IUa6K4Lk/9U8Qc3pi7t/oPcPRjojseW2FX14iWZC43o3Ho3vPzwQvWJzCVccufxhG88nbr0+Dv7Pt+5hp5b5/QLx8XJS38id6EjvHDUftU6+YUcCZc9fDLhie+mLj15tO8TTL8VHk5e+pbchcaHnnznIkZd5Thzw4gPHmzM0DoHETqGzgPZb3PSmVvP89d9t7z95vcHuuXqXk/20yNuttN5oMzN067vLfHpa/Ye0jlEuc7Js0Oa1XboYnQOInQMnYMIHUPnKPuv2/Uk9Cadw2ytpRdbvNDbdF4NQsfQOYjQMXQOInQMnYMIHUPnIO97IPLRvnNV5KNNic4AAAAAAAAAAABzUNV/xWjntHV97YZ9fxmpqi2ntsDFYquNwR5pWnQO0vhxuqF3Mwz4c1eN06p90YoV3qJzkKp5vvnfcf3nLxa6EXdlQ+scROgYOgc5d+jkucEec53eCnUOUvtg0PprcX3zhkNUaC6yedGwjzQdOgepWmfboTd/7s5lwzzmOr1y6Byk9l5X286TuJF1u150DtJZeWv8qD6sDEXnIELH0DlIp2kz6u7qV9nQqfW8laJzkHTo2kfygXfJ1h+qcVr7JL6Kn751BgAAAAAAAAAAAAAAAAAAAAAAAIAVs/9R/Rz0bwg6h8j5toRqj/Pk0zlG+7is2XdgKToHaXTbeU+sf0/I9tG7a9/Fu3vLaqN+SOLmMqjTOUbV/j9V/UztT5W+wV43p0nnIN21tqp1JhU6fcvNF5LOUjlL5yDnDr0oVy1eIzbOHXpD6D3oHCQduvXVqNu1a/0XN+iG9t0eSTpHqdpnq/plu68cmyedlbc9Xjno0DlIrZB1u4J0jtL61vVO0FTobvHOH1p0DrO7MpaxfXTxhphY9auay6BFZwAAAAAAAAAAAAAAAAAAAAAAgGj/D/YOc+NIoLvrAAAAAElFTkSuQmCC" }, "metadata": {}, "output_type": "display_data" } ], "source": [ "## Create a logical variable to flag coexistence\n", "hypercube$coexistence <- hypercube$X>1e-6&hypercube$Y>1e-6\n", "## boxplots\n", "par(mfrow=c(2,2))\n", "boxplot(X0~coexistence, data=hypercube, xlab=\"Coexistence\", main=\"X0\")\n", "boxplot(Y0~coexistence, data=hypercube, xlab=\"Coexistence\", main=\"Y0\")\n", "boxplot(a~coexistence, data=hypercube, xlab=\"Coexistence\", main=\"a\")\n", "boxplot(b~coexistence, data=hypercube, xlab=\"Coexistence\", main=\"b\")\n", "par(mfrow=c(1,1))" ] }, { "cell_type": "markdown", "metadata": {}, "source": [ "Bivariate plots shows that coexistence is possible only if both coeficients are less than one, roughly (blue dots):" ] }, { "cell_type": "code", "execution_count": 61, "metadata": { "collapsed": false }, "outputs": [ { "data": { "image/png": "iVBORw0KGgoAAAANSUhEUgAAAtAAAAJYCAYAAABLtNEpAAAACXBIWXMAABJ0AAASdAHeZh94AAAgAElEQVR4nOzdebxtc/3H8dfBNc/zkClTmTMmUyFkzNikDFFIURIyJUTJHAmFokRISYUkEpmFMmTIEDLPXfde798fn8/N/p2799rnnrP2Wnvv834+HvdR9nfdsz733nP2/qzv9/P9fMHMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMzMhmyg7gDsf1YApqo7CDMzM7MOGQ/cVXcQZXAC3R1WAW6pOwgzMzOzDlsVuLXuIEbKM57dYer832mAt+oMxMzMzKwDpgbG8k7O09NGYwKtgjHPyJuZmZlZodGUQBclzoOvcSJtZmZmZk2NlgS6MXkuSo7V8L9Oos3MzMxsElPUHUDF2iXFTprNzMzMrNBoS6DNzMzMzEZktCXQ7eqgh1InbWZmZmaj2GipgR7g/9c3D+V6MzMzM7NJjJYEGt5Jit3GrgcJVgY+DCwNPA3cCVw8ED0lzczMzCoz2ko4IJLkVr+sywimEpxBnNS4FTCBSKK/B9wrWK7O+MzMzMysHh8gZsb74nSeMgm+I/iPYI1Br88kuFDwpGDWuuIzM7P2BB8QnCO4XfCA4BLBpzU6J/JGq6mJXOcDdQdi3W1GYLYh/toIJ9CTEMwpeEuwZYvxqQUPCQ6sOjazwQQzCuauOw6zbiM4QDBecLHgy4LdBKcJXhH8RjBN3TFaJZxA9zkx8m4ciwFvN3ytof6afoT37SuCrQQvCaYsuOYYwdVVxmU2kWBKwVcE/xS8LZDgOcEZgrnqjs+sboIPC8YJPtpkbDHBE4Lv1BGbVa6vEujRtImwSg8ByzP0p+qtga/jpazB5gCeHYi651aezuusSwgWAZYlvp/vGYCH642oM3Lp+SJgXeBbwHXA68CKwH7ALYI1B+DJ+qI0q90+wHkD8MvBAwOxgrgf8cB56AD8t/rwzKyXfZ54Kpux7kC6iWAzwasqKG0RHC/4bZVxWXOCxQXX5izsK7l6IMENgvfWHV/ZBLsIXhYs1WRsWsFfBJfUEZtZtxA8K9i+YHzWfJ94X5VxWS36agbaM57Wza4juqN8otmgYCbgYziBrp1gQeB64E1guQGYeSA2dy4NPAdcJ3h3nTEOhWB+wa6C4wRHCLYVTNvi8l2A0wfg/sEDOZN2ALCFvEJio9t0xMpMK2/k/7qE0ayLNdYbt7umSp6BbkGwf85Cb6OGVoOCd+Vs532KN2irUe6uv1EwpsnYlII/Cn5eR2xDJdhL8F/BvwSXCa4WvCh4TE1mTAQvKFortvp602RddF/MtpgNh+Bvgq8VjL8vf07mqzIuq0VfzUCPJs027RVdVyUn0C0IBgSHCsbmZpMrBXfkppS/CBaqO8bRTjBFlmxsV3DNpoI3i8px6iT4pKLjy06DHtRmyA2BL2Vtd+PveU6xf6HV15w2E4M1Wl1jnSFYTnBSPrjdmg94Tbv5WGcJDsqH0NmajA0oOnP8qY7YrHJOoHvQ4KS4KIl2At2Fcsb504IjBXsL1pYPv+kKinaDUmwcbHXNu/OaBYf4NadpNpvdCfkh/qjgkILxPysO9Gl8/VrB8QVfd/1MyidJHKxzBHvkA/bVgm8Ivio4Px/gLpA3z1cqH0LvFNwt2EAwXa5KLavo5f+KYtO99T8n0D2oWVLcKol2Am02GfIDUUWlCrlMK8HsBddMIzhE8I9MgN4S3CPYt5NJj+C97ZJ7Rd/aRwe99inB64quG4Ovn1Fwm+CnHQjZWhCspeg3/JkmY8sKnhF8s47YRjPB7IIf57/NeEWplBRlX06eRw8n0D2o3Wxzs9npKjmBtp6mOF3s6ILxQwT3FYzPoCjJeUJx0MJagg8qDmD4j+D36lD5h2AdRalFUb/xTTRoI1TOTP9YUaN/eM44r54zoPcr6vN9sEqFBL8U/KxgfEdF55SuLCWqW/4criLYUPCuDnz9mQVrKHpDz1/217eu5wS6BxUlxYOTaCfQZpNJUUP8puDDTcbWEbwm+GzB7/+24BHBPE3GFsmZw/3Ljju//sQZ6JYJQ7MZ6Hx9QNG14zZFnf7bit623xXM0ol4rbX8PmnatSfHZ5dbpk0iV0xObfgefjP/nu4QvL/u+KxvOIHuUUNNop1Amw2D4Fu5PPtLwYGKDioXK8oximqFp1RsyNup4Jp9Bf/sUNwDis4bBxeMX69BNdBNrptK7ghTq3xQ27RgfKpMENeqMq5uln8nf8oHv80ymZ5C8B7BjzKZ7qq/L0W7yU8KvinYJx/SvSem+zmB7lHtEmMn0GYjJFhT8ANFOcZNgjMFH2zze96Vs12LF1yzWl7TkV6xinrmtwSf0f/vwjG94HTFsv+inbi3lUdwr2DfgvFlNRmbWUcDwecFzwsWaDF+puCequNqRVHW9V/BvxUbRe/In92/+me06zmBttI5gbZRS7BQJjUtD1pR1GVKMEMH4/hSfjA/KrhE0TLxBcHjgjU7dd+RyqTwGMFvFLXi3xWsUndcdVDUoj+kOGSp2fhPBH+tOq5upmj1d2zB+MSfz5Zddqqi6MD0huATgx50F8hk+p/y52g3cwJtpXMCbaNWLiG/KPhkwTV7Cf5VQSwLCD4nOEFwlGD7bi7LEHxFUSJzneA7gqMzkRgvOKLu+Kqm2KT2j5yNXFV52q5gQcFZmXytVnec3SQfGHdsc81Lgi2qiqlFDNPnStDnWozPoCjF2q/q2GzInEBb6ZxA26imOPTifjU/bGFeRXeOw+qIrVspDqd5S3Gc/eCxjRW1q5O0c6uSYGrB1wS3KFr+vaCot92hg/ecV1GH/3be89mcQb1X/uCeRD5w7FEwPmWuzEyyQbhKis4dbxY90OYD5DVVxmWTxQm0lc4JtI1qglkEdwkeFOycZQkrCnZXnGL2526eCa6D4AbBKQXj31BB68AR3HcuRa37IirYuKXYjHaD4ClFG8ONBVtlicnritMBO7bxS7HRbCPBtooNcVN06l69THCu4FcF4x/OVY45qoyrSRyfFjzW5po9BH+vKiabbE6grXROoG3UE8wkOC4TLuWvJwRHCKatO75uoih7mSBYr+Ca5fPvcK6S7rmR4mAbNfx6WvDFZomw4ERFPfK8Tcbep+ifvVMZsdnwCVZWlPzs1GRsPkU/8x/VENrgWDbJB6+WJ5QqauCvrzIumyxOoK10TqDNGgjmaFbOYSFn7KUmpyA2XLNgXrNYCffbPpOskwTLZGnGoopNXa8IThh0/TT5+iTlJQ3XHCNv6OsKudIzTnC5omXkzvkA9Hyu/jTdlFlxjLNkCcf2LcanUpSjHF51bL1K0aLz/Yp9H19WHKDTkU5HyQm0lc4JtJkNWX7wvSzYruCa9RQ10iPqXJIrA88Jvt5i/IM5G75aw2tLZ/I+ycE4DddspKitdf/eLpCrAmcJbs2Vg8szsZ6q7tgmEhyZ34trDXp9BsH5ioN0ai016RWKA6TuyAfj+xWHQb2Zf4cf7dBtnUBb6ZxA2yQUrduOVLRUO1fRccFHQxsAimPEr1eTI8gzwf6V4Dcl3Gc7RReGlsdfC64SnNjw3xPLR2Yv+D3r5ayna5NtSBQbGk9VbBC9WXB2fp8/pzjJ1CdMDoFio+1TgssE8zW8Pp1i78Q4dWbTqBNoK50TaPufTH5OyFm96wQnK04EezATmc3qjtHqp9jE96zitMcFG16fR7FB7xWV0LtXcarkX9pcc6zg8ob/nklxLHTLD2FFdw5v+LLJlrPlB+RD5HGKDYbeZDxEilKs29Winjw/c+7uwK2dQFvpnEDb/wi+msvz6w56fQrFJpk3Be+tK75epaiR3FPwh1ymfCRnr1oe/dztFPXIt+Vs7+OKnr4S/F0l9TvOlY/b21xziuDiQa9dILhRME2T6+dTnCR3QBkxmtnQCR5WcevCpfJ9ZJGSb+0E2krnBNoAEIxRbNzZveCaKwXnVBhWz8ulyWtyqfeYLEvYSXFM8VuC4+qOcbhyxWIFxXHkOyq6KpRWFiFYN5d0J+mmkeNTZMJ+0KDXF1AcbHGzYAvFke2LKY5Lf1SxOc3dVax2gtkVrTMnedjrR4q9BxsVjE+dCXTZia4TaCudE2gD/tdSql3t6K6CR6qMq9cJjs+k7V1NxtbND5Rt6oit22WCfEfO1jebTT5E0ZJu/iZj8wrOU5wAOLH13YuKUxO95G61yvfShxu+N8crDvpZte7YOknRfvJTBePz59/H0iXf2gm0lc4JtAH/21g1XsUHVGwpeKnKuHqZYFpFPfDHC645WXBthWH1lFzSfVJxmt8BigNR9lJsHnxTbXbtKzZ/LS5YqKqYzYooaqdfV9T4Ly+YW7C24KeK+v31644RIH9uts1kf80yZskV5VVFh+fso9hkWPYGXyfQVjon0AaA4sQ0FSUain6d91YZVy/TOx0h5iy4ZgvBK1XG1WsEcyqOSv6roszob4IfyvX41mMEayg2aX+oxfgJWX7UsvNMp+XqzeX53vWc4IGcXPm3YKsRfu0V8yHhwMGTNYqTJ18TfGFkf4KmnEBb6ZxAD5GiRng7wbdzafhQwdp1x1WmfKP8douxaXIWsOm4TUrRDlAq+PlSHCDw3yrjMrN6CL6vghaPgpkVZV0bVhlXw/2nz/f5vwqWa3h9Jr3TZm7zEd5j61yZu1/R//sUxb6ECYJjRv6naMoJtJXOCfQQKDYg3aPoUHFF/tBfl0/lF6lPNiQJNss3yK83/pkUm7CuUHRb8GEBQ6TYIDResGbBNV8T3FNlXGZWD0UnnsITCwV3Cb5YVUyD7v21fJ+fucX4txRdhEZUYqHohvNVRTvAiwXfVMHppiVwAm2lcwLdhqKO9UHBbzXoiGfF7ulHBWfXFV/Zcpb9OUWN3q35Zx+v6GiwRN3x9RrBrwVXq8mpaoK5FPW9TU/a6xc5q/VVwe/zw/emnHXy95ONKvkz8K021/xdBa3eOknwl6IEX9Hr/W3BSlXGVQIn0Fa6jibQimNO52t/ZfcSfF7Ru3emFuNr5hvK4lXH1in577aRog/vboLV5GOPhyVXL/6TSfQ6uRQ6Vy5jPpAPJn3bFSJnmu4VPKEof9pRsRnwOkWHjE4d3WvWdfJn4MaC8flzwmKNKuNquP9jgh3aXPOSYMuqYiqJE2grXekJtKI37B6C+xQ1TRPbR50nWKCs+1RF8HPBmW2ueUSwW1UxWW8RLKrYlDPx50GKDhLfa/Vg1i/yweEGwSxNxg7JlQ53yLBRQbCkov/7JJ8Xin02lylO6qvlmPl82G1ZPqLYCzNOLTZBdjEn0Fa6TiTQ5yg2CByYM5dLZVnAX3Imt6eWbRXtso5oc82Ngv2risl6U5YyrCJYWi2Osu0nguXyYeE9LcYHFH2ej6w6NrO6KNrCjRP8THEI0fqCL+TPwtOqsbuM4HTBHwvGt82H/5lydWlDwfaKcsZakv4hcgJtpSs1gc5l6TcF72syNpXgd0U/nN0oZ85/XDA+oKhj3bHKuMy6neCzgofbXHO04MqqYjLrBop2dpcqNuyNU9Q9nyKYp+a4llR0ATlUk7aZW1bRo/l7is3zbyvKsJ7JB+UHunhm2gm0la7sBPpywRkF4xNnpN5dxv2qIPikouar6RubYPNckuu58pQy5ezqxxS7tI9X1E5PckKcjR6KA0/ubnPNwYLrq4rJzIopDsx6RdEN5GTB4Znsj83E+W9ZZvL+ibPOORt9cl6zbt1/hiacQFvpyk6gHxLs0uaa1wSblnG/KihOMvur4DbBkoPGNlEc7NCp3pU9QXGK1pP5d3Flvtn+K1cjOtEU33pA/ny8Lpi+4JoLBOdWGZeZFVO0Lj1E0WLuGsGpgo0F+ys2BM/a4vd9X93ZltMJtJWu7AT6QcFn21zzumCTMu5XFUXXhN8rdkffq6iLfiz/+1h1d+1XRymOe30132Cna3h9QLBzzs5/rM4YrR6C6XJ599AW48vljFVPvR9UTXHU82GKXux/E/xC8EX1cfcW606KrkFNf55zfFEV7HuokRNoK13ZCfSlgnMKxldW1E315K57waqKDiNHKNpxLTKMrzGF+qjvtuBswR/Vos2d4vSqh1uNW38TbKOo8TxWsGi+NquiNOppwQV1x9jNcpn8P4oa2W8LvqSolX0qH+ZHdemYVSsfiLdvc82bgo2qimmInEBb6cpOoD+SM45rNRmbVtH79bdl3KvXKE75uz5LWJQlD+f06sPERPnn2KlgfOKMRE91X7HyZCnHg/l98Eb+72v5INr33UiGSzBLPmScoUEH8eTYdYojkP1wapXIyZBdC8any0mySXKAmjmBttJ1oo3dSfkE+m1Fi5vVFW17/qaoi12wrHv1CsXR2OMUmyw+kjPxOyj64z4vWK7uGIcrl+A3LBifOhMmv3GNYoqSnkUVdZQrCqapO6Zul2Uaj7X6uxIsrDZHxVtvyRXKxfKhcyXBtHXH1EjRlepXBePb5UPyDFXGNQROoK10HTmJUPAJxXG9b+TT6COK1jdzlHmfXpDJ8gQ1OblJsUHxF4r+nz05i6TYULJTwfi7M4Hum5Mazaog+KngrDbX3C74alUxWecItlBsxJdir1DXrdRkUj9eTY4aV7TAe0Lw3Tpia8MJtJWu00d5T6GCHfgl3WOeTNi/KdhXsJ66aFOfYlfy7wrGF8gEe7Uq4yqL4EeCa1s9AChaID1UdVxmvU5xKt3xba65VnBYVTFZZyhagI5T9EVfKF+bJT/bnhH8rO4YJxLspOgVfV0m9/sKfpITZr9UJKvdxgm0la6jCXSnKTbUvKGoE7xacGv+YN8lWKru+AAUdc8Ht7nmn2rTvaRb5XLjK/mgMH3D61MoSnfeUptNJ2Y2KUXJ1xUF41MoNhPuWGVcVi5FD/1nBQe2GF9eUSq3cdWxtSJ4j+C4/Ny9RXCuYsNwt66kOoG20vVsAq045WxsPg1P0fD63IJf51LS7HXGmPH8WXDQoNdWURw2cqXidMYXBd+oKcQRE6yVf98vKlr8/UpRu/lms6U+M2tPsE7OSq7UYnznXOqfu+rYrDyKw7heVUG9s+IAk7OrjKvPOIG20vVkAi0Yo2jttG+L8WkE9wm+WXVsTWI5Q/Drhv8+QlFDdpXi1L5TFHXiEwRfqzPWkVDsvt5OcGTOTOwqmLfuuMx6meDHuYS/nXIzoWBmwZdztW3vumO0kRHsLbizzTWHCa4t8Z5dU+ZYESfQVrpeTaDXyISz6WlIec3XBbdUGVeLON6fsW4o+HTOym6cYwOKXc33CrbNcodJNhua2eiUkwVHK0rVxmfJhnLJf7e647ORE3xO8GCba76jEbaAFSwiOEtRMjhB0RXrIsH7RvJ1e4QTaCtdrybQHxW82OaaHQSPVxVTkZxp/q/gOUXv56Xyz3CV4GXBynndiYKb6o7XzLpLzjqvKfi4orOP2wB2Ob3TunEtwVwF162Qq5BLthifQtEG9vARxLK64CVFSeFugnVzQufSnLjZdrhfu0c4gbbS9WoCvXbOxrTs8CH4artlsSplSYMybmXifLEaDhjJN7UJ6s5dzGZm1kYmzvsoygzV8OseteiZL/hDJrezNPlahyva2Q3r1ElFSePDgh82K90QHKCowZ5vOF+/RziBttL1agI9bSagTTtX5BP7bYLjqo6tlVw+k2CJVm+Eit3WUhdsfjQz6xaCVXPmdF/FYVQz1R1TK4p9LS8L9sr3/TGCZRRdVcYLtmnye+ZTHNf+RJZr7KwoQ7whk+fNRhDPlvk1Zm4xPoXgfvXwHpwhcAJtpevJBBpA8LV8k/rwoNenFZyp6Agxf13xDabYZDd2cLyDrtkmZwK6tRWQmVllFG0yb8zE80FFy7TXBC8IPlV3fIPpnf05TY+yFhySM9OTfOYq2tntK/it4kCVGxQn+757hDEdKriuzTVnCM4fyX26nBNoK10vJ9AD+aT+tuI0rnMVTdz/k0/xa1QUw8aCYwWXZ+K+R6vZEUV7t980S5AVpxJeJ/hJp+M2M+t2gtkEjyrafS7U8Po0ihK9cYKt64xxMMWJuy03+2Xsrwi2qjCmwwV/aHPNaYKfVxVTDfoqgR5tLVSsZAOggVhyWg64AHgbeBjYD1hqAG7s5P0F0wG/BC4DlgbuJ/p4Hkwsxa3S5LftT8xM/Lhxdjw/HC4E3gsc0sm4zcx6xFeAscAWA/DYxBcHYOxAHBd9NNFPv5vyicUo2HszEH+efwCLVxZRfDatoOLjwFcB7qsoHrO+0LMz0HVTbMh4RINOPMwSknMVvVtna/L7Vhbcrah1fkzwZP7/WwXLVvcnMDMbuqyV3UVx+tzTgsez3GC7Dt3vDsWkQ6vxefO9c4VO3H84FMevn9Dmmr+pwv7dig4uz6nFibiKHuPjBn+W9Zm+moG27lBJAi2YStG6bcFO3qcqggWzzm3dFuNjFL02Wx3NOiBYUdFq7xOKzYOuezazrpTvab9S7Ds5TvAxwacEpyp6VP+o7PewnITYvs01rws+UuZ9RyLrje9u9XchWEBRz920RrqDcW2dSfJZgg8I5snJnKMUbexaPqj0CSfQVrqOJtCCdwl+ruiBPLGVzwv5Q9vy2NJulx8cT7e55ruC31UVk5lZpyg2vz2tJqUHgpWyrrfUg10UnSH2LBifUbEHpuP7XYYqP/NeExzUZGxaxR6YW+soO1EcDT9xQ2Zja72OrCB0GSfQVrqOJdCK9j3/VvS23FQwv2JH9c659HeNerTfsWBPwT1trtlfPhTFrO8I3pszsJ9THG7Sk+9jQ6Uo3XhKsEfBNYcL7ir5vj8Q/KlgfJecEe+qQ2VytvdNxebHvfK/DxTcl599VdY/N4tvWsHSatHWrk85gbbSdTKBvkxwrZpsXMin9GdVYR1YmRSnCL7c7M/WcM0PBBdXGZeZdY6idOsPOXP3tOCBnM17QiPo09vt8s+tosRPcbjV22U+TAgWV5SHHCOYctDYWopWpV8v635lygT1h4p65+cEN+XKq3v818MJtJWuIwm0YA61qfMSHCa4rcz7VkWxKeNVtT7IZe4sVdmp4tDMelrOju2gqLM9T3CwYPUuiGsWxb6GP6lhs1W+FxylqC9t2eO9l+XKoVSwh0Vx0IkEM5R8743yvfQhwTmKw0j+pNiD8j11VwcO615OoK10nUqgV8830+kKrtlU8FqZ962S4qjWN7IkZcqG15cT3Cn4q2CqOmM06yX5s/OQ4PlcwTpLcZjEBMHZRSs+FcT2TcVBHtO3GD9R0Z6s7+RDzeuCzQuu2U3wZIfuP6dgb8VGxUsERwpW68S9rG85gbbSdSqBXjkT6JY1VlkG8WKZ962a4CuKDSOvKDaGPJZ/7ssEc9Ydn71DsIXgQsE/FH26L+znZfdekzO8T+a/y4yDxlZVlEwcX2N8f1PBUceCRfNn/z1VxlUVRe/6v6pJvXH+2z0o+E4dsZkNgRNoK12nEugZcnZ2y4JrThJcW+Z96yCYXbBZJtM7KA5DsS6haBl4lqITzNmC3fPXOYqj1U+XWwjWTnBAzj433RCWK1bjBHNXHVve/3nBtoKFms2E5/fZW4IN6oiv0xSbwB8T/EWwgWBWRane5vlwcY9glrrjNGvBCbSVrpObCH+g2HU8yUys4P2KXcofK/u+Zo0EX1Bs+JzkZEhFqdErgs/VEZu9Q9GxoOUMpqITxAuCbauMK++9Tj6AjctZ5rGK7kIfarhm5hzr29KCTKIv1P9vgzZWsVnOm+OsmzmBttJ1MoGeWXCzYof6QYKNcwbnxEyeT/PMX7UE8wk2FHxccXjLlO1/V2/LpeWmB9rk+CGCv1cZk01KUQK1b5tr7qv6YUdx0NF4xQbCmxTtOdcTnJGvfyav20ld2FKtEwTTCN4nWLbZbLxZF3ICbaXr9EEq0yr6X96q2ITynKINVOHpUlauXGq9QLEZ6w1FPalyybwvOwcACGbLP+eKBddM7B4wU5Wx2f8nuFxwUsH4mFwt2KLCmObKpPir+cD5lmC/hvG9Fd14Nsr3tkOris3MJosTaCtdJUd5W33yIeZ2wV2KI1ynyNfnERyfSUHHkmjBhxT1radmIrJqp+7V5N7zZ3K8ZME1S+c1tdTWWlAcTvS0WtTRCj6TD+GV1dkqauUfm7hSI9guY7hT0U7tqPzvCYoOEX2/omPWo5xAW+mcQPc5wZcVp4jN0WL8RMWBEKWW0+Ts3TWZoN+YM+C3ZrJxkVq0Ays5hqlyhnDrgms+JnhJ7idbq3zQu1dwvWDhhtcHMnF9VbB/xTGdpEGHISk2ER4quFhwleK46V9VGZeZTTYn0FY6J9B9TrHZ6ciC8QVyBnb5Eu85haJ/76lGr9kAACAASURBVG2CRQaNLZ+lIxeUdb82sZytaL81yQlpmbTdJjizilisWH4vXqfYrHd3PoD9W7FR7ZCyH/KGEM+JgkvbXHOh4NSqYjLrJvmAu63gfMEdikNuThEsV3dsgziBttI5ge5zgscFO7S55hUVHJIwjHtukUvbC7QYX1Fx7G/L2uQSY5k//w6uFawhmDp/rZnJ2r8E83Y6Dhs6RanRFxSHl3yy1fdRi99bWomHYJdcvWm6US5XOB4X7F7WPc16Rb6PXprv9efkauchgqtz5fHzdcfYwAm0lc4JdJ9THByyZ8H4mJzx+1Cra4Zxz+8JLmtzzR1q2JDVSbnsfnkm7ePy19uCX6ngeGLrDYL3ZlnQs7ma8kp+iK87wq87q2Jz4FEtxg9TtNZrWh5l1s8E31YcfrRUk7GdFF1q1qgjtiacQFvpnED3OcXmpt8VjG+p6HFb5szdBYLT2lxzuSo+uUxx6M06grUFs1V5726XS7GLCjYRrKYeeU8QrJszYL9V1EqvqDjc40f5Ab7rCL/+pvnzcZlg+/y72U5xpPRYFRwWZdavBNMpTuH9eME1FwouqjKuAk6grXROoPucYLmccd2nydjiii4DLduHDfOepwxhBvrOqmagrZjgg4oNfMpk9O1MGk9WBZs9h0tRw/6Y4Hstxj+v6Dm/yAjvs0ImzP/Jv6NnBb8UvG8kX9esVykOoVLRg7aic87jVcZVwAm0la7UBDqXUj+XSzt7ClYq4+vayCjqSN9UbOw7SrCv4MeZLP1aMG3J99tM0W/6XS3GV8okbYUy72uTT/BhRb3iqYLF8rUZFHXsj2QpRFe2ZxN8VNGdY4aCa+4SHFLiPbv2gcKsKor2pONV0L0ofz5fqDKuAk6grXSlJNCKk6l+lEnRA4Lf5IzWhJypqax3qzUnWELwHUXrrVsE5+ZSdOmdDbIc4DpFnfNig8ZWysTs/LLva5NH0S3lIcEJLcYXUhwksmPVsQ2F4GDB9W2uOVVwYVUxmY0GgnfnDPQk9c8N1xwouKPKuAo4gbbSlZVAn6PYjf6BQa8vm4n0lZ1I1KyzBNPnSsL5inZ45wn2GMosnOL0w6sU5SO3KPrm3pkPWT8TTFfFn8Fay2XYCSo4REZRjnNFlXENlWLH/3VtrvmeuqcO06xvKPr6n91ibFZFedVBVcfVghNoK92IE+hMkt8WrNZi/N2KesqNh3sPq55gMcUhEU8JzszZvjMVp8XdJ1h0iF9nbcF+inrafeSynq4h+LjgqTbX7C74R1UxTQ7BNjlD3vJhTNHn+xsVhmU2Kijagr6ZnwsL52tTKdpQ3q7o5d6yvKrJ1+tkqZgTaCtdGQn0foK72lxzheDE4d7DqpVvgncrOhvMNGhsZsHvFbWlU9UVo42cogPLy0WrQ4p6+durjGuocoXkScF3W4zvqOiUsXjVsZmNBop++vdkOcfzOVk2QdGBY64h/P6ZBcfk581biraRV6vEcwmSE2grXRkJ9HcFv25zzemCnw33HlYtwVaKzVmtjv+eS9HCqO9beAmmFCyZM+l91e9XccjMBMHaBdf8QfD9KuOaHIpNkP/NEqFNBUsJ1s/SjfGCveqO0ayfKfa8LJmfGxsI5hni75tPsWfqgVydXC9XlU7NZLpp//VhcgJtpSsjgT5AcEuba36pFq2mrPsIjlObulfB71RxH+cqKQ6Y+UbO0Krh163qozdhwU9zBmmSDz3BXooa9mXqiG2oFL2fr8iHPuWs81/ksjGzrqXorX5TszKPfDAeL1i/pNs5ge4javKrDmUk0KvmLNbSLcbnzdnKrYZ7D6uW4Ay16ZKh2AjYtTOTI5EzKr8QPJNlAPNlQr2CotvMWMF6dcdZBsEs+SH2rOBEwa6C/XMZdazg03XHOFT57za/XFpkfUDRw3+XnKTaWjBn3TGVRbCAYu/U6gXXnK/yNgA7ge5BzZLjZslzXUl0WV04LlMcGb3koNfnF9wo+KsK+kVad1F0N7i5zTW3Cb5eVUxVyqXINwseCk9WtH/ryv7IkysfDvZQHG3+QCbUp3X7zLNZPxLMnSsqbwseztWUFxS99b9Wd3xlEHwk/zxF+y8+J3igpFs6ge5BgxPjVslyXUl0WQn0TPkDP07wJ8HZOYP1Zv7wz1tOuFaFnPmYIFin4bX5BF9TtLL7c765tzzGtZcJLlKL9kw5PqdieXHNKuMys/6WD7O35a/3Nrw+hWAHxeFX+9YZYxkEmwteaXPNzoKHS7qlE+ge1CqBHsq1VSj7JMIP5ezluYIjBJt45rk3KTZhPac4bGVrwSuKtnYTH4yeyCT7xKJZhF6kOABmkqPPB13zqLr0gBEz602Czyq6WTQt1xDspCiJ7OnDyRQHe7U7iOU0ldeD3gl0DxpVCbT1D0X3iSMVHQ6kqJH9by67fTPH11Fssuv5GZFGirKjA9pc84zgY1XFZGadoWjn+BvFwR/PCa4VfFE11NILLhWcXjA+Jt9zP1plXJ0guEHRYGCSSTbBMjnbXtZ7rBPoHuQE2nqa4OeKGvZdFS2KZh80vkd+6PTNxq2cfb+mYHyFfKhwf2Hra4pe28u3mhHtdYKTFJtlT88SiW0ERzUk0m1PXS05npsE+7e55l7BnlXF1CmZJL+Qq5obK/ZMLZMPL88rekmXtbrpBLoHqeBXq2uq5ATaCuWszM4F43NmMrlilXF1Ur6JjxN8rsnYzPkh15XHW5uVQXGa3F8UZVoTWzg+Iti17tjKItheUY42yV4GRZeIRwXHVxzTbwXHFowP5OrXJ6qMq1MUJ95e2rDSKUV54H4qd5O2E+geNLkJdNWcQJdIsJCiXnhPxWEOM9cd00gpap9bngql2NwyQfDBCsPqOEUt4jhFh5k988P2cMG/BH+XN8Zan1J0SHhLcI7iuObZBcsKDlQsq/dF/3fBdSo4IVdx1P0rgmkqjGl/RYefqVuMr5fvtwtUFVMVFKffLtnBlQ4n0FY6J9AlyFnJ8/KN7QXFwRRjFbVqPX0SmqI94d4F4+/OWYMlW13TqwQrCX6c/55PKzrMfF1NGv+b9QPBdIrj0Y9pMb5Bvs+tVnVsZVNsxtusYHyufG9btsKYZhU8peiBPN2gsWXyAf4HVcXTR5xAW+mcQI9QzsD+UXCfYI2G18cIds8lwi916N4D+YF2pOJEue8oavhKq0fOr3lPq1kYwfGCf5R1PzOrj6K92GsqqP0V/F5wcpVxlS3fO8cKPlxwzUyZQK9UcWzvy0T5KcEFik5HV+aK2C8E01YZT59wAm2lcwI9Qrm0/6pgwRbju+b4rCXfd2bFcdpjFZswvq/YSf6qog3bQiXdZ07B44ravAUbXp9ecGi+qfvIZLM+INhXcGuba44W/K6qmDpFsRlvv4LxdfL9bbYq48p7z6AoI/u+4JL8O++L009r4gS6z4mR10EvCNwLPDTEX8/mPWca4X1HrZz5PbdgfCrBi4JtS77vpVlesdig1+fMGfG/CcaUdK/FFZ04Jijq8+5UbPp4Rj6i3axvCL4kuKvNNd8V/LqqmDpFUdP9pGDuJmNT5fvoZUP4OhsruhX9XfBgvjdvrz7rj9/j+iqB7puWV13mGeC7DD1xWgf4FPVsYOwX7wKuajU4ECfWPZrXlSKXFLcElh+IB6HG+z2XyfpDxP/+bKT3G4B/AqsLVia6bUxPlG3cMABvTmbsswHTDMDTI43LzEp3J7C0YN6Cn9EP0R9daE4k+infIDgQ+DPxfrYScChxEuAarX87CE4AvgBcQJS1TABWIU4y3VrwqYF4zcz6jEs4Rkhweb6JFl3zLxW0ghvGPb+q+KAruubngjPLuudICKZWnFD5mN5pVfS8ovfqHHXHZ2ZBcUDSXVk2MMlEjKJH75uCReuIr2yCGQUnK7qLTHxvGq844GPhNr93B8XBUms3GVtGMZlR2NPZKtNXM9DWHZxAj5Dga4J/tiqXEKyab8pLlHjPowS/b3PNyYKLy7rncCk2U16l2BCzp2BFRbuiT2aZyT8F89Qdp9lEigMdNla0MVtB5faj7XqKGeinFXsp9hJsqDhC+heKmuBP1x1j2bJkYynFBr4hbdIT3KoW3Upy/IuCf6vJSXtWOSfQVjon0CMkmE3wH8EPNah3p6Iv9D8EPy/5nl8U3NfmmssEp5Z53+EQ7KM4BnyS2RzFRsRbBefVEZtZI8X+gYsEb+eM5FP58PuQYIO646uSYN58CJ/YkvOR/LtZpe7YukEm3IX97wVL5PdP0w3mVikn0FY6J9AlEKyWH7aPCM5QHLhxYX4IX6OSN2nmG3PLN2/BornMummZ9x2OXA4+uGB8Y8WGRH8PWm0U/Y/vylnX90+cNRTMIzhBcbDI+nXHad0hH/6lgn7YuZJR6upjHQTvUrRkPVlwTK4e9lovfCfQPUjD+FUlJ9AlyZnofRQN8P+gaD+0TaeW7wSnKrpgbDDo9RUUu8GvUs27wDW0Xquz5YfMClXGZtZIcXTwk2rRskxwSq4mubOCAZDlGbsUjG+UkwMte2p3O8He+R7+UK5A/E5R2/1vRROCXuEEugc5gbaOyCXEk3Mm+rGc6X5Qsfx8sWCWyfx6y2aS8CdFm7qfCT42koQhE+g3BRsVXDNnJtCVnfZlNpjgJsE3CsYX9PepNVIcIvX3ZrOx+f58neDCOmIrg+BTufLy6cbPAcG0gu8pjjlfvM4YJ4MT6B5VR2I8VE6ge5ziKO3PKMpGdhMsP4yvsVu+Uf5B0S1jH8GPFCeSXa4WpxAO8WvfIjiyYHwrRanLdK2uMeu0nFH7RJtrXhNsMoyvPZPcurXvCGYXPCC4WfBBRRnQ1IoSoCsVGzEXqTvO4cjJj0fVovwux68V/LDq2IbJCXSPcgJtXUvRJWS84LNNxhZXnEJ4/Ai+/m6ClwXLNBmbXbEsfvpwv75ZGTIR+nzB+DS52jOkZetcWTlN77RuHCu4TbBjeVFb3RQ18j/P740Jii4lUpQ6vLvu+IZL8J78c7Q80Vawi+CxKuMaASfQPcoJdBcTTCFYTLCZ4rCQUXUqY5ZqXFowvk2WYQzreyT/fn+eSfQ3BB9WHJG7d85w3KGSjzk3m1yCc1RwOIjiUIw3h/L+oOi+8y/FpsSdBSsJ1hcckastfmDsM4KZc+Z5HcHsdcczUoK1MoFuuXKi2AA+WQdp1cgJtJVuVCfQgg0E9+UbxWs5gzBWUQvcsxs/Joeic0jRRpjpFHXVa47gHgOCzyta1r2ZszT3ZUIxKv6erbspNt+OE3ypydiSgieGuhIj+I2i/nWS0qd8SB+rOEnUrCvl97xUcJiMYFfBv6qMawScQFvpRmUCncuxh2fCfLPisIBZFK2JNs+k8iqNggb4ih7W27W55r+CDUu635TNEguzuilOlntTcbTzUYrOHOcpTpv75VC+bxUtv94WrFpwzZmCy8uN3qw8OenxsODwgvE/C86oOrZhcgJtpRt1CXQuTT2WyfMTgqsVbXleFHwsr1lYscO4707cGiwfIA4tGF8sZyKWrDIuszooeqx/R7EJ7K+Cs7N8Y0jdaPRO67KW1ytO9XukvKjNyifYPldldmucTFIcf36m4CX1ziZJJ9BWuloSaMEigiMFv1K0TTtdw9jdPoz7LiV4VXCJYuPcHPn6GMWR3OOUPYsVG4B+3emY6qZ3+t82rdsTnCW4q+q4zHpRJtCFdaGCHQWPVhSS2bApDlB5Q7GZ/DeKdqkvK2r816g7vsngBNpKV3kCnU+1byh2pH9XcJiib/FYxYa2MR28909zZmkHwRNNxk8R3Jb//wuCezoVS7dQ1DjfodjwtLZy00jOwp+es2lr1R1np8ltxqwEin7RbwtWKrjmdBVsWDTrJopOIzsJjlVsBN96KOVMXcYJtJWu0gRasJyi3/BXW4w9LTi6g/d/UXE4yFb5/wcGja+Y5QrzCPYX3NypWLqJYI58uJi4ifKF/Hu4V7B23fF1imA9wRWCZ3NF4oF8iJqn7tisdwl+r+ipPnWTsZUUddbb1BGb2SjlBNpKV3UCfY7gtwXjH1e0eSq9M4Oiwb0EHxAsoCadJRR9iSVYPktLvld2HN1MMJei3dZHFbuw+3YTpeDLmTT/ULCdov3U7jkb/5Rc823DJFg0y6JuEXxCsEy+7xyk2FtxTt0x2sjpnRao6wjmrzseK+QE2kpXdQL9oIoPKxhxy7Q2939FsHX+/wsEdzfONuYHnRRlJWMFS3UiDquXomXZeMHHm4yNUdT6/XXwCoXZUAnmzYezZ/M9ZXyu6Hze31e9TdGBYm9FByPlZ5YE9ws2qzs+a8oJtJWu6gT6acH2ba55Q/CRDt3/EsEl+f9nFdyUH3AnCz6nOJr0dUXdb+Gxvta7BN8TXF0wvoja1LGWFMeA4vCFzytKhjYXzNLJe1r1BHMLpq07DiuH4IScjPmi4tCcKRUb1I9VbETfoe4YbRJOoK10VSfQtwgOLhhfMJ/kJzn2uaT7vy9nlg8XTJWzjbsrerw+lUnTFYL3dOL+1h0E1wsOaXPNI4KdOxjDYjnLPfFQmZsUu9tfEuzUqfua2fAJVlHsFflgi/F9FftrfLpqd3ECbaWrOoH+uqL9zcwtxk/IZbCOLXHmLN+Lih7QFys6fzyQs85f6NR9rXsI/iI4sM01Dwp2bfjv5RWtFy8RXCg4RLDoMO8/q+IY898LFmx4fUwuDY9T9iQ3s+4hOE7wh4LxqQTPewWz6/RVAt23m5Os0MnA60QruRUmviiYTXAMsBfwxYH4Ru+Igejt/G7gG0Qru5czriUG4NRO3de6yn0UnxQ3F3FAwH3534cBdxCzTv8CniNq6f8h+Oww7v9l4C1gywF4fOKLAzBuAE4Cvkl8UE85jK9tZp2zOAV98QdgPHBvXmdmfayOPtDzCS7PUo0Xcqn8bcG/s3zib4LXFBv8Th/uLJ9ZK4J1FZu6mrboUxwec3/WNn5G0XZsks1Birr5ca2Wcwvuf1vRDLiiG4oEK0/O1zWzzsrVp9PaXHOLYL+qYrIh6asZaOsOtR3lrWj1tFUmKLtl/ecNgr0Em+X//jlf79texFYPwUn5oHagojZ+fsEGWQ//uvKUrSzlKDrq/GzBVZN573+3W+JVbFKarB39ilaNyzSWhZhZeRQn1j7QanVIcYbAW4L1qo7NCjmBttLVlkBPJJgxE4rTBtc+K7oUfC/HZ6orRus/+b21W34YKn+NFfxOsGxeM3++vnTB19lEUT8/5Lp9RTuzLxWMz6DYqDSkdo6CJXJVZ1zDn+U5RTvGjp3saTbaZIL8suDIJmPTCH4luNPlV13HCbSVrhsS6M8oWslN12J8WkW/zZ0qDs1GCcEsioNjphr0+nszGZ274Peultc0/f5t8XtOFdxQML5TzkC3bX2WM84vZuK/vmBORYePXRVtI38t7zkxK00+NL+uaHv6ZcVBTAcp9kQ8oUGHMCkOXFlFsHP+XK7uBLtyTqCtdN2QQJ8o+GWbay5VbK4yq4yiW8aEieUcLa75hOD5yfy6i2b5yHFNkva1MiE+aIhf68+KspNJkmTB4pmI7zQ58ZlZsVz1OV1wu+AZRWefowRzDLpuRcW+nrcFDwv+me8p9wveX1f8o5ATaCtdNyTQpwp+3uaaC/LN6qOCb+d/Hy3Y1LNr1kk5y3R+i7EpFT2lzxnG110/V14eFZynKFW6Lj9cTxnK97Xg3WpfYnK8CtpumVln5ErQC4pWqfM2vD6n4pTKV5XlYtZxTqCtdN2QQO+jqENtWUOaT+2P5rLZFZl0/17RHeFPg5/6zcoiWDW/z05SwymBiqOaf66oNV5kmF97NsEXBGcKLlIc8LPKZPz+jQVvtLlmBzW0yjOzamTi/IcWq0MDgssEl9cR2yjkBNpK1w0J9LsyQdmpxfhOOSt3e+NTfI4tmK+P+hk2wUqKjhB3CB7LB4wvKd44bAQEH8oHuLcEf1d05piQS7MrtP8KHYtr/Yyp5Wy1ou7y4SrjMhvtFHXPrwm2Krhmg/z5HfL+CRs2J9BWutoTaCKALyo6CByp2BQ1vWDp/O9x+SYzX4vfu2iOf7DisLuG4PP59/SrnNH/jOBYRW3ezfKxsiOmOCVwHcEeiu4dqw+lzKLDMc2t6Ge9bsE1PxFcUmVcvUAws2ChopUvs+ESzJ7lVcsVXLNIXrNIhaGNVk6grXRdkUATQWyr2Fihhl8PKNpzXdHm914vOLyqWLuJoofxeMHOTcbmEtwj+GkdsVnnKfYD3NFYXtIwtlF+b2xQR2zdJmcFv6goCZv4HvOqohRn4brjs/6h6Mk+oc3D7Ur5PTh7lbGNUk6grXRdk0BPpNhgsbriOOWJB1Wc3eb3/EJwSjURdhfBjwS/KRhfJ9/I5211jfWu/Hm5O0tMDlS02Pq44IxclTii7hi7heDHgpcE+2XysqhgS8U+iucE76k7RutOig27HxVsn6ukbVcuFAeDtfxcUnTtuLvcSK0FJ9BWuq5LoAdTdNu4ps01t2iIbb/6TSZPRYdyTKzF27TKuKw6ipKnw/Ln4HXFwUO/FXyk7ti6hWBrxV6LFZuMTanol/3nOmKz7pVlFtfkTPGLijMJpNj/sGqb37tpPsROcuqoYAvFAUwf71z01sAJtJWuFxLotfJNaJkW46vkDOv7Gl6bSfBpwXcULcF2FyxQXdTVUWxo27XNNc8JtqkqJrNukwnyGQXjEw/NWaLKuKx7KfYYPCa4uvHzR7F5/dws/1m+zdfYJz+//qJoKXmsol3leMHBnf9TWHICbaXr+gQaQHCJogn9aoNeX1vwuODchtc2UGye+4/gN4r2YA/n0/4Xqo++sxQn0LU8ZEawgKKJ/yQzb2ajRT5ofrbNNS8LtqgqJutugpMVx3JP02RsID+Xrh7C13mvYkP8L/NB7uh2ibeVzgm0la5XEujpFd0EJp7m9EdFzecERQ/dafK69+YS9nGNb3r5ZrezolvHdvX9ScqnaPP3slpsghL8QHHErLsN2Kil2KD8uTbXuNSpwxR1xOcrNr7epKjVX63976ye4Mmihy7BB/IzaLYq47JhcQJtpeuJBHoiwXsEuwi+Idhx8HJrvjH/ruD3HyF4oPORVkdRv3mV4F+CbRTHT0+p2OhyXs68r113nGZ1ypWo8wrGV84H9IWqjGu0yPeknyrq0H8s+LLgAEWXpfGC/euOsZGibeXbgrUKrpnYqs6zyd3PCbSVrqcS6HaybOOTBeNLqA/7bgqmU9TXvZF/vvF6p03XeMG9ikNVpqw7VrM6CD6sqEX9UJOx6RStMAvbZdrwCQ5WHF0/SV9kwVb5b7NxHbG1ksl+yxUJRWcOCRatMi4bFifQVrq+SaCzTGNCsw/IhmtmyDe8wt3TvUowf5a4PK5o1bWyYhPmAYIXFDV7TqJtVFJsKh6bD5ubCdZUHIxzr+ARwbvqjnFy5Kzu4oqODqsLZqo7pmYEUyk2MrcsoclSjquqjKsdxTHcRRtP98kyD5fHdT8n0Fa6vkmgAQRPC3YoGH9PJtALVxlXVRQ9s+9q9kEqWErRA/fzdcRm1g2yzOl6wSv5wP2g4AT12GEWgo0z9omHwUzIcq2T1GVHQze8785fcM2WglerjKsdxUFE4wTbNxl7v2LvyT51xGaTzQm0la7fEuhzc9ag6YyA4NuCf1Qd11DkDPoHBV8VHKOo9R5yPaZgxiEsOR4huKWciM16m2DaumMYDsHmmdh9d+J7hGKj9ZaKvRC/Vc3HzDfSOyfutZwhF6ynKDfrmrgBBF/Jv+urBd8UfF1wab72fc8+9wwn0Fa6fkugl8iZpdME0ze8PoVgr3zT67o2VYpm/Tfn8vKtgisUXUbG5Zv2UE69WjE/pGYtuOYjgjfKjd7MqqLY3PaE4KgW4+/OGelJDu+oi+K0zAmC1Quu+YLgoSrjGirBCoITM4m+XtHZaL2647LJ4gTaStdXCTT87+CVx7Nc4Zqcjfm3okXVznXHN1jOHD2YM+fzDxr7aD4QHDiErzOUBHpjwZtlxG0geJfgcMFlimN7zxJs61kp6xTBuop2nEU/52cILqkyrnYy+by02c9Grp7dLzimjthsVHACbaXruwQaYmlWUev4jSzb+IxgzrrjakaxEeUJtfg3UJyo+Lpg5jZfZ0ZFDWTL45tzNvvWkcZsoDim9xVFzflxgoMUbbpezxWErqpDtd6iKOmaqsnrOwkeafN79xbc0bnoJp9gOUXN8M8ES+VrUylqiW8SPFD0UGA2Qk6grXR9mUD3EsHvBccVjI/JJdnNh/C1zlUcUDDJv6eivOVFwR4jjXm0EyyqaBk4SXmNYDFFR4cf1BWf9aZMmj+bCeWripKuOxV1txMPi9pe8J82X+dgwQ3VRD10uUp2S66UvZwP/G/nzPR8dcdnfc0JtJXOCXTNMuHdu801bY8hzuvmEtynOHlw5/zAer9iY+Jzgl81m9XqBMEcinKaZQVjqrhnVRT1kDcWjG+o2BA1V5VxWe9S7NP4Wa5qHCXYRLC+4GuKVmk3CWZS7Jd4WwWn9wn+Iji+yvgnRz6AbirYQDBP3fHYqOAE2krnBLpmitrAlrV/il6vLws+OsSvN4uildUTOdMzQVFf+BVV0ANaseP+xoZ7K8savtsvZQ05i9by5LRMhoa0amAGIPhc/pwv22RsbsE/BSflf/9CUTo0yQOaYP+c2V2sirjNeoQTaCudE+iaKQ45eXjiEm2T8a1zKXey+9QKZqsyaVUc5vB6zqStJJhasQP/Y4LHFEeO9/xBLjnDX9hPO2cNW56KadZIcJvgiILxj+Xs9DT5c32z4mS/kwSfV9TgX68oLdq2ytjtHbkKuE3+e+wmWLnumAxwAm0d4AS6Zjlj/ITgYsEsg8bWytKLo+uKb3Io6jXPbTG2sKIzSttSlG4nuFLFdeuzKloQrlVlXNabFLXPbwk2KLhm3lzNeU/+99SKUxR/mQ9012cyvWR1kVsjRancG4Ln89/jAUUp1up8WQAAIABJREFU1yQdlqxyTqCtdE6gu4BgmSyzeFHwO8VmwNsUtY6n9cKsbf4ZJFik4JrjBVdXGFZHCHbP2b+mNc6K7i9PqqJ6c+ttijKt8YIPFlwzV/58LVNhaDZEis4nbyg6Pk3R8Priipr0u1utMlYQ24qCbyk2a14oOESwaB2x1MgJtJXOCXSXyBml7QRHC34o2E+wfN1xDZVgC8HLba5p24KrF+S/1c35obhGw+szCw7N2edt6ozReovg74L9CsY3UZw0OkOVcVl7ihairwh2azE+q+BpwZ41xHaEYi/KdTmBcapi4/qb6sJzETrICbSVzgm0lUKwUb4ptzyKN5ec76syrk4RzC64IFcJXlGcHDlBcWiPk2ebLIrNf081W+oXTKc4ofQnJd5vDkWP/FsVG14fVOxdcM3uZFJ0FHm9aIY5y2uuqDiuz+as+MZNxnbPB/21q4ypRk6grXROoK0Uik4B4wUfKrjmUsF5VcbVaYrTCDcT7ChYra5lWuttisOfrlNstv2s4D2Kdm/b5ozhQ4J5S7rXYnmfvyvqdjdVbHi7NJOqz5RxnzLk7O37NIxN1FXJf68H21yzjyo83EZRV/+I4OsF1/xY8NuqYqqZE2grnRNoK43gPME9anLqo+DjOUO7eh2xmXW7TKKPEjyjqHdWrm6c1exnapj3GFD0lP6tYNom43spuv4sXsb9hisfSu9u+HuQYp/IdnXG1Yyi68aLbVbfviW4psKYFs6/syUKrtlC8HpVMdXMCbSVzgm0lSZni25R1PsdLfhklm1cnLPThQfGmFkQzKOCDbkj+Lqr5YPswgXX/FXw7bLvPVQ5oztecFzOPs8kWF5wpKJbyVfqiq0ZxQbPcYJNWoyPyeT/kApjWi4T6JYz94IP5DVTl3jfeTMx/5Jg87JWTUrgBNpK5wTaSqXoU/tlxQExTwruFZwveH/dsZmNdoqe0fe3ueZbgiurimnQvecRvCb4QovxT+UMeVd1kVDUOP9bsOKg16fLUolnqixDUfTff1uwasE1nxE8U9L9xuQDz1uKA4H+lv87VnCs6u9I5ATaSucE2sxslMgSjb+1ueYwwbUl3nPGnFU+VfBTRaeaVVpcu7vgX23KIe5WwUmgdcgE8rycOb9G8D1Fy7inFfXmlW/OVPSi/nGLsSkVJ8aeWdK9zsw/62aCgXxtIGehnxGcXsZ9RsAJtJXOCbSZ2Sihd7rlzFRwzS8FZ5R0v/fnStRTgosEpwtuyNnR72tQj3tFq7XL2nzNcwU/KiO+sikOvzoik+fTBLuoptaD+Xf/X8EJgpkbXp9PUVb3H8GCJdxnRUVZ0BotxtfM8TrbsjqBttI5gTYzGyWyxOpxwXcaXltacIbi8KbnMrk9QyP8XFDUw76Qs5PTDBr7QN7rm4Ne/7badIZQtNure0azJwjWzxn9cYoTKx/KZPYOwbIl3eMwwU1trrlFcHAZ9xsmJ9BWOifQZmZdSjCFYJHGGcQSvubGWav6I8EBOUt5g6KN3RuK3tD/Umx8W2AE9zlGcFercgxFZ543GmfD87UXBdO3+D1jBE8Idh9uXKNN/p2to9jQ/VnBqhPLLEr6+mcIzm9zTd0PPU6grXROoM3MuoyiV/MligM6JrZxeyCToBEnP7msfkfD15ZiE9yXFLWrMylqaIfdek1xWmdRH+KpM3nfsOG16XOG/AfNEm/FhrTnBLMNNy4rV/6btFs1uFI1dnbBCbR1QNcm0Io+lpsrWqGtqEG1cmZm/UjRsu1FwVWKQ04WFqysOK3wFZW38esYwe35td/VZHypTKyHVbuqON1w1zbXPCX42KDXPqDo4HCDYE/BRxTdQ67JB4oPDyce6wxlP2nB3C3G58mVhk2rjq2BE2grXdcl0IoNDr/ON+6Xc1ZE+Wbc8pQ7M7N+kCUUFzWbac7l97fKSEYUrSaPbHPNI4Jdhvn1rxccUTA+o6I2d90mY4vkLPS9ik2P9wvOFiw5nFiscxQdPe4Q/EEw66Cx2QR/zO/pOifBnEBb6boqgc5lw/sUJ2Wt1PD6PIKTFT0l164zRjPrD4KFcobztFyG/owKulNUFNPyik18LfscK/oKX1TCvf4sOKjNNfcK9hzm1z9A8Kha1zPvLXhegzYYWu/Jn6V78t/zPEUnkvPzv+9WCd0+RsgJtJWu2xLowwQPt/oQU2xWuLPquMysvwj2yQfyBwU/F1yu6Ff7jGC9GuPaXm0Ot1D0cr67hHudK7igYHzGnP3daJhff0bBP3NmcsGG16dQbGYbK9htOF/buo+iw8vOiq4rV+fn9U5d8oDkBNpK120J9F0qaJAvWCLLORarMi4z6x+K0+zeEuww6PVpFD1zXxMs1eEYpsxk46KcubtOcErOyj7b5vfuLbirhBg2ziR2hRbjRyhK6IadAGUpxo2KUo1788/5vKJm9ovDj95ssjiBttJ1WwL9ouCjBeMDipOeKpkhUhzDWuuSrpmVJ99DHhEcWnDNVWpxgltJMcyoqAt9SXGwyF6Cg/O1sTlJsEzB779Y8JOSYjlf8GzOFM6Vif1SipK5cYItSrjHgGJj4J6KUwi3FcxZRvxmQ+QE2krXbQn044IdC8Znzg+XVTsYwxhF7d79iobzb+cH7rfUopbPzHpDwyrWIgXX7Cj4dwdjOEtROtKs88Ve+Z5zU7OZX0VHigmCtUqKZapMal/Ov5dx+b/3CjYo4x5mXcAJtJWu2xLoCwSXFIx/WtHGadoO3X+anH16WvAVxVGoqyh6rz6iOKmrtAMNzKxagjUyQWxZliD4sOCtDt1/zlxF27DgmusVZSR/U7RvW1OwpaLEY5zg8A7ENUZxIuGHNILDU3qdoj57cUVrtrU0qKuE9Swn0Fa6bkugV80Plz2ajC2n2ODTsi1SCfffP5PnhZqMzaE4yOCkTt3fzDpLcUBJ4T4KwS6Cxzt0/40VG/NatvRS1Dj/PcsoHswZ55cE1wo270RcBoL1FF2glBM14xS18mfIpXy9zgm0la6rEmgARS3exKNljxYcKLgwX/uZYKoO3vtBwb4F459U1GmP6VQMQ6HorfmJLCs5VLBVp2blzfpNPggf1WJsQLHR7awO3XtrwfNtrtlZ8FDDf3dDF4O+NnHVIR9aFs7XpskHngdyVaBjnz3WcU6grXRdl0ADCJYUfFvwe0Wv0jPV4VOMBNPmzMMaBdcsrDb1k52WSfzLORt/Zc5KvSx4QrBOXXGZ9YpMYscpNrVN0fD6jIr65JdU0Id5hPdeSVHjPG/BNccK/tCJ+9uksmzjn4ITW4zPL3hBbrnXy5xAW+m6MoGuw2Qm0B35cG0nZ0PGKeqzp2p4fQbBqYJX1eH2W2b9QNGH+DVFm7bfCf6Uy/aPCt7fwfsOqKAUTHES6/OC3Uu851yCgwSXKFrKnas4NMYzqoBin8sEwTwF1xwvuKrKuKxUTqCtdE6gG2QJx1cKxj+Rs1O1lHAI7iyYJRnIGemfVh1XFbyMbWVTbOjbQXCM4BDBR6v4PhNskOUCpzSUC0wt2FDR/efPZb3HKDbCPauo7T1J0WHo7Hwfu1EwWxn36WWKtnrtem/vKniwqpisdE6grXROoBvkh8vTanLsqGD2nDk6uabY5svZ7+ULrvm42tRX9hJF79hfC/6Tf/ZH8sN/kbpjMxsJ/f8Nay/nytK4LCEppdOPYuPzc4qjyqcaNDZvPpBfVsa9eplgE8XBLlMUXLOPSji8xmrjBNpK5wS6gWLTyB8ET+Ub5mqClRWtpB4W3F7Wh9swYlshP2xbzhgp2l2prhnyMik2Uo0TnCfYLpPpnRSbeV4UrFJ3jKOBojxoFUX7t1nqjqefKGpvl1C0TFu77NngnBB4sFWphmD5fL9Yusz79hpFict4wfoF11wlOKPKuKxUTqB7nAp+1cUJ9CCKfqhf1zvto6SoizxaMEONcS3Q7sMulyJfqjKuThAsqui60qyd4RSCH+dqQM8/KHQrRXnDeZlYvN3wv1eopj0ANnly9eaENtc8JG+OI1e27leTHtiCL+bDfMvTIa3rOYHuUUWJc92JtBPoAjn7VvmMs+II8Y8Ivib4sqJmcoyiN+zRBb/vMsEvqoy1EwSHC24vGJ8tE+yNqoxrtBDMmt9rtyvae82k2GS7puBqRZnTInXHacUUR4Mf1uaa2wRfriqmbqXowPKnXN36vqJDy0H5d/hfwQ51x2gj4gS6Bw01Oa4riXYC3WUycX5K0SHg5kxi/qtos3RAzoTsIhho+D1jBEcpDmhoWSPdKwSXqsVmyYZrbhbsV1VMo4ngOznDP8nDY36v/UlwUR2x2dDlSs35BeNjMmHcpsq4upXiWPNdBL9QHGV+vWKj53vrjs1GzAl0D5qcpNgJ9CinqPMdqygXmb7h9VkFP1RsNjosE+V/Kg6YuUzRius5wSZ1xl8Wwa8Ex7W55kbBAVXFNJoIHle8N7Qa3zC/T2srabL2FF1F3lCLUxcFuyta97m23WqXK6+7KjbSXik4XXHuQRmlek6ge5ATaBuynPE4p8XYgGIjy88U9dB7KHbXH6/YcNc3H4KKQ3SuLxifXtHzessq4xoNFBtp2/VDnzeveU+VsdnkyfeMKxTdazZQdpnIn58v50PQJPsMzKomWFxRg/4fwU8ERwouyEmjWwRzj/AWTqB7kBhaYjzU68r2f+yddZgcdfLGP5MNCRAgwSFYcNdDf4eE4O6Hc/hxuB1wwOHucjgcfjiH6+FyuAR3d4IFCyR5f39UhSyb6Z7Nbk93z0x9nmeeJP39TnetZd+urnorBHRJkNX1jlTKEAeZG8W3ecZVBIJ5ZE1rayesHy/4SDBe3rE1O7ImzV8Fg1L2zOgCekCOoQVdwMXy2f41/VHWED3cn1htW3R8rYTMCvVYWd35DzJnp2sEixUdW5HIPNBfFdwqmLDD2hSCx2RlY5Wkc3SCENANisbilTchoEuCYA4XJVVG/KovaKF7GLSi72n6r5esgWdUOctigmkFy3kGfpiigbBuCB4XHJuyvoNslHxbnnEFXUcwpaz0ZkuZJeH4td8VZIXfdL4neEWwt8x7emtZGd6vamEnFMGmslr8fgnrA/xztHQ3LhMCugZFidDOUibhPIoQ0CXBf8F1GJSiQaCn7bC0GrdoGL1GtjF8m+IizQ/PuA/WaDvBYTKf7vCAriP+C+1HwZJV1mZ38fyPImILgkZENl3ybsG4Vda2lU2mbMlmRX9CktqULOt5ObAblwkBTTmzuI1MCOgSIXhRcJT/a33Qr6AzQX8ATfgZU9z4CnO8DvoRdESx0eaHP4aeWeH7nBuysc+/yPxxt5PV2f9TVnt+fXwtgnrgj/OXlvV4/FmwYNExdRfBArLyvKrNnL7nQdXw7G5W/Kni2TX23CI4vhuXaXkBHeI5e0JAlwjPuP7yOZNvBfoSdKAfr8gmI/4q+CNoFdAI0PxFxxw0L/6Y+VqZpd07/ktsM3WvFjEIqiKz8PzQ/597RVavLc8+zlp0fF3Fbz7fqbHnEMH9OYVUKgQnCO6usedVwW7duExTCeiqo0U7SYXRYrn9f+QhoG0U7BF0/vPbko+MykrFGkqmnZQh573AvMzJKzO2wcVYY+G0wJYVeMR/BB4GNgWeLzLmcqPxgA2wko+pgDeAu6Fyf5FRNQoVuA17BUFdEQwEbgROAo6swFA/PgNwFjbQZKEKfF5clF1mHGBYjT3DMJHXitwI7CaYrwKDOy4KVgRmAW7NPbKS0qOL76t0+LPjWiOL6MiiB1Tg5EHce9qtrPZBGyN6ASOAc4BZK78fivAMMFshQTYEmgd4AfuF3B/7xbs4cDfoWtAYtYhBEBTGycAFFdhvlHgGqMB7mBvPEODvRQXXTV7HmggnTtmzkO9rOSpmWXo95sKx3Kjj/uR1feBK4JQKvFlUjM1AR3FZTWw2sgAtQkBHCUcp0b6gx2vsORN0dT7xNBqaEPSBC+UO39uaG/Qe6LxiYguCoD2C6b1UY66UPTsK3kpYW9rraF8WvC+4U+YU050n3Zkhm3D4juDUhPVFvWxluWrrrYBgXNkI9eGCrwTPy4b8/Cw4XF1Puo6iqUo4ukJHgVnr30FtQkCXEq0I+hk0acJ6D9DLoEbNyGSM+oBmBvkvTO0Bej85y6xlvIZ8hvxiDIKgGjJbPSmlhEFmwfdzleP7u+i60hsPtxCcKBgiuF8lmZYpGCRzEbpMZss5kWBWWenCN4Jzi46xDMiGhK3jn5fV1f0BKqMIAc3vRXK1JsIQ0GNHCOhSop4ukK8aLQp/t74/aCiof/6xlQltDHoRNNJ+/2oY6C7QA6DTarz3Y9AW+cQZBEESgrldQE+dsmcTwWcdji3n4nnNKvunEbwl+Gc9Yu4Knml+WObIIX99LGsQ726GNUin5QU0JGedQzx3jRDQpUXzgj4HPQPa1Z03tgPd6tnp9YqOsFh0qH8ejgAtCpoWtDzoGs8u/6vG+58DdaerO2hyBG2CBWW+2GsLZiw6pmbEP8+fCXZJ2XOd4NoOx26SNVknvWdtwU8q2e83wQT+fTVN0bG0ECGgg8wJAV1qNDXoVNDzmPfzG6DLTFy3MlrQRfJqCeuve4a+d8J6G2gI6E/1izFoZATLCt70LOGHsklpEtwWwid7PAv7napMmxPsIfMkX7jD8Y8Fm6Scc3z/mi1ej5iDhiIEdAOSVGaS9sqTENBBA6JTQPekrP/Fyzo2SljfGPQTiTXmjYwqoBVA/wBd4OU+3RmB23IIlvJ61dPa12AK5hc8IvPF7ltkjM2GzHHhFNnU0f8KjhWcIWsm+0GwcZX3fCVYJ+WcbV7iMbCuwQeNQAjoBiQEdBBkju4AHZ2y3hP0A+bEMUe74xXQBqDvQAfUP8680eRY/fcw//MS0CPYRMtbQBMWHWEjIHhGUNWlRdBH8IbgsLzjagVkDXbHyob2XC04UDB9wt4nBAennGs+z0BPV7+IgwYhBHSDUub67BDQQYFoatCRoLtBr7jI+xtjWM+N8b5bQcfV2PMi1og5wktfHsRqyn8GHWRiuplQBfQw6ClQB8Gh2f3ze2MxsTUOMr9eCWZP2bO34MU84wrGRLCn4FPBlFXWKl43/VARsQWlIwR0gxICOgjGQH/0OuTBWCPgX0AnYPZzb4AGpLz3aNBjKeuTgX4BLQtaAGu+/AfoTybamxGtjtXJJ9Tnak7QcMwisVUnntVEsIyXESS6IgjWEHyXZ1zBmAh6y8Z8vy5YU9BP0EuwsOB6wbeC+YqOMygFIaAblBDQQfA71Bf0GegsUFuHtQk8I/0EKEHEaDYXyNtUWWsDXQF6iaoWgM2KTrEMftW1qbF66F8suapfsMbUrfKNsfwIFvIMdL+UPZsLPsozrqA6ggkFZ3rNurzmWYIHBfMUHV9QGkJAB5kTAjooAO2K+TCvC1oK1EGsqL+LvIEp5/iLZ1QvBq0P+j/Q1qBHPbO9QF0/hNKhS6k6XVEz++f6CS/vuBQbJHMIVid+Vu6hlhjPYH4j2DJlz7WCmAJaIjwbvaBgScEkRccTlI4Q0EHmhIAOckbLY018An2DNbj9AjqX3zW56QnQvjXOtRRWD/0F5rrxtmdaqzYdNTc6EXRHleP3YsNlxgE9ze+mV2pxrOFw9fziLD+CgwVfCMa4CZONiB4uWLSI2IIg6BIhoIPMCQEd5IhWcrH8Jr8NOlFv0MqMbvQbNY77HtBYOB0keT63CloBa5Ccqd2xmfxGZV5Ge2cv2OF9F4L+k2+s5cbtzy71soDrBAcIjhE8Kvg5LTsdBHkg6CFYXrCP4ATBtopBP2mEgA4yJwR0kBPq4RniE/11d4f1aUBfgbb1vR9Hje7Yoru89nsu//canu1fGPQu6N9V3rMd6PVcw2wQBCsLzvF62jtcRM9WdFxBayOYSfC0bMri47KJjG8LfhUcKWgyh6FMCAEdZE4I6CAntKhnQKfw0oHh9ufv9pwCutNrmX+wvWN9nZ6gLTAP5MdAN2K2dVNl83GUGfUF3eSf5+dBj/vfR2ITLMer8p4Q0EHQILgP+ZuCuwRTdVhbw51HmtDjvtuEgA4yJwR0kBP6E+izdv8+B2v223x07bP28HrmYaBdunCNftjgkG+sRET7eLb7Jc9uL5vNx1J2tAjWqHm+l3Csl7L3ItD1uYUWBEGXce/rDwR9EtY3FfyodhM0AyAEdFAHQkAHOaHVQUP5zZpObZ4Z/s4zpF8z2mJtyy5e4zrMV7qD17PaPLv9NWiMoQvNje6xchmNU2VtCf98r5Z/XEEQjC2COwUnJKzN5LX7I93K7wvZRMcQjSGggzoQAjrICU3pZRsdssAa32t01/aSg3O6eP5ZXYD/IWG9DZtMeFDXzt+oaCbQR5iF3Wag+UDLgf6JNR1eStNNZQyC5kTwrGC3KscX9fKNB2TTGY8SbCC43Gujtywg3DIRAjrInBDQQY7oItCrVJ2Wp909GzpXF8+9JeiDGnuOsxrrVkNTgs4DfeI3GaNew/3Pd0EbFh1lEATpCP4rOLbDsV5eF32hYBzBd4K12q3v5A2HA3IPuDyEgA4yJwR0kCOaELOq+xqbQrgTNmL7Ac+GbtKNc+8MeqHGnv2tRrpV0TGg773WfBrLPGtG0KF+87JD0RG2KoK5BdsIDhFsFpZkQTUE+7rjxrjtjq3qArmvYD23Wpykw/ueExycf8SlIQR0kDkhoIOcUU/MZeMab+57EHQaaPZunncNr7FO8YPWxaArunedRkXzYo4cKyWsb+/iOpqPckQwkeBqr1t9S3C/N4kNF5wmaKFx9EEt/PvlA8EN8nHzLqofEywjGCI4ssr7ThNcl3/EpSEEdJA5IaCDJkETeGZ7jPpAX5/RBeIG+cZVFnREevZdPUAfgrbNL6bWRlDxprBXBQt2WFtB8JngjKLiqydearCp+2zfLbhAsJ2gitVi0B7BnIJXvOb5bs8uf+83YacL2qq85xRBKw9MCgEdZE4I6KCJ0NZeirAPo63x2rDx4W9Z/XOrNszpCtDZNfbcATo6n3gC2aCWnwUzJawPFIxQkw1vEUwpeNIF4JWCwwWX+A3D64JZi46x7PgNyDqywSl3+vdRQgM1yKZotvLPdgjoIHNCQAdNhrYAfeblCu+DfgL9CjoXVNU7tTXQhVbCkrrnQVAr10nmimcLb66x51XBrnnFVG886/6AlxxM0WFtQpnt2qsywdP0+OdjG/+cDPHXA36sUzf7gvEFH6tDc2G79fVlThxdbNBuCkJAB5kTAjpoQjQuNvlwC9AKtJz3czW0E+gDUIIw0SSgH0Gr5htX6yK4RnB6jT13NFPmULC0i7kBCet9BV8JNk05x7iCBQQzC3rULdg6I+gp+I9n4o+VNQCu53//VnB9Z2vg/WnGMMEVguUE0wmW8HP9Itiv3h9PyQkBHWROCOggaAnUD5vyeOqYZSzqhQ2heZmqA1eCeiA4V3B1jT3PCP6WV0z1RnCg4H819lwtGMMP3gXzLbIGy1FejN8JjmvE2mnB32TDTsZooBbMLvhybL72gkVkNnfD/HMzwuujUyaRtgwhoIPMCQEdBC2DBoK+BT0G2he0CehAF84f02UP7qArCDYSfCOYNGF9LhdBC+cdW71wsXtrjT1nCa7scGyUoLxLVhvez7Osmwjek7mXNNTNn+AdwZ4p63sK3unCeXvKphKW7qZCMI1gXcHugrUEU9d+VyaEgA4yJwR0ELQUmgEba/64i+aHQEeBJis6slZD1gg2WHCvYLIOazMKXhLcVFR89UCwq+DVGnvuVodx1X7sNlV3mJjWM7m7ZB1vvRBM7Fni+VP2LOB7Js4ztnog6C34p5fvfCWbqPiNZ8uP62ypSjcIAR1kTgjooEHQNKC9vBnuMtB+oJmLjioIuoNgen/M/p3gZsEZnmUd5qKxb9ExZomXYQwXVPUjF8znImupdsf6yyzaEjPxgsMEj9cj5nogmMLF8Zwpe+byPQ3vzS64VPCRYMV2xyqCNf3mp952jSGgg8wJAR00ANrcG9xedQF9Huh5zLJu96KjC4Lu4I/c1xccL7hKcJRgJXXShaHR8I/zK8EGatcEKFheNiSkY/nGUl7KkpilFKwt+KqecWeJoIfMcSOtWXIz39OwjZIAgsX8pmmhhPWl/etbzxKyENBB5oSADkqOlsZs6Hap0vy2iYvoaJIpFE0AOgB0H+hTv7m5EDRf0ZEF5cPF42Gy8dNDvYzlaxdZZ6rdmGrfv7hnYhNregUbCj6rf/TZIbMxfEkwYZW1CQUvC04rIrYskXlVP1hjz3OCfesYRgjoIHNCQAclR3eDLkpZPwb0Qm7hBB3Q1KBXQO+BDgVt5Dc7t/nNzWZFRxiMiayZa9qCY5hcsKqsLnptwTQJ+yaUDQpZPeVc5wpur1+02SOYROZ5/by8oc5fa/uxVwSTFB1ndxFcJLiwxp7r6nyzEAI6yJwQ0EGJUQ8XYSun7FnAklPRBFcMugv0CL9Nfvzd2i6gYaCmmqTXqLgQPcXLAkbZwH0lOE0wUdHxpeEC+dVq9cCCQTKv40SBXVZcRF/g2fhRX5Of/FjDi2cAwamq0QwrGx5zWB3DCAEdZE4I6KDEaCL/nVK1ds739Pc9Mf43dzSnf+7nTtnzCOik/GIKqiGYSOZ88LrX1s7ir00Fr3kZRWkbFj3+xwWfCA7xLO32Gu0LfYWgX9FxdhVBm2A2f9XbkSJXZLZ136mD00y79WllTbPL1zGMENBB5oSADkqMKqChoHVT9vwRG9td6gxac6LNQR/W2HMwKLX+Mag/ssa9N1XFEk3mqfy64OQiYussMiu0vQWPepZ2pKz57BMXYD8KDlUVq7ugOGRNsoNlrjL9OqxNLnjEv6b1bJoNAR1kTgjooOToStCdYzYQ/rZ+Kej+XEMKHG0LeqPGnr+BGsZerN54JnUrwUmCcwS7CGao8zUrgs8FW6fs2UI2qKT0jg9ehvKVYGP58BSZp/ZGXp5yatGfTwEgAAAgAElEQVQxBr9HMEDWMDlE8G+Z08xVspHlT6v+A1VCQAeZEwI6KDmaHfQd6HxQu+yF+oCOA/0MWqy4+FoZDfQa55RH57oM9O/cQioxghVlnrefCG7wsoNXvX53jzpedzKvrZ0nZc+cvmfKesWRBRo9nXFQwvpAX0/8WINi8CcIW/qN4+2yiZObKJ8JkiGgg8wJAR00AFoc9JaL5WdAT4J+wCbpVR3IEOSBxgG9Dzo+YX1e/5qtUZerm3PBFTLHgqdk3f5L1X5n/rjw+1E2dW2cDmubuojepE7X7ufieIGUPfP4nlI34wr2FzxdY89TggPyiiloCEJAB5kTAjpoENQTtBxody8LWBk0bu33NSqqgKYClfyRulbGnFLOtmZC9fS4twR9biU4GV/RGq4u8TrYiwU7C/YSXCubYnd41tfsLoLLBXekrB8keLtedaCC9wS7pazvJPiwznWo3UZwtuCKGnv+LTgnr5iChiAEdJA5IaCDoFRoMcwabqg7XHwP+q81S5YVLQ16zuMd4X9+6w2EmTsKCP7mtZRjZFRlE/yGCUo1XEfwmdKnzs3kGeC6jKf3zO2nghmrrM3gZSX/qMe1s0TWDJnq9yy4TXBCXjEFDUEI6CBzQkA3FOoHWgq0FmgOUHSbNxVaF5u6eDloVcwmbmXQxX5846IjTEdTuJieox7CGRg1xe5jwS4pe04WPFKP63cVmdXacinr47mArks9v6CX151+6dnuFf31D6/LvkvQux7XzhKZfd33SaUmgkll0w3XyTu2oNSEgA4yJwR0Q6AJ/BH5Ly6kvvYs35ukDhkJGgdN4l/XhNpN7Y01U5a6yaveyLr5UzO1ghW8prg05S8u+v+csj67f1wD6hhDm2zq35Nej/2j1wvvrgbxHpZZor3gNwMTdFibQHCr4MWOdeZByxMCOsicENClR22g+1wsrwLq5cenAZ3ggnq1YmMMQJNivsjHYCOt1weNNxbv3w70UXLmVj1A74ASM6+tgDrhFiFYwveUJqMqmyz3QFKNsay58JUc4+mhBvVLFsws863+2Gui9/M/Pxa8IZil6BiD0hECOsicENClR1uCvgFNl7B+DOi9KOcoEm3hNcufgG4H3ePZ5I9Ay3TyHKeA/lNjz5Wgs7ofb+MiG0f9i2DZlD3bCj7KM65aeI3zN4LzBRO2O95TsJus+bEubiXNiKCPrPHxCsH/BFfKmkn7FB1bUEpCQAeZEwK69OhW0D9T1icBDafUTWbNjFbzpwC7/f4mRuODTseaAOfoxHlODgFdG8F0stHTXwgek7lwbDyqXEMwvmxgQ+mm6gkWF7zjNboPe93xZ7Ixx1sUHV8QNDEhoIPMCQFdevQSaMcaez4EJXb4B/VEg0EnpqzfSacGiWhbzNc6qYSjDfQuaKcuxNhjdOlP4yJYzcXmyzILu5cEN7kgvVewrGwk8FuCSYuOtxqyZr41ZK4YR7r4n6TouIKgyQkBHWROCOjSoydA+6asV7zEY+38YgoM9fdmzpSpZ9oINKQT55oY9BXo4IT1fTFruCk6GVsFtLV///zgWfJXQIdbdryxkFmt/SA4XDaaek7BQ17r/LNgpP/9BkH/ouMNgqBUhIAOMicEdOnRaaCHUtaXwrx3QzTkjhZwAZ02ynpJ39MJlwOthTmtXAVa04S51sBs7X4F/amTcfUAXep12UeCVrJabO2ONSI+b4K9cRCcIHiiYxOeYFqZHdseshHO8XMQBGOJzP5vGcEiHd1NmoQQ0EHmhIAuPZoNNAy0T5W1qUEvgy7LP64ANK2L4zlT9vzJMsudPufCXvf+DaMHktwBWnwszvFnF8/zV1nr52VB53f+fMXjpRkHpqxXBF8L1s0zriBoZARzePmTvDl3pDe0XtxkpUUhoIPMCQHdEGgD0I+gh+0Rv3a2ZjJ95ccmKjrC1kUvg45JWb8FdHUXz111WEQn3vco6LiU9TVAP4Ea5udeMFiwc40970YzXn54Wc2mgkME2wmq3LAFZUXmPT5EcLNgYa/Pn8Cf6Az2V8P8H1GDENBB5oSAbhg0K+bUcJ9nEK/BGs8aYgBC86J1vLxiO6s7/u14L9CxfuOTUiNdl5iGglZPWe/r2e0F84upewhuEZyesj6RZ9AG5hhWSyIbyHK8Zyo/Etwn818e4U2dzZS5bFpkw2huV5WBQ4J+7hhzaBGx1YEQ0EHmhIDuEpoTdAToBtDNoKNB8xUdVVAU+otndN8BXetZ589AX1j9ce7x/ABaJWV9AhfQC+cXU/cQbOUlGlVrnGUjqT9RTKCrOy6ehwhW7XB8bs9aPlhNlAXlwWuehytFUHpfwWt5xlVHQkAHmRMCeqzR7p5x/B/oJNDxoAcxL+bEGs2g2dHULqRPs/IJbQGasPb76hLLU6BDUtaXw5oVU5ofy4Vs4MjDglcFS2u073M/wcGeDd2g6DibHcH0/rmueoPmTZ1DBevlHVvQeQR/8LrnxP+jBMv5U52q0zMbjBDQQeaEgB4rfhuasXGVtTVBP4M2yj+uIGiPdgYNAQ2osjYu6DHQVbmH1U0Efb25aYTgR8EHLgI+CsGWD7Ipj+/V2HOl4IK8YgrGHsE2/rPzsf8sPS2ziGw/JXMNwdAi48yQENBB5pREQGs80EKgWUAlfvSnR0GJdZiYZdgL+cUTBNXQOJhzx6egHa28SDNjjiDPYANZGtbuTTCVNzpt5pm0hh8S0ygIDhQ8WGPPsYLb8oopGDtkQ3yGC4YJzhKsKthHNoDoVcFUvu8Mwb1Fx5sRIaCDzClYQGsWzLJruNdkCvSdl0WMV0xMSagX5rc8MGXPQv4xRBNNUDAax0qK9EG7n61vQBeAJi86uqAxEexUqy5WcJEgrDVLiOCP/gRnTdkkzI8Es/jaBILHvBF0RRfYaxUdc0aEgA4yp0ABrTn8MfOd2JCHvpiv7iag9zC3iRI1BGkSFyHzpuwZ4HsG5BVVENRGk9jPVusimFKwljdGrS+YoeiYGhHZBMiRgj8krE8k+EKwdd6xBbURXC64zv/eS2Zh953gdMHW/vRAXud+RNHxZkgI6CBzihTQ93j2uUrJhqYFfQnaJf+4klAP0PegdVL2LO/NWSXLngdBayKzXDvKs2nfCJ4RfOlZuHMF8bM6lgiukNnWzd7h+MSCOwSvCXoXFV+QjOAlwU7t/t1DsIUL6bd9/VfBAUXGWQdCQAeZU5CAVn/QSCt5SNxzmDU7lQldAbo3QfRXQDeCbsk/riAIqiE4UWa5to7auQkIBgreE1xbZHyNiKCPC65fBPcIzhc87zcp3wrOFPyx6DiDMfGbm+1q7Bmi5pvoGQI6yJyiBPQyXk/clrJnHcZqBHIeaGaLSVeApmp3fDKvLR1K7kMzgiCohmBmb5ZaMWF9bsXwlS4jGCS4UObiMFQ2bv2fstHQIwSXKHy5S4Xf+Jydsj6jl3DMnWdcORACOsicogT0Ep6BHjdlz0agT/OLqbNoAdBgj/9t0Jt+M/AaaPGiowuCwBDsJni1xp47BSflFVMzIZjCs5XndyzZECwkG2xzYlHxBWMi+JPf8MxVZa3i5TlPZ3CdZQVXe8b7Q8HdsgbUoibnhoAOMqcoAT0R5pm8Wsqe80AltUJSD9DCoK2wcdqLpWfTg6DZ0ISg2UGltZBTJ+zUvNyg4Tyxy4DMN/hFQdX/+2ROD78oRnuXBhfJ13ij5w6CWWRTCQe2ayhcsJvXOMif/Fwu2F6wiWx65ZeyKZV9svp4xoIQ0EHmFNlEeB7oVdAUVdZGNeOlCOwgCPJHG4Ne8icw8p/T+0CLFh1ZR2R+t4/X2HO14Jy8YmomZJMhD0lZb/PSjjVyDCuogWyq598Fn3m5xijXjTsFc3bz3Cv6ucb43S3oL/OaPqM71+giIaCDzClSQE9kTYL6BHSI1zxv7sL6V9BR+ccUBEEyOtifHB3uT2CmBg0EXe5CeqUO+yvWE6CN/DWfHcspWvO8HS6YKWG9n+ArwaZ5xdRMePZ5pxp73hNskVdMwdghmEYwT8cSnG6c7xbBhSnrawt+Uv6aIwR0kDlFD1LpDdoL9DDoa8z/+WbQKsXEEwRBdTQfNvAoIZuoY0Ef8ZuFo+YBPe0Jrk9AH/vfn7U+gpyitoa2J+XT1dodn0hwm+AVxSTDLuF1rcenrI8v+FmwQp5xBcXhde8bp6yP7xnvxfKMixDQQR0oySjvIAjKjY4HPZCyPj7mQrMWaCbMx/1a0Azt9kwHutJvlmetf8wgmFw2XW2o134eLfi314C+Kp/CFow9sibNjwUTJazvJPhaBXhte63vioJDZJMRDxIMyjuOVsOf6Kydst4mc2hZJs+4CAEd1IEQ0EEQdALdDDqhxp7HQPtiNo/3VW+sVQ/QXaDr6hNnlStazeefBGd41vlc2dS1FBegoBaC8QQvCx4RzNzueJtgG88+71BAXJMLHvDr3+sC+gFZQ+Odgn55x9Qq+NOeg1PWF5BNssx7MmoI6CBzQkAHQdAJdAPo5Bp7ngLtA/rBMtGJ+1YF/USJHTxaFcGqnqF/XvCs4DLB8in7p9Fo3+c3ZF7QXwu+F+yaZ+weT0XwkOApwfQd1mb2uu3b846rVRDsIWtOnKrKWkVwgyDlSVbdCAEdZE4I6CAD1OYNZVUmNAbNgQ4FPZOyPgloGGgDr3Uew2e23d5ZfE/eWaggARc358imCV4m2MVLNK6QuSqk3jzJfJ+3E+wnm/pYiHWdYBVZk9p0Ceuz+sezZN6xtQKC3n4T9eao7wPBuILFBDcKvhEUMWwsBHSQOSGgg26gZUD3ezZRoO/98XzpLM2C7qIZMQeOKq4L6gG6DLOl7ItZ3KX8otIi/v3St37xBmODYEfZGO4xfnYFSwl+EPy5iNjGBtno9jtq7Em13wu6h2ACweleQiMv2ZA/qUi5sa4rIaCDzAkBHXQRbeGuDBeAVgTNAVoF9G/MhjCxkSRoVLSlf22vAG0IWhIbJPQoNuLeBzDoKWs6TDzPkaDBuYTcIggmFCwhWN/rTMdqhLZnDP+esn64oPRfM9lo8Qtr7LlWcHpeMbUqgl6C+fz7sui68xDQQeaEgA66gPp7tjmhxlEHgYaAJs43rqD+aHHQjZg13QjQW5h3e7t6U63v5RxrVnn/qp7J3iS/mJsXFynHyMYzD5e5i0hmJ7Z5J88xmb9nvpQ9S/ie3B01xgbZ9Mn/1tjzuODAvGIKSkEI6CBzQkAHXUB7gt4gcSiGxgF9Ctoq37iCfFHPlLUD/QnFfz3jfKSX9wy3euogC7xG+RPPPI/nxyb1WuRfBNt34hzTuThOGjjTQ/AX33O2/72U9n+ykdS/CGZLWF9A1vC4cN6xBYUSAjrInBDQQRfQ+aBLa+zphO1Z0NxoIdBJLpzvBp0CCuGSEYLlXSxWzRx7XfN3gtQnQZ7F/kFVRm4LZhI849f5Veai8IaL0GMFuU2W7CyyaXivdfy8CBYRvCO4sqjYgsIIAR1kTgjooAvoPGsaS91zS3odbFA8mh90Kuhe0P/86xpT4xoEzwbfkLLeUzBEsFEnznW5N9eN0+5YH6+Nvltma3deu7VVZI4KB3f/I8kWrwe/1pvXXhLcKps4OVLmMFLqMpSgLjSVgA67qyBoXF4EliDRtk69sG7+F3OMKRgrtAfwFNYV/xBwI5apvNWFdPwfXX4GAK8kLVZgOPC676vF37FhKLfILOl6YkNQJgJ6Y7Z0B7U79+1YAma/WhnuvKnA0AqsDywE/BN4CTgVmL8Cm1Xgp0IDzADB+EXHEARFoSqvIogMdNAFNCXoO9DeCetHgr4gbMpKilZwN40Nq6wtgo3aTvjaBmVBcJ1MIKbteUmwSyfPN7NnmyWzIBvhf79NMEOV/T29RCQcd3JAMKPgEsH7/nX5SnCXYGDRsTUATZWBbhWqieNq4rkoER0COugi2shF2GXmtqD5QOuArncHhlWLjjBIQndbHXvi+s7eBBpZ6BIj+JuXWFRt5nRBPEKwyFiedyqvr35d8I8ae18TbDc25y8awdSCQZ5pb4hyDsEfZBMeHxRsLhtMso7gXzL3ldxHpjcYIaAbkI7COEksFyWiQ0AH3UBLgO4AfWMJEX0Fugm0QNGRBWnoe6pazP22Pr1/PWfNL6ZgbJG5bQwRnCZo67DWT/CI4L5unP9OQWIfg6DN66DX6eo18sSbCJ9ql2Ef9efpgj5Fx5eEZ/pfFVyqKuWvgq2U4jwSACGgG5IkAd2ZvXmQs4DWbNgwhkNB24DmzOe6Qf0Jz+fGQG2Yf/MyKXv6uoCOG6GSI1jGH+U/LzhKsJML6k8FLwqm7sa59xa8l5SlFaznArSQsd1jg8zH+kcvgZjHRelEgrUEbwseSMrkF40/DRgmmDRlz2OCo/OMq8EIAd2AhIAGQL3tkbFGgN7Buv7fwkb+Xg4q7d1/EDQfeg+U4g+sxfxnNfEXdlAeBP0FR8jqYV8UXC/YpbvlCTI3i3dljYWTdFhb1rPfR3Yv+nzwG4wLE9am8Y/lL3nH1RkEewieqbHneMEtecXUgISAbkBCQAOgS0AfgJbscHwRF9L/qe/1gyAYjU4CvQCqIrBUAV1rN7lBqyOYzUX594J7BFcKBsss4U6tVlJQNgRzebnGgJQ9x3Wn3KWeCPaSOeak7TlWcFs3r9NL8GfBeYL7BBcJdlBzOH6EgG5AlPJK2pMnOQhoLeDZrIQBCpoLa0Zbun4xBEEwGk0Gehd0P6jdsAlND7oYNDTKN4JReLnDmoJDBWcKdpPZHzYEgjUE39XYs7ng/bxiGhtknts/CiZM2XO/4MRuXGNqwbOyRsXLBIfIGhQ/lQ3OafT66hDQDcjYCui8yUNAHwB6ssaee0HH1C+GIAh+j6bHJgQK9C1mOyjQYHsyFASNhWB8wUGyRsEfXPzdKThQVkPclvLeHQSv5RlvZxH0ltWin5awvpbMiaPqRMpOnL8iG6LziGCyDmsTCG6WNTH26sr5S0JTCehSFuvXgc6MOS3dKNSMmRJ4r8ae94CpcoglCAIAKu8DK4IGAPMC42IDJ16x36dB0DjIGuzuBfoBZwPPYUNgBmIDYNqAQcDdCadYCRgj0SPoD0wHvFmBIZkH3gkqJv63xPy4pwXOwQbk9MfGr+8JHFKBwV28xEBs8NXMFfiyw7W/F2wGvANsAFzexWsEQdORRwb6ENBDNfbcZnWZQRAEQTB2eNnB8zIB3XFtOZkf9geqkqgRbObri7Y7to1GDywZ9XpBsEq9P5YkBPMLbvdyDnnW+VnZ1MXunPcgwSM19lwjOKs71ymYyEAHNekFbAqM08n9S9UxllHcC+wPmgkqb4+5rP7AMsCZnT+lKsDCwPxYp/nLwKNQafgRrUEQBEHn8ezzhsDKFfim43rFmh+vwMTvC4JLsGztxMCywKrAbhV4ws93GLA39ud1wIfALMDWWDnDnysFZGIr8DxWD90GTAN8XoGfMzj1RMBXNfZ85fuCoJRkUQc9HfYY9q1Ovr7wayY2J2SD/gt61uouf3d8atD/QI/R6alnmt1qqjUC9CboeWzy3SekDocIgiAImg2ZF/ZwpSTmvEnwA8GOnsV917O3F8mSMaP2zePnWi3hPHt5o13T+N4Ldhe8UmPPvYJj84qpDjRVBjoYkyIaCfOysZvEO/5/9sals0C3g35w8dzJ+mdNCfoIdAto2nbH+4AOczeP5evyIQRBELRDNl75UMG1gvMFu3Zswgrqj2zQyC9K6ScSbCT4pBPnOjKtnEHmSPK5YPOuxls2ZCPfh8vqwKutL+jrjSw+m0pAl947sgAqNG1DYeUr7FHZOpifZV/scdQmwP9B5dNOnmg/LGu+LlQ+bHf+H6ByENY8ErXUQRDUDXctOAV75D8I+BT7Bb078HqSEAnqxutY2eK8KXv+QOdcNmbFGhCrUoHhwAu+rymo2NPokzGP7w3VTp95zfctwJUVeLSoGIOgjOQ8yru76C3Qjinrs3u/x4z5xRQEQSsh2Efwrax3o/3xNsHR3uQ1a7vjAwT/lNmrfS54QjY5LpyHMkI2+OMWVUnOCWYSfCPYphPnuUxwXo09DwsO7E68ZUPQQ+b9/JPMAvBFwXee2T9N0LvoGLtJU2WgWxGlvIqi0QT0T6CVU9bHcQH9x/xiCoJqaFzQnKA69xcEeSKb1va1YLuUPfeNEmGCgS62H/X62fUE+wqeczEdA2syQDCH4EvB3YIVBJN7acK2gk9kFnCJPtDtzrOn4M2kvYKJ/QZp1ew/iuIRTCpYSbCzYHXB1EXHlBEhoBuUNOFctJBuNAH9CWjTlPWpXUDPnV9MQdAeLe2NscP9e3EkNjZ7vaIjC7qPYFHZF7Zvyp6/yqa39XWRfGrH+lyvpb3cxVqjZ/dKgWeab/Ks6SjruS89s9qpISCCKTxbfXiVtZ6CK2RDRTrrdBWUgxDQDUhnxXFRIrrRBPSVoBtT1ncFfQaqmWkIuoN6gRYFbQlaFzRT0RGVA63njazn21MQTQlaGHQ06BfQ3kVHGHQPwYqqYR3mWeYvZdPtPkoSb4KJBENlvSFBRgjGEcwlc6XqyvtX8yzzf/1maA3BHjLXjs/VxYl/QaGEgG5AxkYUh4CuiRZwIbIv5gXdfm1Z0FAT0UH90GqgDzAbwbdBQzzZc4s9AWhV1Nc/FwckrG/k37tN03zUigjm9cxm/5Q9ewsGC85TDb9gF2lHZB9p0B28JORfgpdktcDPCE5popKGViMEdAMSAjpztL4L5ZdB54JOAT3ggu460OGgi0EHmagOskMreYb1aFC7iV+aD7MjfBnUQN9LWaLNQF+AUh7t6mnQwfnFFGSNzIHjnWqP+H29t+BlwVGCSwQX1DjfzYIT6hNtEAROUwnoVrOx60wJR9ApKtcCswMXA32AGTDboRexxo4lgJHAcsBd2JjwmKDUbVQBTgNOh8rfodJu4ldlMLAi9vVo1ScAswPPQeXXlD1PAnPkFE9QByr2f/WewH6eaf6tPEM2He4/2GCqE4A3sWmpVfG66Pl8XxAEQdCBaCKsK+oBetwzoNN0WJsN9Ep63XTQOTSPl2pMm7LnH6An84upTOgQ0H019pwPujSXcIK6IthU8JXXMD/jNc8jBT/LHDcOFSwmG0CxVsI5tpNZhoWdXRDUl6bKQLciZRLOo2gGAb026HsSpxlqLi/vWDTfuJoNrQL6scaeDUGdHYrT4KgC6g/y8cFax0uLEn6W1AP0OtFI2DQIJpRNHxwq+FhwgWBrweHu1PCx4ExvSNtHMKPMK3pW3/Or4K9FfxxB0AKEgA4ypxkE9D9rZ5j1JOjv+cTTrGhJvxEZL2XPDqA38oupCDQ/6FYXywINAz0KWgv0Lug8xmhwBfv+03e0dKNlcyEYT/Ce4FJ1sDWT+UVfJbOzG+XGoXavtwUbFBV7ELQYTSWgexYdQNA0TAJ8UmPPJ8CkOcTSzDyD2XetBVyZsGdt4OHcIsodLQfcCtwObITVrk6LfdzXYTXi2wCzWyMrbwDTA+th9fmbQqXW92rQOKyHJR92qMDvat8r5kW8PfAB8GUFphEMwKzV3qnAh7lHGzQtghmBebDvwxfj+ysI6k8zZKBPtoxg6p7nQH/LJ55mRkdbiYbmrbK2D2bTNk/+ceWBxgN9CDopYX1z//gHgf6FjZ0fAXofdA1owXzjDeqNbMTxf2rsuV1wXF4xBa2FYG7BY/5U41vB9/73O/2GLTAiAx0EVbgD+CtoJqi8PeayFsU63TfPOa5m5CDsP+Wn/KZlMOY4sCzmQrEpVF4sLry6sjI2fe7A6suVSzEP8oFQ2dqOqQ0qI/IJr/mQPV1aHZgbGIE57dxcgaGFBjaa8YHva+z5HkgpewqCriGYDXgIuA+Ys2J19z2w33cnAQ8KFqnAZ0XGGQTNSjNkoCuguzAP4g7ZT/0fNvTjokJCa1q0Cugs0P1Wf67DQAOKjqq+6ABQjfIUnQa6Lp94mhvBhp5R+0Rwm2fUvvDXKkXHByDYX1balLbnFZntXRBkiuBG/7kYwxbY/cifEZxVRGwlpKky0EE5aAIBDdgUuBv8kflL3uT1OmikP07vXXSEQaOj/UGP1NhzOujaGnv6gHazfXoW9B9ssma/9Pe1DoJB7lDxN7V7WumNeUe5VdxCRcbo8czuNnWrJ6yvL6uFnjHv2ILmRtDHv7eWS9mzheCLPOMqMSGgg8xpEgE9Ci0E2hF0LGh70JxFRxQ0C1oTs0tM+VnRs6ROGtSMfmP3kYvt3b2G/21/UlKlthwwC7xxuxd/4yD4n+DslPVrBTfnGVMSgiO87nRnwWR+bHLBHm5flzDaPQi6jmA2r3VOGym/sO/pk2dsJSUEdJA5TSagg6BeaFzQe6AzE9a3A/1stfhV19tcYN85pghXb9BVLqTb1ctqc2xI0I/+dOVN0In2xKU5EfSTDSRZLGXP6oKfqj26zhvZaO9dvLRE7Zq4PpP9/xoEmSNzdZGs9yRpzyB/QtKWZ2wlJQR0kDkhoIOg02gpz0LfAfoTaAHQ6qALQMNNRCe+d2XQT6ApE9YnAH0J2sL/fY4L56NBK2H1/H8FvepZ7KacXieYxYVB4sRLwQK+pzRlL4JxBPO4uJ9bHXyhgyBL/MbtXUHiYCbByYL/5RlXEoL+guUFixSUEQ8BHWROCOggGCs0B+hq0Bem4fQd6B7QwBrvOwx0f40912DNmet6NrvK9Ez1AT1Ru9a6MWmXgU6cHCpYzeugC89AB0FR+JOPb6s9rRGsIhgm8yovDC8jedJveH/2n+1hgrNlDk55EQI6yJwQ0EHQZcamlEInUnti5vmgS73MI6V7Xkt7xnvyzl+/TGhxrFfhMNCmoOl+t2q+tmckvhuuFtxS/ziDoLx4Fvpsbya8yptu9xPc5KUbhxQc36KCH2STOueWjbGfwG+AXxc8IhO2eRACOsicENBBkAvaDfRajT0Pg47Amgw3SdnX0wX0MtnGWG80Nehej/1Fzx0zJfEAACAASURBVNx/hA2gORwfgS5YQebCsUf7LLOXSRzmGayFi/s4gqA8CFYUXOiZ3v8JzhEsUYK4nhZckrA2leBzwS45hRMCOsicENCFojbQRl7veh/ochdaTdsk1rpogAvFtRPWl8QaBRcCfWLfF4nn6gH6FbRsXUKtC+qFTQR9jDEaLbUO6FvQQb8dgU0FQwUfyvxubxV8KhiiBNu4IAjKgUa7hMySsudIQQ1r0MwIAR1kTgjowtDEnnEcCroCdAjoXMzp4UMTUkFzoUP8670daHw/1tuyzfqS3xw+dC/o5JTzLIp5nE9d95AzQ9v6xzhJwvqGWJPlpL8dgckEWwtOEBwn87WNm8sgKDmClQU/1dizkeCTnEIKAR1kTgjowtBNoOdBHXw81dvrYD8GTVRMbK2M+oPOAL3iWd53saEnGZQMqALaE/SNZ5s/9Gv84OLa7aa0Oeb2MVeVc/TypxW3dT+ePNH1oERvZ38a8xVog/xiCoKgHgiW8TrsRDcawTaCt3MKKQR0kDkhoAtB89rTrY6jx39bHxf0vpVz5BLPlJhNWgNlNOuB5sXcNZ7CmtyWB23hAvpX0GYZXacP1ki3qZdudLhRUg/M6eMr0F6gP4BmNXGpx7G64QHZxJIXegS0f409g0F51UQGQVAnBH29V2G1lD3XCK7KKaQQ0EHmhIAuBO0IerXGnrNA19Q5jvVBb7iYH/V6x4Rdq6E2rLHtalDPKuu7eonBgBzj2QMbnjLqa/M16OLGvNHRzaBTUtYroE9b83svCJoPb2Z8UzBNlbWNBSOUn6ANAR1kTgjoQtB+oBoG9zoSdGcdY9jRs6pHYN7GvUGzgQ7CPIj3qd+1y4gGYU1+CdZwqmCTBA/NNy4ATcgYpT6NhvbwpyrjJawvj7lzjPHLNug8bhW2pGAHwY6CgWmP0YOgXgj6CO4XfCU4RbCVO+vc4C47u+YYTgjoIHNCQBeCNgN9Zo/qE/dcDbqgTtfvj0252yZhfSPQMBLHUjcj2gP0TI09J1PTyzmojibAGmT/U6VkZUGsHjzR+zmojWxoxasuTl4RvOAewe8IGszyMGgGBD0F2wluFrwteMYt9xbJOZQQ0EHmhICuC5rZ6j11hb/2t2O/rU/uAjahplYz+/oadYpvZ9DbuO9uwp4XQPvW5/plRPtYfXHqnuNAt+YTTzOiOUGvYbXdN4HOAz2ENVReDsprqELT4bZh3wguFkzW7nhfwT8FPwoWLDLGICiQphLQMYI1aFK0E/AysAHwrb82sGPayfZUvsCmRJ1jWWC1e8SqZYC7gPup37S1WYDnbJBVIs8Bs9bp+mXkNWCu5BIDAP7g+4IuUXkFmA/YCXgdGA/7Xl8KKptC5Zcio2twDgOeBLaswJejDlbg2wrsDNwKHFtUcEEQBM1GZKAzRat5XfEWVda28LV2XcnaA/Sd1xy/xGh7swtAfeoYZycyqbqa33yJWwGNj1kHHpWwvjK/DTppZjQb5kf+HObb/ATo2OTa8KBoZHfC3wvWSdkz0G3F6vj/ShCUlqbKQAflIAR0puhx0Kkp66eNWSagvt5A9VfQWqBp6xsjeI3z18kiXb2xaXgJNdLNilbDGgkvwmz9JgPNDzoQc+A4sugI64tWxTyp78NcR9a1Mh696N8PVXypy4kPYZmjFRroBBO7Tcv8KXum8z0t1NcQBL8RAjrInBDQmaE+2HS4P6bs+aPvGT+/uKrGMR7miHA+vw3v+G2t4kL/U1pykIv+D/MsHsFo+7g3QVsWHVl90RT+BOSIKmu9QNe5kK5i8VcOBD28y/+Ddr6MwwS3CGYvOr564Y1awwXLpexZyD8fCZMgg6CpCQEdZE4I6MxQf/+dPVvKntl8TwksybQY1sz1BGh30JqedXzEy0pavGtf44HmIXH0dLOhvTFP8LaE9cm81GjFTpyrv2fztwUNBOXy/4vgUsHXgt0E8wimFqwguE3wbTM30QkeEJyTsn60YHCeMQVBiQgBHWROCOjMUC/M+m2llD0r+56SuA1oWtDpoGdA32J1r2eBZiw6siBvdAUoUYD5nsdA+6Ws9/GnGsP9Jux1L4n5GrRjtvF2uDKsJfhZsECVtYrgSkENm8LGxW8UfhWMUXYlWN/t7GJMetCqhIAOMicEdKboJlJ9gnWTvYKgbOh6Uuv3wWujD05Yq4DuAL0FWpbfLBLV28SzfrInHPVBcL3gXynrAwQjZS4gTYngL16y8qzgLMEZgsddWP+t6PiCriGYRrCLbLLfWbIBOVMUHVeDEQI6yJwQ0JmieUHfg84G9Wt3vJ8f+97KAoKgbOhY0P0p6z1BX5A4altrY97lCU1q2sa//+tSEiN4SZCa5RZ83uxZWMFMggM9436N4BDBnEXHFXQNwTaCnwRvCK4QXCUbjDNUsFHR8TUQIaCDzAkB/RuaHnQC6EFsyMhdoL+DJhzL8yzp7x8GGuyvYX5syfrEHgTdRQtijZMrJKzv5aUYEyesX2xlIInn7wkaAtqw+7FWOTs8rxqjgWUjhROt3oKgTAhW8acHOwgq7Y73EOzla/E7pXOEgA4yJwQ0ABrkNcBPYpZlW4KOBr3rj6QHjOX5xvHH2Lv4a1l+NywlCMqIjvUs8R5WB69xsOmBJ3hdc8LkTADdCzq0xvmfBO2dbcx+ZrhEcH3K+vxh4xY0EoInBKelrF8k+G+eMfl127ysJKHhuJSEgA4yJwS0uQt8BTqJMUZbqw/obszfOaZnBk2OKpgf+SeMtvAT6FXQ6jXeewMo8Ze973kTtH128bY7M/yfYIRgjSpr4wkeFNxZj2sHQdbIRrCPFCyWsmdU42gu1pKCJQT3yMbCy5t2HxAMzOP63SQEdJA5LSCg1WZ1x9oAtBxjTFTTXp5lTvhPSNN69m2p+scaBGVBA7wcacpO7t/by5QSnrRoPhfjdRvG4rW/vwrOFWwgGOSWdq8I3hbkMKQoCLqPYEYXqTOk7JnX90yaQzzr+c/WJYKVBLMJlhecL/Mg37zeMXSTENBB5jS5gNbK/ktdoM+8Fnm412v29T1Xgc6ucZ5nTGgHQVAdTQz6HLOx6yCi1R/rBbih7lHYL/c7vGHwF8GLguMF/Wq/OwjKgWACf6KSWOMsWM0bDOtaSiGYROavvn/C+m6yUfJT1zOObhICOsicJhbQWgX0K+h40FR+rCc22OFl0P+8xvMmq/FMPddDVhsdBEEyWgybYPkm6Ez7mdFlmCf0w/zOmSaHaKCly65ko8x3FJwuOMCb0lr6c9JICO4TXJyyfoMgxTY1szi2FXycVCriTY1vCnavdyzdIAR0kDlNKqDVwzPPxyesTwn60us9TwXdkXKuNlLtu4IgGI0m8XKOq/zG83zQJsklUkHWuKA52TOYL8s8sh/22tVno5GyMfCa42GCwwXjtjs+vn99f1QOvuaCk2oJdcHlgnPrHUs3CAEdZE6zCuhFMEuuFLN5nQD6L+j/vKxj8YR9O3sGLcG+KwjqjSqgdUAXYU4W92BNr+HvG4yB4EjBEMFyHY5PIbjTs4XjFxVf0HkEq3s50jfeCPuw4DvBR4JBOcVwoiB1AJjMo7rGJNNCCQEdZE6zCuj1rR4zdc829qgZQOdiHrVbjhbKmgZ0MDaKeNu6hpsLarKvcaugXqDrsCEll3l29zDQ/V7Tv3XREQblQTCZZy3XTVjv4+Jrt7xjC7qGf83W8SbZ/QVrts9I53D9rQSfykRotfU22XCXnfOKqQuEgA4yp1kF9CqgH6z8InHPHqDn/O9toAMwL2j5ewV6nzoNfsgHzQO61m4mJMyu7zarVQ0aAx0L+hg0R5W17f3pySL5xxWUEcH6soExif/3CU4R3JpnXEHjIrPU+0JwRML63wXfqtzjxUNAB5nTrAJ6MqyBcMWUPfeCzupwrDdoAdBqoFnTBXjZ0fKgn0C3gP4E+gNoXdC//XOzcdERjon6gf6IDbaZvPb+ZkfjY4NNUkb26nrQlfnFFJQZwV8FL9fY8zfBE3nFFDQ+7vgxTPAfmaXdAp4Vv1Jmb7d+0THWIAR0kDlNKqABdJ6VaGiGKmt7++PvKlm9ZkATYMMwTkxY3ws0FFQS2yFNCboaq1sf7l8bea3vbEVHVxxa3D8PfVL2bAV6L7+YgjITGeigXrhovsHr6+XfZ7cKGuEJWAjoIHOaWUCPj00R/A50AWh30OGgR7yetIFLM2qhTbxcI6FOTj1Ar1MKb2tNDHoNa45bxmLWOKCFQLdiDiizdHjPNKBNsVrgXSxr3YxoOawGv5KyZ13QkPxiCspMuxrodRLW+wg+jBrooDsIJio6hrEkBHSQOU0soMGF4qZetvAs5rpxwpiCrNnQUaAaY4t1EejCXMJJRcdjo6KrfA+qzb9mPoBDFdBBnqH+yDPUg70k5WFQk02a06yegU75ftX+oKfziykoO4KjPEu4bIfjk8uGzLwVLhxBixECOsicJhfQrYqOBt1eY8+/QIkm/fmh90F/SVkf5FnYCUH7eunJ+r/PymoG0IPYgJzcutPzQc+BEvxV1dc/f1UnhAWdQ9BbsI3gQrcKu1Q2gCSldKa8uCvCqYKRskmM1wgekPkGPyeYuegYgyBnQkAHmRMCuinR5pjzxjgJ6xXQSyZIi0S9QCPTSzA0uWdhF8PcUbZI2NcXq/sus5VSF9BSoJ9BZ4D6+7Ee/vl4CvQiqTXSQRqCaQSDBV8KLhIcJDhf8InML7lha/AFcwp2lk0i/Ic3gjVwY3QQdJkQ0EHmhIBuStQXm7R4SML69phDx/S5hjVmHBXPLq+QsmeAC+jtsXr2hJsCwKZKNmFzlJbxMhf5jdEPfuNxHanDgoI0ZBP7Hvfs7MQd1iYQ3Cx4Ncn/NgjKimB5b/D7xGviBwuOE/QrOraCCAEdZE6DCGhNCFoUNDsxEriTaC2vDb4MtCJoZi+HOBNzutiu6AgNPQI6KWX9r6BPrcxDr9U4157NWw+sHqC5MUvClUZno4OuIljBxUXVz6Wgn+BrQQktH4OgOoJ9BcMFFwg2dDG9u98MviOYrugYCyAEdJA5JRfQmgtrFBvp2TdhvrjHgcYrOrryo8WwJryf/HM3DPRoesY3b7SBlygsV2VtLsyF4wDQepizSI+Ucx0Huqt+sQbNhOBQwQM19lwvOCOvmIKgOwgWE4yo5sIiGM+fttxdRGwFEwI6yJwSC2jNh00GvBG0hNV5amrQxljj1D2Rje4sagNNO7r8QeN7VnoPL41YnFSrtLrHd4xny6+wGmZtj41X/wF0lX2dNbmXe6yecI7eoLdA++Ube9CoCE4W3FBjz/mCS/KKKQi6gzfC3pSyPq9nombNM64SEAI6yJwyC+hHsDHUVYSdpvds5A75x9XoaB2vo/3Ryh30upd0PE2hg2U0CHQ5Zkv3Glbf+6fff/11kpdzLNrhvRNgg1g+AvXNN+6gURHsKXipxp4HBEflFVMQdAfBM4I9auz5QuWfHJg1IaCDzCmpgNZMXnIwV8qeY0AP5hdTM6CVPNN70O9LYNQfdBPoY9CUxcVXC/XE7PdGeinKBR73EGzq5LxFR9i8aFn/mbsRm/K5U6PfrAhm9VrRFRPWF/H1RautB0HZ8GbBVCciwceCjfKKqSSEgA4yp6wCekWvi02bwLYR6JP8YmoG9BLo5IS1cTDP4YT1MqFFsQEil2KDcTa1Eo4ge9TLS2t+Bd1l3x+6FPSB/fxpiaIj7A6C471RcKNRFm/uzrGG4FPBhUXHGASdxT2/L0pZn9b9wRfMMawyEAI6yJyyCuhlvKwgpcZZW4LezSuixkcze1Y/pfZNO4HeyC+moPzoVC+Nma/D8V5YnfoQummlJ5hYcKTgMdkEvRfdk3me7py3k9fuIThENmTkJ8HLgu/dnePEsLALGgm/8RtWTSALKoLLPEtdYM9LIYSADjKnrAJ6YqxhrOqjVd9zGej6/GJqdLSkC+i0m5JVrDY6CAA0mWeeV0tYb8MGuRze1Sv8TO9ZfqXnR8Po9dYIeuwvWEc2BfAOwc+CDbp67rFBMInb2u0gWFkQ/tpBQyK4xJ+q7CaYSzClYDmZr/lQwcJFx1gAIaCDzCmpgAbQRdho5smrrK3uGepBuYfVsGgeF9ApNc7awrKNQQCgtTEnnJTpdTq0a70ImrgHI855koVH3M7KGpefhI1pP2NUbbVgH88MFzzwJwgaB3+qsofgw1Her4Jf/KY0pa+oqQkBHWROmQV0X9ATXmd5OOYDvA3oEhfPBxYdYefQBN6AtT1oTdC0BcXRBvoMtGvKnltA/84vpqDc6M+gd2rs2Rn0wliedxLQy8ty79sjqYw8ggMWxyZObgh6BXNi6euPnJ8THNblDyEIWhjB5J6FbvVSpBDQQeaUWECDNYZpL9D92ECNtzB7s2WLjqxzaEfQN16O8qr/fYRn1ycsIJ5dPcvXYWiJKnZDomFj1roGrYtWwIbwpAwt0kmgO8byvKeDXh7CJHuNaSOnfpi14okAghMEt4xt5EEQBO0IAR1kTskFdJaozR9JH425CBxS3xIQ7eriY0d+5xChpUFvgO4m9+ElqmDT+kaAHnIhc4ELlu9AY0yvCloZjQf62rLMVdf7Yb7cqbZZHd7Thnm4b+o+zFVGr2srzKu8IjhCrTk5LQiC7AgBHWROiwhoTQt6ChsDfqeLxvuxBqlbrMwi0+v180zvtgnrAzyWgszstaCXxVznJTF7g6YqJpag3OgvmKXk9vyuAVWzgx7zcouxsBDU1FhZ5uzuGDBU0CHDrXl9z6Te+HRWNh9LEAQtSgjoIHNaQECrJ+Zv/ABj2G1pdmzq3bUZX3MDz9ylOV5cZq+gedEC2NCRp7z86BbQX/ltpHqjoJ38hvA7rC/hbWyYzV0miMfqXJO7OJ5bML57LR/aYc9CIL3MnCv4IJMls/tYgiBoQUJAB5nTCgJ6I6z2eLKE9flcDCyQ4TX3AD1TY8/BlgUPikEVfzJRp+YabedPOG71DP9W2BCSL7EpihPV57r1QhNj7jd7Yx7sXayVVwUbwrIzgGBtwa+CMwTzCnotxYNH7s3xXwq+FZyZ4QcRBEFrEgI6yJxWENDnga6qsWcwaM8Mr7kNtd0LTgHdlN01g86hue3zrqGeCf3VbnayLKfRgphTzDZV1qbCnCYuzu56jYYOwGqnZwIQDBI8385ySz8w/vduxdWj6GiDIGh4QkAHmdMKAvo60Kk19twJOjLDa87uOmChhPVxQG+C9snumkFt9EfQD15KsRpoVtBSoGMwB5KDMrrOhf/f3v3HyHaWdQD/bu+lBapg648aSUvTIugFxRYVlQQJVq2BYtQ2RAjib/zDgonUNmpMJIBEKTEWCi0YRK3RUiIk8iP2+gM0wSKJcq1FJCXYxCBBK221tBfSxz/Ou3W7d2Z2fu2cmTmfTzLZu3vOzHly5+y7z777vs/TzTyPPf7clmAPtFlHnZ7U+9J1MXxVm9m+7ILc+YZn54P3fVNO3Hostw+97NZYlZxXyfNa05kJnUWBRgLN0g0hgb4+qT894Jx/ycT6yHNd913purTtq/tcj0rqbemqDJy93Gsy3sO/tNww5vhl6aqTnNICd45r3Z6JlSnqtKTuT+rSxa+1qepIurXVH063tvqetrTlZd3/D/tVcn4lt7ZZ+nsrubv9+6OVPL3v+GCNSaBZuiEk0M9vycoTxxx/dkucnrzk6z4+3cbF+5L6o252s96SbjPZfyT1zOVej8nqkjbLfNaEc44f/NeKqa51Z1I/ecA5/xVlA5lSa8d8VyV/Uck3V7LTvv6kSv6kks9X8o19x7lXJRe3UoVvrOSatlRnxaU7IYkEmkMwhAR6J6m/bLOCT9137DnpOh0eUpmsOpKuu9qNLZn+43SNYcw8r1xdmdTHDjjn1UktoeZw3ZrWCGTM8Sek27hq1pCptE2W/1DJKSUDW8fG91YyYdnQ6lTy6EpuquShFvPNlXy4kgcr+WAl5/QdI4Mjgd5wNeHRlwEk0Em6uszvaTPNH0+35vlT7fPrs3FlxZjdNC2n67XdvbHwtX46XRnDMW3b6y1J3ZG5GunUVyR1dbufTyT17qSuysZV9WAWlXy2kpdOOP6cVs2khw6np8Tyjkr+rZKL9339iZXc1h5H+oqPQZJAb6hJiXPfifRAEuhddVFSP9dmGn8qqSf1HRGrUt+drqX6V08450OTZ46nvtbRpP6q/ZJ2WVJf3q3rraekW//+QLd0aObXPZbUXe11r03X7fINSX26PZ6yeOysm0oe09Y6j1321ZZ4VCXfsMrYRsRxrM08f/uY4+e09dtXrDq2cdbhlw4OnQR6A02bHPeVRA8sgWa46kib9b0pIzep1YvSlbR76qnH5rremelapT/Qlmt8octv6h+TmmMQrzPStYC/JalH7zv2mHSl+e7w15TtU8lpbXb5eyec8+SWQJ+7ythGxPGKSu444Jx3VnLjqmIaE8N3VvL+Sv67/b99rpJbKnlan3FxaCTQG2iWpFgCDQ+r85O6NKlnJPXYJb3mxW1pxYeSenFS39pmiG9IV1buF5ZznUdc87HtOt+X1ALJTb0wXUOgx485fna6Das2Jm6hSv6mkt+ZcPwX2ybDXjfpVfLqSibuI6jktys5oDLS4ankRe0XkpuqKwV4cSVXVPJnlXyhkkv6io1DI4HeQBJomEk9t82kVrrqKdVmb6/tZloXfv3zk/r9pP69vfY96TaZjp3dWw/TNN6pDyT1m6uJh1Wq5AWVnKzkBSOOfUd1XRuXXIpzdpW8fJ1noCv5ukr+p5KRjbMqubaSz5SfidtGAr2BLOGAqdWl6dYpvzGpC9NVUHlcUj+cbu3v+0cvv5j7eht039dbk/rDA865Oak3rSYeVq2SX6nkS5W8r/376paMnqzkzX3PPrcYv62tgb6xutJ1z68uedk9/rWV3FfJEjt/zhTfKyv51xrT4bK6CiJ3V/Kjq46NQyWB3lD7NwpOeqyaBJo1UUfSbYR7/ZjjF7QlCgP9wVa/mtRHDzjnn5K6ajXx0IeWoF7flnTcVsnb1mXJQSWXt+TzwUoeqOREm+39dCXPqq4RzEcq+bvqqQpHJb9XydsPOOfPK3ntqmJiJSTQG26dEuddEmjWRD0r3Sa+r5xwzg1JvXt1Ma2TOtbWaY9ZalLPa8e1dmblKvmetq74lyt5XCV/0GaiT1TyqTZz/sVK/rqS3lrYV1di73cPOOcDlfzGqmJiJSTQLJ0EmjVRL+mWaUw858qkTqwmnnVUr28bCX88D2+srDPT1Z2+N6nX9Boeg1XJ31fypn1fu6i6qhzXVfLJSo73Fd+emK6u5J/HLXep5FHVVeR4yapj41BJoFk6CTRroi5P6j8POOeapG5bTTzrqE5r/wf3pmsC9Jn28Z6kXpm5GrPAYir5mup25F404ZwXVnL3KuMaE8d51VXaeNmY47/eEugx1W7YUFuVQB/tO4At9rSMaPc6xnmHGQjM4CNJzk7qmcnOuCT5B9p5A7XzUJLXJXVduu/zC5LcmeT2ZOf+XkNjyHZbc0/6C9JdSc6q5Iyd5MEVxDTSTlfq7+XpNl1+S5JbWmwXpOv0eHmSy3eSe/qKEZjdMtZDX5jkoT2vNe1jSXV2YRF1S7pGI1814tgrWoWOXjutAY9UXWm4quTYhHN+qJL7VhnXJJVcUsnftg2PVcn9ldxaYzoosvG2agaaUy1rQ+GXJTlrysf3t2uePvKVYKXq7K7SRH02Xd3nn0jql5I6nq6j34v7jhA4VSV3TKpcUV2Xv7XbAFzJ0Uqe0FdVEFZGAs3SfVck0KyVOiOpn0/qvUnd2a15rjd3VSiAddRK2J2s5Mf2ff1IJb/WZnqf0Vd8DJ4EmqWTQAOwsEqubInyx6trk31zdWuOP1/JD/YdH4O2VQn0EruJbYx1rAMNAAvbSa5L8vVJbkjyv0k+l+Q1SS7cSd7TZ2zAZpplM9+qmYEGALbZVs1AD6WM3d6keFKN1trzUS1XAABOMbQlHAclxZJmAAAmGloCDQAACxlaAn3Q+mYbCQEAmGgoa6B38sj1zdOcDwAApxhKAp38f1I8KYGWOAMAMNGQEuhdkmQAAOY2xAR6HZ1sHx/sNQoAgMN18uBT1p/Z2PXx9CzvF5orkrw0yVVLej0234+k6072ur4DYW38TPv41l6jYJ1ck+STSd7VdyCsjd9K8o4k71zS630pyceW9FqwdD+b5BN9B8FaeVWS430HwVp5e3vAruPpxgrY9Yl0OQX7DK2MHQAALEQCDQAAM5BAAwDADCTQAAAwAwk0AADMQAINAAAzkEADAMAMJNAAADADCTQAAMxgWa2jWS8nsyW95lmaL8Y9wSO5H9jvZLqxAnbJJxiU05Oc23cQrJUzk5zTdxCslbPaA3adk26sgF3npsspAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABgGHb6DoC51L7PZ3kfF3ku62ue93X/c2Z9Ppth9302TpDMdj8YI7abXGIBp/UdADMbNaBNGuSW9VzWl/eV/WrPY57nTvM1Nsci9wPbZ9y9IJeYwdG+A2Buu7/tzXPTLvJc1te87+vgZg6YinGCXcaI7bT/fd1NrKd9vwc9RpiB3iyj/vQ27Q28yHNZX95XRtnZ85iF+2k7zXs/sJ0WuReMEY0ZaGDwa9mAiYwR229Qye8ymIEG9jOQApMYI7bL3vfTL0dTkkADo/686wcksMsYsb0kz3OSQMNwjVoHZwAFdhkjtpvkeQESaACAYZE8L0gCDcOlLiwwiTFiO0mel0ACvVlGlYqZtqvUIs9lfS37ffXDctiMExzEGLE95vmeNkY0ythtrkmD2EE3swFwO817T4x63qAGwoEyTrCXMWJ4xn2P70+SjREjmIHePKNu5Fm7Bs3zXNbXvO/ruHPcE8NmnGCXMYJRjBEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAodCpjAAAASxJREFUAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACsqWoPABZwWt8BAADAJpFAAwDADCTQAAAwg6N9BwBAL/avhd7pJQqADWTABBiOgzYQ+pkAMAUz0ADDtDdZVpkDYAbWQAMMz/6Z5t3PJdIAU5BAAwDADCTQAAAwAwk0AADMQAINMDz71zrvfq4KB8AUVOEAGCYbBgHmZAYaYHhGzTSbfQYAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIDl+z/EgWw0G5Q6GQAAAABJRU5ErkJggg==" }, "metadata": {}, "output_type": "display_data" } ], "source": [ "plot(a~b, data=hypercube, type=\"n\") ## to scale the plot for the whole parameter space\n", "points(a~b, data=hypercube, subset=hypercube$X>1e-6&hypercube$Y>1e-6, col=\"blue\")\n", "points(a~b, data=hypercube, subset=!(hypercube$X>1e-6&hypercube$Y>1e-6), col=\"red\")\n" ] }, { "cell_type": "markdown", "metadata": {}, "source": [ "Further exploration can reveal more!\n", "\n", "### A more complicated example\n", "\n", "Let's check a well-known result: in which conditions disease spreads in a Suscetible-Infected-Recovered epidemic model (SIR). \n", "\n", "#### 1. R function for the model" ] }, { "cell_type": "code", "execution_count": 62, "metadata": { "collapsed": true }, "outputs": [], "source": [ "oneRun.sir <- function(S0, I0, R0, r, a, time=seq(0, 50, by = 0.01)){\n", " ## parameters: transmission and recovering rates\n", " parameters <- c(r = r, a = a)\n", " ## initial population sizes: start with a single infected individual to test invasibility\n", " state <- c(S = S0, I = I0, R = R0)\n", " ## The function to be integrated\n", " sir <- function(t, state, parameters){\n", " with(as.list(c(state, parameters)), {\n", " dS = -r*S*I\n", " dI = r*S*I - a*I\n", " dR = a*I\n", " list(c(dS, dI, dR))\n", " })\n", " }\n", " ## Integrating\n", " out <- ode(y = state, times = time, func = sir, parms = parameters)\n", " return(any(out[,3]>I0)) # returns a logical: any infected number larger than initial number?\n", "}" ] }, { "cell_type": "markdown", "metadata": {}, "source": [ "#### 2. R function to run the model for each parameter combinations\n", "As we are interested in disease spread we restrict I0 to one and R0 to zero." ] }, { "cell_type": "code", "execution_count": 63, "metadata": { "collapsed": true }, "outputs": [], "source": [ "modelRun.sir <- function (my.pars) {\n", " return(mapply(oneRun.sir, my.pars[,1], 1, 0, my.pars[,2], my.pars[,3]))\n", "}" ] }, { "cell_type": "markdown", "metadata": {}, "source": [ "#### 3. Set the hypercube" ] }, { "cell_type": "code", "execution_count": 64, "metadata": { "collapsed": true }, "outputs": [], "source": [ "## A string vector to name the parameters\n", "factors <- c(\"S0\", \"r\", \"a\")\n", "## The probability quantile function used to draw values of each parameter\n", "q <- c(\"qunif\", \"qunif\", \"qunif\")\n", "## A list of the parameters of the above probability distributions\n", "q.arg <- list(list(min=10, max=200), list(min=0.001, max=0.01), list(min=0, max=1))" ] }, { "cell_type": "markdown", "metadata": {}, "source": [ "#### 4. Run the hypercube" ] }, { "cell_type": "code", "execution_count": 65, "metadata": { "collapsed": true }, "outputs": [], "source": [ "myLHS <- LHS(model=modelRun.sir, factors=factors, N=200, q=q, q.arg=q.arg)" ] }, { "cell_type": "markdown", "metadata": {}, "source": [ "#### 5. Explore the results\n", "Let's start looking at the effect of each parameter.\n", "with a boxplot of each parameter value in function of the occurrence of disease spread." ] }, { "cell_type": "code", "execution_count": 66, "metadata": { "collapsed": false }, "outputs": [ { "data": { "image/png": "iVBORw0KGgoAAAANSUhEUgAAAtAAAAJYCAMAAAB8aiEbAAACUlBMVEUAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD1eKC/AAAAxnRSTlMAAgMEBgcICQoLDA8RExUWGBkbHB4fICEiIyQmKCkqLTIzNTY3ODk6PT4/QUJDREZISUpLTE5PUFFVVldYWVpcXV5fYGFiY2RlZmdoaWtsbW5vcXN0dnd4eXp7fX+AgoSFhoeIiYqLjI6PkJGSk5SVl5mam52en6GjpKipqqutrrKztLW2t7i5uru8vcDBwsTFyMnLzM3O0NHS09TV1tfY2drb3N3e3+Dh4uPk5ebn6Orr7O3u7/Dx8vP09fb3+Pn6+/z9/v8yJGs6AAAACXBIWXMAABJ0AAASdAHeZh94AAAa+UlEQVR4nO3dibslR1nH8RNIouiIsukoiyQQVJAIiGBEENcwouCGISojOu4JSFAJ6BgkIhjiFhizOSokE0MWQrZBk0gSwf6/NHNO9+k7U1Wnqqu6z7t8P8+T3HvP/k797jld9Xb3Xa0AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAARL39uCR//pIWNXU9J/WmeKt3dd3t1wjy+I81KKkLfGe53iRv9a6uu2r2pyhw7/yBtldvkrd6LRZMoEe81WuxYAI94q1ekwWnJoUW600xWS8DvEW9+9ToDSvw3cBiwSnUu08EujmL9Xr7BCbQIwbrdTe+3gruusRblsV6A98NDNbr+SPpXAbr9RfoFIsFE+gtg/WmeSvYYr3ePoH9FZxAvfvEpLA56t2nGQP9S4+ufe0LLZ6ilfk+gi3X2+u8jG/gu9ULL1t75GTkXr91auShh8c//WGLVxU03yRpZ73VLrh5/G/0xL2jH+54beQ+871DGx7f9CbH/bdE7nXRkZF/uGn80ytbvKqg+Wf90XrrvWX8b/TU1aMfLn9u5C7zb3IYHN/0pDBvgD/8sfJnPf/jN4zc94+jH/429k+mOtAHPPGGnFvtMdAHTBnfKRZYtpuv4PPec2zk6b8c/fD+F0XuQ6BbI9BB9QUvOcD1n0j1Fqw32eo3Geih0skFX/PR2teg6x2r3mOvy7nV/J3RpcY3T7t6u+G7s+QV/OKX1b4Ib4H+gW/MuZWUQNePb56G9W7/d9BiH8Gvz7nVfOuyvaXqzWPnFzhPy1/g7fv0AUsV/JOHcm7FALc2Y70/Ol7qu+pdox/eMe8y5XYDmncs6m3mghPjZszXHxj98IXvj9yn2aRw82VyoN/1K01eyE52Vjk+mbVVKiXQ9eMrZY5kcVmHdegRi8uySUsV/OHDObci0K0R6CBVBRPoEYPjm2awYAI9stT4Xi9kzmCyUyhhUrhkpzDFYqcwiU7hPJbsFKZY7BQmWe4UhrAOvU+GAk2nMMROva8T8onEAO+VnXqlzBlMdgpT6BSG0CmcyR4H+BfGB4zd9i/jn94z4XmkDLDBZdk0g53CpGi9Pzg+YOyWk+OffnjC80gZYAIdZKdg6g2xU6+7gqk3hE5hMW8DLGXWT6cwyFunsD7QdApDxAS6nq5O4fe8eu7XsSal3qUYCjSdwhA79dIpDLIzwHns1CtlzkCncCZ0CkPEBNpBp/CAt/x47fNIGWBvy5R0CoPsDLC3et0VTL0hdup1VzD1htApLOZtgKXM+ukUBtEpLEWnMERMoOvRKQyRUu9SDAWaTmGInXrpFAbZGeA8duqVMmegUzgTOoUhYgJNp7CUlAH2tkxJpzDIzgB7q9ddwdQbYqdedwVTbwidwmLeBljKrJ9OYRCdwlJ0CkPEBLoencIQKfUuxVCg6RSG2KmXTmGQnQHOY6deKXMGOoUzoVMYIibQdApLSRlgb8uUdAqD7Aywt3rdFUy9IXbqdVcw9YbQKSzmbYClzPrpFAbRKSxFpzBETKDr0SkMkVLvUgwFmk5hiJ166RQG2RngPHbqlTJnoFM4EzqFIWICTaewlJQBHtf7U8diDv4ZuwOO5D2PlHrpFAbZXIe+83PHI/7pptg1N30p73mk1Ot6gONs1nvnz5Tf/60EOkxKwZ7rnTPQdAqDlAX6WW+6LOar749e9bztA9gJdB4xgaZTGHRxd/rRiMei1zz9O9sHINDN0SkMyewUXtJdWP4KPvF72+8JdHN0CisQ6AGdwiAC3dpSgaZTGESgW2PZLohOYRCBHrgLtMlOIYEeuAu0lIIJdBkCHSGlYAJdhk5hBIHu2Qx0HjGBplMYJCTQ3f9b/+9cBHomS3YKcwc4TlWnsDv4v4MI9EwW7BRmD3A1Aj2gUxhEoCcQEWibncJvOho9kifh5dsHINATiAi0lDlS60nSjTcUe2hvAxynq1MoYVJoNdCqBjhOV70pBDrI5gDH6a/38JG10ye3lxHogf4B7lmud/yR9O5Ta/9z7/YyOoWDzE6hkAHueoHrLAc6hHXooMxOoYwB7gLfDQh0GaOBziRjgBsEWlWnMPsTiUCXkjHADQKdSVm9dApLKRvgasrqpVM4yOwUyhjgBpPCTDLqFRFolu0GEpftVHUKCfQYgQ7RVa+ESSGBHiwzwFf0l92f8wi66k0h0EGqBjj4Efytl649fHvOQ6iqN4ljCoNUdQpprIywDh1EpzBIRr1JBLqGjAF21ylMIdA1hAyws3XoJDqFNZQNcDVl9ZrpFNa/Y+nqFKYQ6DISl+3cTpJCv8EGO4VJBDpIZ6BDPNdLoAc2BzjOZr0EeqBrgDkEa8tkp7B+gOkUBsmoN4l16CA6hUEy6k0i0DVkDDCdwhGLgV6fFctP58zbIVhJFjuF3aofWicDTOt7y2KnMBjoHzq+9t+nch6CTmGQsnotLdudE+jXXLP2+B05D2FzkhRHp7CnJtA9z7P+OJv1mgn0ZnOSRsPKd71WAp3keYDjbNZrplOYYrBTmESgy0hch04y2ClMItBljAY6k7IBjqNT2JMY6K5LdBoIdAVl9VrpFIZW6waeB7iasnqtdAobBJpOYZCyelm2G9icJMXRKewR6GISA22zXk2B7s7M/XJvPeJ5gONs1qso0N26sT0h0Z4HOM5mvYo6hd14F6QidApDCHRvT+vQ3XrPo9kCTacwSFm9igI9Oc+ul7Hi6BT2JHYKkwh0BWX1mukUpnge4GrK6tXUKewmLnLQKayhrF5Ny3Zdv3JXyvMkKY5OYW+P69Ar1qEzeK6XQA9sDnCczXo1BZpNjkye61XUKVxFzxS0C53CEALdM7oOTacwSFm9BLqUsgGOo1PY20egk8cM7kKgKyirl05hKWUDXO2S7vePFfv3vdV79yfLX+1fPZj3PDN0CuecFNIpDLqkm+CpvdV735SX+0je87RftluxbJejcaeQQG+0b6yMvpQg0CHZ9RLoDQI9UB3oV11U7O/3Vu9dR8tf7ZUP5D3PDAfJzrm3HYEOUlavlk7h6PMh78nH6BSGEOie0cYKncIgZfUS6FKXdN92qNinBAaaTmFvP53C1dybHJmUzfqrEeiB1U4hgd7JZqDnOfvobO/Q2Z1CAr2TzUBbXYe+7nixewQGmmMKe3sJ9PBml/fcB3ie9cfZrFdNoKe1VNY8D3CczXoVBXo6zwMcZ7NeLZ3CZ8y8yUGnMEhZvVrWoVfz7z4qrlPYzXumKALd29vpdMdfSuhcxpr7tA10CnsEutikQM98Yp1MBHrQulM48+6jmQh0BpuBbtwpHDXeMu/R03lM4dybHJmEBPrM73Zk7Fm2CxI3SZp5VUdVp3D7WbXjT18T6IG4QE+mtN7Uqo7JQPtcxtr/visSNrEsBtrb2UfF7IwlYRLcHfzfQUo7hb7+TqG/nbHS45v699C7Du3q7xR62xmrzSewpkD7XMby0yls8omkKNBzL2NlWnqAvf0C7zD+97j8xNrTX9xepqlTOJnOAd58IpU/mdJ6NwoKftmRtdP/tr1MUadw0yzKvfWI0k6hs9Z3m1UdXct2qzm3ocVNktKz/lVeKzhOVqdw16qOhFUOqwfJLrjJ0VU3GuLE1Zt3paHGyoEvJXQO8HpNp7YVHCeu3rVEYyV2vdZAO9vkSLIY6NQ2h4hAc0zhYJ6P4JxWcJy0QCdXdZYL9AU/fWSC79o+gJhlO12dwtxJUpy4QMtofb+iu/lEsa/87vYBxAQ606Lb0NPo7BS2WaasDvSCm5SpSVKSzkBP3ztJa72JVZ0kpYHe7MjhZoDT6jc5MslY1UlSHOjVjIGW1ilMyp4kVZNRb5LaQHezBlraJCmpQaBldQpb7S6rKNCT80ygg6TV6y/Qk+kc4CSDgW6zqqMo0HPP+sUNcJLBdegm46so0Gt+OoVz7+AvLdDTqQ60o2MKm3wEf+xUzH8+Fr3qutGDEegMIgOdScgkKbTJ8Rv9ZaMBuvPa2O4Hv/6+2DV/omySpDrQjjpneVeObvbNmz/G/uBt28vUDfAESgM993kqMsmY9S+39xmBziBy2U5apzA56yfQI97qtTjrNxjoLjQtyKKz3kY7r7ztWMwtJ6NX/cTowWQEern9gxfexOomTJP01ttgb7s7T94QcXv8mn1OGsqfTOkAb48ZdRTolaMdwNscQ6mo3uGLm0C32NtOT8F5R7mHAq+03v4X2MsmR5u97fQU3Oa0DXrqHTax3EwKJ9NZsLdNjum81au1YBmnxlIwwN7qtViwwXXoNnsXKqp3OoMFGwx0m70L9dRbQWHBZyb7vlrfvg7Bml7tSmfBOxDoEY31TmsRbmgseBeDk0JfmxzTd11RWrC7E694HN+JdBbcaN8VNfVO561epQV723dlOq31utv7zNG+K7tWdZIU1vsMd61gZ/uuTKe0Xnc760yms15vcyQCnU1nvf4CndzksLku62nO4GwdepWeFNrsnLlatnM3KUwyGuiVo0BPZ7Fek4F2tGxXxWK9BgPtbtlu2vFXK7X1phmcFE6ms97NH97kE2k3bwXrrNfdnMHVOqXDVjCBPngtmxwDnfX62+RIlWpxUjiZ0nqd7Xw24Ri7l27OSH/6X7eX6Su4/NmUDvBkFusNBvodJ9ae/uL2Mj0Fu5ozrDjq+yCDmxzeAj11zxXl9To6k5DHd6zqbeg77j4Rcfc9sWvuun/0YIs2znzNgn1uQ1fW+8ZfjfnszdGr3jx6MM4PnYNNjkwz/lEocX9yhEDn0llvm23oOHmBdrfJUf48azrrbbPKEScu0Okd/FMnotE6wC63oSfIC/SHrs16MCn1psbd8wArqrdJpzDu+S/MejAh79AEekRnvW1OU1FNykGyKToH2NtBsm2O6q/GaQxycJDsbgQ6m9oB9rVMOfMmxxVHsx5s6d1HPX0EOztIduZJoaxlu+Sy3C6NB/ilh4vdOHnS4OcXeDqNga7SdIC/u5vifdsHYJUj4szvr5d36CpNB3j1/Oj78LXfF73q2dv7E+iwubeh5QVaxiZHwhNvyLkVe9uFzb3KIa5TKGRnnYS2gfZ2BMfcgRbXKXQX6LybBSgNtLdOoZC9zxIIdE/isl0mtqG3nnh9zq3YfbQ1pYEW8o6V8M5vybkVu49OF/7HUNoplB/oPCzbRXSJXVey93ePE7hsV/5Ea6oD7eYdOn1EUjf6/9mUBlrIR3A11qHDduyMldiTR2mgp1sq0Fd/e86tCt+x8m58gMlAJ65UGmj579DNl+1c7W238yDo6K+30k7h2t7fsRIIdG+edejYtUo7hRv7HuCE5q3vrpNwyNnbLou48q2xa/6Zdehs+x7ghNY7J4k4pvA7Hng05n8fi171zu0DzBfo51669vDtDR908U0OyYFu2ymcTOMv8PpXd/ccaXz9e/tp1f3x2xdTcO5CrZ3CvJsFKAz0uqcysWSlncLpdK5D+wr08L8JlC7bTacz0PI7o6dfm3OrNoFOdL7VBlr8OnQeZTsnJbzovJxbNQl0F/huoDTQQo7gSGjbKZxO4S+wy0CXP8+G1m3KqQh0iLhOIYHOpTHQqd1DV00CLa9TKH6Tw1ug735lzq0a/Zmz6klhJnZO2vIW6Mad0cmUBno6hZ3CXR/BSQS6AoHeatgpzIzx7r3PCHSPTuFgX7P+1PW5x9gR6J64ZbvpDAY6+xg7JZ3CKgS6kMRA5x5jp6RTWIVAF5LZKcw7xk7JL3AVjYFm1n+urGPsCHRPXKdwOqOBzjrGjkD35HUK13iH3slipzBF6zo0mxyZPNdbbfE/Xl/+bBo7hTvl7ttAoAst+4dVV6I3OdoeU5iUvfcZge6J6xTKD3QeAt2axmW7lZgTr1SzE2g6hb3J+0PLPo1BHjuBplPYM7oOvWSnMHdSeOrdh4pdLu8XOIlAF9K8TXlfN8EjLV+NlEDL6hSe2XpmHTrtWZt32C8R6ACpncIJLAY6tMlxtL9s9HrnDDSdwh6t71rBSeE3bP6w+Jdv3V52z8kbit3+UN6L2PcnUq9xoO86VewrFacxkBzo5TqFIlY5jAZ6gqfKAx36iM1Fp7CMzUBndwqXCbSGE83kIdCtNV62W2qTY7pxwfd87nixmzK3KfPY2TmJTmFvj8t23pax6BT2ZAW6ylKB5uyjIQS6uaUCvY9tyn2elyOPlEDL6hQ+Y5Ou8qc7sG/DFYeL/eIDec8jcZJEoHviOoXyT3juLdB0CnucH7rasDkUuM5ivSkEuhCdwjAC3TN6wnM6hSFSAi3vmMImk0IjkyQCPeJ62Y5A70ansBSBriZhUkinsGf0ZI10CkMIdHOetykJdE9ep3AyAl3GZqDFdQqnI9Bl6BSWItCz8lxvNQK9teTZR1MIdAUCvbVgpzCJQIeI6xRO53mSRKB7LNsNCHQYncIegZ4VncIQAj2gU1iDQDfneZuSQPfoFA4IdA0pgaZTOCDQYXQKewR6Vp7rrUagt+gUhhDo5ugUlrEZaDqFA82TJALdY9luQKDD6BT2CPSs6BSGEOgBncIaBLo5z9uUBLpHp3BAoGtICTSdwgGBDqNT2CPQs/JcbzUCvUWnMIRAN0ensIzNQNMpHGieJBHonrJlOwknL8xjJ9B0CnvtAy3i9LJ57ASaTmHPaKDpFIYQ6ClEBFriNqWVQA8bkzvGN05Xp5BAjxgMdLfqR3ZyoJV1CiVMCr0FesFOYXfwfwe5WYd+zkVrD966vYxA7yaw3u27s+dAH+3fte/dXkancDexgX7mi5NArz+NztrkOO/Q2vUf2F5Gp3A3gYHu/zB2cJvSYqcwOWm47qrt90YmSUkWA51iddmOQG/QKQwh0AMCHbaPTuF4k+NHblh78j9y7kmgB3QKa8xX76uOrT32+ZxbKwv0Zj4YXIdeKtAStyktB7pnsVOYRKDLSAx0buMsTlmnMIVAl5HaKTzru4HFdegkAl1GYL0EemyxQNMpDCDQzS0VaDqFIVICratTmMQ6dBmBgW4wKdS1bJdEoMvQKSxFoGdluVMYQqAL0SmsQaCbY9mujM1A0ykcEOgaUgJNp3BAoMM4+2iPQM/K4rJdCoEuRKcwjED3jAaaTmGIlEDTKRxoniQR6B7LdgMCHUansEegZ0WnMIRAD+gU1iDQzVlctss9GyeB7tEpHAgMdPbZOAl0j07hQGigs87GSaew0CXdzx8pdhuBrpR9Nk4j9SY1DfQLPntiglGNSwf6Q5cV+yN5ncLss3ES6KUtHOi/eXSCv8t7niU7hbln4yTQvcxOYbWFAx13KCuO9RZetjt6UcT3vjp2zZUmA525bJdwWMi6e2ag//gjc7+OtWUH+EQ3wcm85zHZKUw4fWnOrcQEur7gPMseBX3+oZhrj0evOj/vNZjsFCZI+URaLNALdgobnKdC1y9wCoEOUlUwgR5p2ilMINBBBLq1pp3CBGWB/s0/qH0eXYGur9dkpzDhzlfk3EpMoOvpOjVWPSnvWK4bK3OSeEzhnAh0iKFA7/uYwgsPr3351t23bUFXoOkUzmS+TY7QX86Nq69XV6DpFM5kvknhszfv0J/+YM5D1NdLpzBETKBVLWMlVzmWqpdOYYihQEvpFBr8BU4i0EGqCibQI3QKg1QFOrkOTaBD6BQWk1LwUvXSKQwRE+h6ugJdT0q9NFZmso9OYWibg0Dvk6FA77tT2CPQIXQKZyIl0HQKS9EpDJKyykGnsBSdwiA769B0CkMMBZpOYQiBbs5gY4VAj0QD/cHx2YKefGr8059OeB4CHUSgW4sG+sXjE7r97M+Nf3rphOdRFmhdncL6SSGdwlJ0CoOkLNvVk1IvjZVmzj9+w8jXbh798KmLI/ch0K0R6GbO+7VjI5++avTDbx+O3IdAt0agg+gUlvIWaDqFQVIC7a1TWI9OYZCUQHvrFNaT8olEoIPs1Eugg+wMsLd6CXSQnQH2Vi+BDqrvnOWREmg6haXcdQrzSAl0PSnvWKxD7xWBbo1A7xWBbo1AB9EpLOUt0HQKg6QEekq9Fz4e/+OGb47cx06g6RQGSQn0pHpfMv6Ls2+8ePxT7I8b2gm0lE8kAh1kp14CHWRngL3VS6CD7Aywt3oJdBCdwnnYCTSdwiApgV6KnUDnIdDNeauXQO8VgZ5Cwl/OzSMm0HQK5zH/iXXoFAbRKZyHnUDTKQySEmhV9YoItLJlO1UDnGSwXgI9ZnCAkyzWK2FSKD/Qz7t05K8/M/7pBbO9mj0G2mi9Mwb65eN/oyevHP3wmgsid9lnoD8S3xnyL2Z7NXsMtLF6n7PZz+/BW+d6hgv/K/4v9qbIfcRscixFyibHUub7M3ZH+2zd2/IZahHo5rzUe96htes/MNczTEGgm6PefSLQzVmst/4vFiyFQDdnsN4Gf1NmKQS6OYP1EugxbwUbrJdAj3kr2GC9BHrMW8EW62VSOOKtYOrdJwLdHPXuE4Fujnr3iUA3R737RKCbo959ItDNUe8+LRHoG49kuPoTH630mV/OeZ5H5x9g6jVd7+q9p3J89etPV+oezHmez2edUIp6qbdS/TF2ececSUG9pXTV665g6i2lq153BVNvKV31uiuYekvpqtddwdRbSle97gqm3lK66nVXMPWW0lXv6u2X1z7Cn31ni9exFOotpateAAAAAAAAAAAAZIqclafsMVq8kIVQ74THaPFCFtIN/5v+EPX/Ysuh3vKH0FRvi4JV/QZT79QHUcJbwdQ79UGU8FYw9U59ECW8FUy9Ux9ECW8FU+/UB1HCW8HUO/VBlPBWMPVOfRAlvBVMvVMfRAt3nSTqLX+MFi8EAAAAAAAAAAAAAAAAAAAAAAAAAACgTjccNznPwY/SDqmk3saPP8ujVlgf2d6tvBRMvTM8viRz/vbO+8jTUO8cjy9IN3w581vcbX6jz/k6/nF7UTf6Gr6btIKpd2W63oMFbz6ZurP/O3hxf7ezbnXu3Ua3F4N6bdd7VsGjD6hue4PAxWdd1AXvNv5ZCuq1XW/wI6nrp8ajr+OLV9uLRvc9524iC6Ze2/WeVfD2I6j/PnDx6Npzf4NHdxNZMPXarrevZ3Vu6Wd9Bp372qMFhy6Ugnpt19t/mKy2n0qrKZOG/lHETxqo13a9q+12U7f+qb9w83Xzsg9cvBpuuV3Wid1NWsHUuzJdbyVj5exEvcZ5K5h6jfNWMPUCAAAAAAAAAAAAAAAAAAAAAAAAQv0fQhnwyhn6FaQAAAAASUVORK5CYII=" }, "metadata": {}, "output_type": "display_data" } ], "source": [ "##Table of parameter combinations with get.data\n", "hypercube <- get.data(myLHS)\n", "## adding the output for each combination with get.results\n", "hypercube$Spread <- get.results(myLHS)\n", "## box plots parameter ~ occurence of spread (logical)\n", "par(mfrow=c(1,3))\n", "boxplot(S0~Spread, data=hypercube, xlab=\"Disease spread\", ylab=\"Initial number of susceptibles\")\n", "boxplot(r~Spread, data=hypercube, xlab=\"Disease spread\", ylab=\"Transmission rate\")\n", "boxplot(a~Spread, data=hypercube, xlab=\"Disease spread\", ylab=\"Recovering rate\")\n", "par(mfrow=c(1,1))\n" ] }, { "cell_type": "markdown", "metadata": {}, "source": [ "You can also explore relatioships between parameters conditioned\n", "to the output. This is relationship of parameter $a$ and $r$ when spread occured or not.\n", "We'll restrict our exploration to populations with initial size < median of all initial size." ] }, { "cell_type": "code", "execution_count": 67, "metadata": { "collapsed": false }, "outputs": [ { "data": { "image/png": "iVBORw0KGgoAAAANSUhEUgAAAtAAAAJYCAYAAABLtNEpAAAACXBIWXMAABJ0AAASdAHeZh94AAAgAElEQVR4nOzdZ7RkVbW38WfTNDnnnEEMgCBiJCmIkiSJgooZMb8G9OoFMeeM6ZoVE4pZTICgooAgiOSMSJCcaWig/++HvRqa7lN1OlTtXeH5jVHjNLXWqT27OWHW2nPNBZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZLmWtV2AHrIFsDCbQchSZLUJw8AZ7cdRC+YQA+GrYHT2w5CkiSpz54InNF2EAvKFc/BsEj5uCgwvc1AJEmS+mAR4D4eznmG2jgm0Oky5oq8JEmSuhqnBLpb4jz7HBNpSZIkTWhcEuhZk+duyXFm+WgSLUmSpDks1HYADZssKTZpliRJUlfjlkBLkiRJC2TcEujJ6qDnpk5akiRJY2xcaqArHlnfPDfzJUmSpDmMSwINDyfFtrGTJEnSfBunBHomk2RJkiTNt3GrgZYkSZIWyDiuQDdlKWDqXM5dup+BSJIkqXdMoOfUi9MINwQumY/XWBiYvgDXlSRJUp+ZQPfHZcDmwKJzOX8f4F1YUjMksiKwBbAicCFwPlQPthuTJEnSeHk19cr3Um0Hom6yNOTrkPsh90GuhwRyJWT3tqOTJGmALUKd6zy17UB6wRVPaa5kYeBYYFvg2cBSUK0KrAr8APgZZM8WA5QkSRorrkAPvLwccitkjQ7jH4D8pyTakiTpkVyBlgZDngr5MuRkyCmQr0J26NPF9gOOguraDuOfBFYDntyn60uSpAExLgl05uOhgZb3A38G1gR+A/yCelPfcZBPQ3p9YM661BsGO6huBa4v8zTysjhkSttRSJLUT4OeQFvCMU/yfMi9kF0mGNsOchfkVT2+5t8h7+gyXkFuh+zV2+tqcGQ5yKcgl0FmQKZBToe8tA9v2CRp1IxUCcc4GeSVZRPoeZJ/QD7WZfwwyMU9vuZnIX/tMr4D5EHI6r29rgZDVoNcArkAcgjkSZCdS+37XZCvmURLUlcm0EPKBHokZNGy+vf0LnO2KO3lVurhdTcqq97vmmBsLchFkG/37noaLPlxuQux5ARjW5fV6Oc1H5ckDY2RSqDtGKBhsyT1CY93dJlz+yxzb+rNZatLIQcA34XsAZwA3Ag8DtgfOAt4fW+uNT+yOfUGxnWAK4GToepSs625l5WBvYFnQHX3nOPVGXV/cF4F/LjZ2CRJGl+uQM+1VJDbIPt3mfOcslo8tydBzsv116/LR3Ic5CzIDyAvbm9DWZaCHF1W5S+C/A5yafnvb0IWayeuUZLtSnlOlwWHvAByXXMxSdLQGakVaA0GE+h5km9AToVMnWBsCuQEyDHNx9WG/Kqu986Wsz3/VMhVkKPaiWuUZAfIA93fJGV/yPWNhSRJw8cEWj1nAj1Pshbk2rLa+thZnn8U5GeQmyAbthdfU7IjZHr9955w/All5XTLicc1d7Ja+Xfs0uM7n4Kc2FxMkjR0TKDVcybQ8ywbQU4qmwVvpz4lMNQHqjym7eiakY9Bjp9kzhkTb3zUvMmvIH+CLDLB2GMgd9alPJKkDkYqgXYToYZUdSmwA2Q9YDNgCnAOVJe1GVXDVgX+Pcmcf5d5WjCvB04G/gr5JPBPYGlge+BdwG+B77UXnqRmZSXgUcC1wJVQDWqXL2mkuQKt+ZBPQ46dZM7fIO9uJp5Rl1VL/f3N5W7HDOre0P8PMi6nukpjLjtB/lV+Bsx8XA95E/aCn8xIrUBrMJhAP0I2gRwIeTtknzpx0ZyyO+QeyBodxjeG3E/XntmaP1mt7oAiaXxkn/Iz9UjIZnVJV9aDvKGUEh7ZdoQDzgRaPWcCDUCWoW4LNwNydem0cTN1S7r3uco3uyxUar5Pg6w529j6kHPqjZaSpAWTJSE3dL6jl6eXzcYmh52ZQKvnTKDr/s7HUfcyfuJsz+9bNgl+sL34BlVWLWUa95R/v69D/gi5r95gmOXajlCShl/2htxB1976+S3k883FNHRGKoF2E6EGxe7A04DHQnXFw09XAX5S3zbjGMiXoLq6nRAHUXV9KdF4DvUPpXWoN7t9BDjOjS2S1BMbARdCdW+XOf8EbBs6JkygNSj2AH7zyOR5VtUvIf8Fng18rcG4hkA1Azi2PCRJvXcfMNnJrouVeRoD1pRqUKwBdEieH3JFmSdJUpP+ATxmzv0mM6UCngmc2WBMapEJtAbFbcBKk8xZucyTJKlJp1CXaHylQx30/wAbAl9vNCq1xhIODYqTgA/WrcGqu+YczmbApmWeJEkNqmZAXgCcCJwF+TZwEfVd0T2pD1V6oXt0pGbZhYMsDrkM8kvI0rONrQc5D/KzVkKTJAmArAD5UGkfenNpF/pNyGPbjmwIjFQXDg0GE2gA8ijIxZAbIUdDPlkS6mmQE+o+0ZIkaQiNVAJtDbQGSHURsAVwKHALsDFwCbA/sDNUd7QYnCRJkgaIK9CSJGmUuQItSZIkjSsTaEmSJGke2MZOAiCLAptR111fB/wTKntOS5IkDShroFuVl0FugARyDWQ65N7SBWTRtqOTJGkEjFQNtAaDCXRr8lrIfZC3PdwmL4tAnluS6R+3G58kSSPBBFo9ZwLdiqwAuRPy6g7jjy3J9S7NxiVJ0sgZqQTaTYQaZ7sA9wFfm3i4Og84Fti3uZAkSdKgM4HWOFsHuASqB7vMuRBYt6F4JEnSEDCB1ji7G5jsePBlgLsaiEWSJA0JE2iNs78Bj4ZsMvFwpgLPAU5pMCZphGVhyKMgu0E2rzfsSpI0f9xE2JocDzkVsuJsz0+BfBFyU73ZUNKCyUGQa0u7yLvLx1tKBxwXc6TRN1KbCD1IRePuhcDvgQsgP6GueV4T2A1YFdgLqltajE8aAXkT8DHgPcC3oLquvDF9HvBxYAfIGcA04F/A8VDd306skqRh4Qp0q7Jo3couR0POghwLOQKyatuRScMvq0Hugbx0grEXzbIafVp53A25FLJ146FK6qeRWoHWYDCB7qtMgRwA+SrkL5AfQd4+Z9mGpN7LwZCrINVsz+8BuR/yZsjJkA+V55eDfKeUd6zTfLyS+mSkEmjrzjTisixwEvB/wBLU5Ro3AQcD50Oe0l5sGgzW3/bZBsB5UGW25z8GfBqqTwPnAuvXT1e3AS+lLqf638ailKR5YA20Rt03geWAR0N1zcNPZyrwBeCXdVcA65zHSzYCDgO2BdaD/Ac4FfggVOe0GdkImgYs+cinsgGwKbBneWLJMq+oZkC+DhzRRICSpOFkCUdfZNNSW7llh/GppdbyHc3GpXZl23KE+0mQV0C2h7wE8mvIvXVpgXonz4ZMg6w8y3NPKd+bi5bHNZBDZvu8nSHTm41VGmRZGrIN5LFlEWjYjFQJhwaDCXRf5JWQKyaZ8xnIr5qJR+3LEpCrIV+YsyYXIO+F3ApZqfnYRlUWhpwD+SVksfLcJiWBXh/yZch/IbMdapQXQ65rPl5p0GRjyO8gM8r3Tcqb0s9DhilvGKkE2to/jbKlgVsnmXNLmafxsCd1ucChE9TkArwPuB04oNGoRlr1ALAv8HjgXMgHgadR/zv/lbqV3T5Q3THbJ74QOKHJSOvSnhwI+R/IfpA1m72+NLs8irq8LNQlZ0sBK1N/f+wCHP/wG1Np/LgC3RfZr6wmdqn1z3chRzUXk9qVD0N+P8mcoyBfayaecZLlIYdDjoNcDrkA8kDdpeMR86ZCPkLd+u4xDcW2ZOn8MaOUk/yN+hCl6ZCPQaY0E4c0u/wB8puJvwazSn2XJm9vPq75MlIr0BoMPUygMwXyPMjnSk3nl6hPAFt0wV972GS5Uuv6qg7j61P3nN232bjUnnys/r7oOuebkG81Es7YyzuoW9mdW97MHlMS2JsguzQYx6+o90PM1pUne5RYPt1cLNJMWRXyYF333HHO/0L+2VxMC8QEWj3XowQ6K5WVk7sgP4V8gvpwkJsh59UJ47jJ66k3hr3+kbe5skP5hfmHiWthNZryipKgdVlRzDn1LXw1IxtA3lKv+ufI+g1vlmvw+jtD7oNs0mF8p7JSvlFzMUnAIzbbdpyzW/07fyiYQKvnepVA/xFyBmT12Z5friSK5zKcO3cXUA4ppRzTIRdD7ijv6r/OcG3A0ALLipDbIG/tMH5QecM1hm82x1U+Bzl2kjkXQd7QTDzSTNmqJNDLdpmzb71INhRMoNVzPUigs225FbpBh/EVSuLwgvm/xjDLktTtyl4J2Z2R3xyUtesVtW713+MqB5YVxS9Cnlxuk24N+Xj5Hnpj2xGqSfkx5POTzPkd5MPNxCPNlCVKmeF+XeZ8uV4gGwom0Oq5XiTQh0FOnWTOMZAvzf81NNiyGORD1Ecgz2x1dC/kh6P/hmFe5ZmQv5c7EaHePHY2ZK+2I1PT8tX6e6TrnH9gv3i1Ip+j3nQ7wc/w7FTurA5L73oTaPVcLxLojzNpP+N8GfKD+b+GBlcWgZwIuQryUsiGkDVKfdxfIddC1m07ysGTJSCPgdjKcGzlheVNZ4e662xS3mg9qdm4JCg/o06i3sz6Ucj+1Hs5vlnumH2o7QjngQm0eq4XCfSbIedNMucPkE/M/zU0uPJmyA2QtSYYmwr5E+TnzcclDbosAjkf8vs5k+isDfkn5LftxCZBXYqX10GOp25bdxl1o4BntR3ZPDKBVs/1IoGeuUryjA7jjy23eraf/2tocOUsyOFdxrcrdb8rNBeT2pNFIM8vd6a+BzkC8vS2oxpc2aBegMgtpSb6U5BfUPei/pPfN1JPmECr53rVheOz5TbPbPVQ2Q5yZV0DrdGUuyG7dhlfotT6duknqtGQTcqK6m3UveC/CvlzeQP1Izy1rIMsCnkR9fHIv4R8sq6Jjyf2Sr1hAq2e61UCPYX6oIjp1L2f/w65vqxMfw2yeC+C1SDK7ZA9u4wvWxLoLZuLSc3LEuX27q8nKEfYDPJvPGVRUjtMoNVzPT7KO6tD9oG8tWw4sKftyMuf6HpaWvYqt6OXbC4mNS+vLTWSHf4/Z1vqjiP+TOipVPX+gyzRdiTSADOBHmKZ5THRc5nokxrQ4wRa4ycvKAnyBJ0CsjL1QRC2MBx5OQby5UnmXAV5eTPxjLpsBPkJ5M5yh+fBUkv9srYjkwbQSCXQ43TIwuzJcadkOYBHO2vYHA3sAJxUEqiTgbuBJwCvBa4B7GM7+lYAzp1kzvVlnhZItgROBE4HXgicB6wEPBv4AuTxUL2pxQAlaYFNtvLc7bkmuAKtHsnzISeUzaR3Ux/t/j/1BimNvnwf8s0u4xXkv/VmOc2/VNTt7X5Y/3mO8W3Lps0dm49NGlgjtQI9LjolxZ2eM4GWNITyIsitkFU6jO8FuQ+yWrNxjZpsXWrJJ+i7/tCcH0G+01xMUmeB9QKHBD4b+EBgv0DTCysm0EPIBFrSGMjCkNPLnYeNZxvbvSTXH2wntlGSF9e15F3nvLX+/yC1K/DOwPTApYFjAscFbgtcEdi6wVBMoIeQJRySGpQVIYdBjoWcS30ox6E0cmR4VqE+dfQB6n7QJ0D+Q33s70ewr3EP5IWQqyeZcyjk783EI02srDpPCzxvtueXCnw7cHNgjYbCMYEeUrN32+j2aJoJtDQy8njItZCLqfuyv576ZLt/Qy6HbNRQHE+EvAby/rJium4z1x0H2byUcGzYZc4vIV9vLibpkQILB24ITLiZNbBQ4B+BLi1Qe8oEeojZxk5SH2Vx6lM/vwdZZLaxJcqK9L/qUgsNt5xS/n9OnWBsd+qWdk9uPi6pFnhiIIHlu8x5cybv3NMrJtDqORNoaSTkJZAb6XyQycrU/bp3azYu9V42oe5ocgbk5XWynN0hnyvlMu9uO0KNt8CuqduZdpuzf+rWlk0YqQTaWjhJ6p0nAydC1eGXVnUjcFqZp6FWXQxsCZwJHA6cAnwfeDywD1TvazE4CeBGYIluK9DAmsANDcUzUryN2B9LAK9h7v99Jzg9TtIQWhK4c5I5d5R5GnrVdcDB9Z+zBFT3tBqO9EhnUSfHLwM+NftgYApwEPCHhuMaCSbQc5pZB70gpxEuC+xM/cU5N9bswTUlte9K4JmTzHk0cEL/Q1GzTJ41WCp4IHAYcGTgOuCHVclxAssAXwTWAj7RYpgaIbax65k8CvLhstHmBMiRkO3ajkrqn2xRNo9t32F8X8h0O2JIakrg0MB9pe/zLwInBu4IXBbYqsFQRqoGWoNhBBPoHEx94tnfIB+FvA/y69Kb9gtMePytNAryWeoDS17y8GbCLA15HeQuyOHtxqfxlLm9I6oRFFg78KrApwLvCeydOqFtkgm0em7EEuhsVxLll08w9lTI7ZA3Nx+X1IRMgfwv5I6yGv3fupNUboa8oe3oNE6yXt2LOpeWr8X/QH4CeULbkWksmUAPuUE6QGWmUUugj4Uc1WX8jSWpsAuMRliWhGwD2b9OWLJY2xGpLVkJsi1k4+ZWgrMN5DbIyZBXloWNF5YEejrk+c3EIT3EBHpIeRJhY3IbZJ8u42uXFblNmotJkpqW7SBnlZ93Mx+3lTsUfdzEn0Uhl0G+MfFCRQ4t5URrzjkm9Y0J9BCa2+S4rSR6hBLoVKV8Y8cuc5Yqv0i2bi4uSWpSnl1Wev8PshlkKmQNyCuoD9v5bh+vvQfkbsgyHcYryAWQ/5mL11q3Xq3OuyAH0vX4cqkrE+ghNC9JsQn0AsuVkFd3Gd8KMgOyamMhSVJjMhVyFeRjHca3oN5kvWufrn9YXbrRdc6XIT/oMj6VunPSA5DrIH+FXE1dS/11yOK9jVljYKQSaGtQ1Q8/A15X30ac0JuBU6Bq6vhQSWrStsCqwAcnHq7OBn4KHNCn608B7p9kzgN0Pwvii8B+wHOgWh2qp0G1FrA9da/zb/ckUkkDzRKORmXlsvpy3CPrnLMy5IuQafUGF0kaRTkYctEkc94BOaVP138B5BZIlzZlOQ3y/g5jm5WV5qd0Gb8f8rQFj1VjxBXoITRrz+G52Txoj+IFUt0I7ED9zXIR5Ia6rIMbgJ2AXaD6e3vxSVJf3QdM1nVl8TKvi6xUl4HkDOr2nxdCvgPZfJLXPhZ4EHhnh9fdj/oAje91+PzdgLOh6pDgV+cAJwO7TxKHNLLG6SjvmUlxt9VlE+eeqS4Htoc8Ctic+pfJ+cA/oXqw1dAkqb/OANaBbArVhR3mPAvosgKdTYATgduAbwEXAmsAewCnQw6C6ugyd0lgQ+AaqG6G6k7Iq4Af15sA+QZwCbA2sDdwKHB4l9hWB66Y5O94RYlHklozYiUckjTucgLkz3XXoTnG3lA2EW7c4XMXgvwD8quJ95LkUMg99UpyTi2bsme2ybsM8tIy7+ll898Ds4yfC3neJLG/t46965xfQT7TfY70CCNVwqHBYAItibqzQXaAHFInOdmo7Yg0v7Im5GLIFZAjqA/UeT31QVPTIS/q8rlPL0lvhxXeVJDLS53y1yBPgqxQapMPK/tMPjDL/EUhj4YsPZex71BiXK/D+CrUfaT3mrvXkwATaPWBCbQ09vJC6v7A0yHnlz8H8os6YdHwydKQw8tK9PWQcyDfgmwxyee9EfKvLuNLUvd5vrjD+HNKcv34+Yy7gpwEOX3OJD4rQf5UVsgbOlVRI8IEWj1nAi2NtRxA3dXg7Tyiv262KInKPye+la/RlLfWyWvH8X0h90KO6zLnRMgnFiCGlSF/KyvNv6jLNfJT6s2MZ0LWmv/X1pgaqQR6XLpwSNKAylTg08ARUH0MqmkPj1VnAzsDqwEHtxKe2nAJsCmdDyvZBJgGdGuVd2aZN5+qG6n7WR8EXAqsB1xF/XX4JKiunv/XlqTecAVaYyyPoT4V7XQe7h9+KGSJtiNrRrYtq8/LdpnzccjxzcWkdmUJyH8h7+sw/sVS3tOhTzNAPlevGEsDwxVoSeqN7E+9UrYR8CPgXdQtwN5E3aprtRaDa8pawI1Q3d5lziVlnsZCdQ/1wso7IV+CbFk2mG4IeTPwEuo+z5dM/PmpqHvxn9VMvJLUDlegNYayQanjPHSCsWWp23P9rvm4mpbdSp1plw1ZeSfEw4fGTnYoNfCZ5XFt2WR4HuRoyATnOeStZZPh2o2HLHU2UivQGgwm0BpD+TjktC7jjysJw6Obi6kNWaF03titw3hVJ8/5ZLNxaXBkecg2j0yIs3np1HIG5HWQZ0FeBvlZ+Xp6QXvxShMygVbPmUBrDOUkyHsnmfMfyEGNhNOqHFn+rrO9WchC1Ec53wVZp53YNLiyBuTzZTX6Pure0EfXJR/SwBmpBHqcjvKWNF+yEHUniG2oj+69DPgjVGcu4AsvBtwzyZx7yrxR9zZgTeCfkN8A5wArAzsCqwB7Q3VVi/FpIFXXAq9vOwppHLmJUFIXWRP4G/Bz6iR6OeAA4AzIUQvYm/hy4HFdrr00sG6ZN+Kq+6DaB9gLuJp6hWYF4FvAo6Hq0u9XkqTxZAmHBlCmQs6G/IU5TyPbupQcfHUBXn/PsonwMR3GPwi5BrLI/F9DkjQgRqqEQ4PBBFoDKC+G3FJvcptw/OmQGZCNFuAaPy79bl9YNtMtBNm49LC9H7L7LHOnQJaZ/2tJklpkAq2eM4HWAMp36kfXOZdBDlmAaywC+QDkztJx497y8XzITmXOvpBTINNmaeP1TTxKWJKGyUgl0NZAS+pkJeDaSeZcU+bNp2o6VIcBKwJbALsD60L1GKiOr5Nrvg/8FdgT2Ap4O7ApcObot7iTJEmduAKtAZRvQ747yZwrIK/u0/WfBnmw7m87x9gUyC+695GWJA2QkVqB1mAwgdYAyoGQ2yArdxjfoSS4G/Tp+t+sD4XoOL5+qcHeoj/XH0VZD/JyyEcgb4ZsWx/UIkl9ZwKtnjOB1gDKwtTHCJ8KWXe2saeVWuQv9vH6p0PeNsmcq+sNiOouC0E+Cnmg3DX4DeTMslHz5NKuUJL6aaQSaGugJXVQPQDsBtwHXEJ9nPTP6lPP+AtwLPCmfgZA/cO2m5R56u69wMHAnlCtD9WuUG0FbFjGf2e7QEnSsHEFWgMsFWR7yKGQz0JeB+lyAErPrvttyDFdxtcpJRweW9xVVi7dTfbtML4c5AbIwc3GJWnMjNQKtAaDCbQ0h2xfSg52nGBsoTq5zj+s4Z1Mng+5qf436zjny5CfNheTpDE0Ugn0wm0HIEkTq/4E+QzwG8gngT8ANwKPBd4AbAZsD9VkZR7jblXgGqhmdJlzFfW/pyRpLphASxpg1dsgZwFvA95B/TPrVuD3wEugurLF4IbFzcCq9Up9xzcbq5d5kiQNDUs4pEllEchqbUcxfLJGKYXZpcP4EqWbyRubjUvSmBmpEg4NBhNoSX2Uz0Gug2wz2/PLQ34NuRyyZDuxSRoTI5VAW8IhSaPvrcDSwKl1f20uoC7beDJwNfBsqO5uMb55lNWBFwOPp154OB/4BVSntBqWpLFhH2hJGnnV/VC9DHgi8FPqVaAzgZcDj4fq4jajmzd5LnAR8DLgTuBi6r/XyZAvdO82IkkaJZZwSNKk8pjS0/rdc7YvzFMht0Le2U5skiYxUiUcGgwm0JI0qXwL8vsu468sSbSnKkqDZ6QSaG91SZKGxfbAj7uM/xhYDtiimXAkjSs3EUqS5kM2BrYEVgYuBE6D6q4+X3RZuvarrm6H3F/mSVLfmEBLkuZBVgK+BjwXuIH6dMiNgbshb4Xqm328+DXABl1iWxeYWuZJUt+YQEvSAskKwPOpywaWoG6p9kuozm81rL7IItSnQC5E3b3j7PL8osBrgP+DzIDq230K4JfAq+puG9W9E4y/HriEekVckjTi3EQoDaXsArkZchXkh5CvQv4BeRDyvraj670cArmxrEJPNP5WyE0loe7H9ZeHXAk5DrLeLM8vATm8Lt/Irv25tqQFNFKbCDUYTKCloZNNIfdAPgKZ7W5edoXcDXltO7H1S34L+UyX8SUh90Ge2ccYNoD8tV7pzhWQc8o1r4fs07/rSlpAJtDqORNoab5kYcj6kMVauPa36pXQjuP/D/JfyJTGQuq7nAN5/SRzroS8pIFYtoS8tI4nz4Qs3v9rSloAJtDqORNoaZ7kiZDjy8pjIA9AzoTs3WAMV0Fe3mV81RLb5s3F1G85uT7EpOP4QpDbIXs1F5OkITFSCbR9oCUNmTwHOJm6A8RuwLrAdsAJwI8gb2sokOVLDJ3cSP3LYvlmwmnEX4B9uhyXvROwJPC35kKSJI0rV6CluZIlIdfVdccTju9fNpJt2kAsl0Be12V8vbIC/aj+x9KUrFFWmD87Z2lKHgX5N+RL7cQmacCN1Aq0BoMJtDRXsm9J4LrUu+ZUyAcaiOUzpWykQzvQfLhOskdNdiidNi6B/F/9b52fQ+4tH1uoR9c4CiwU2CVweOD/AocGtm47LnU0Ugm0JRyShsmjgX9BNa3LnL+Xef32UWBN4IeQlR9+OlMhbwHeVh4jpjoJ2BT4MrA0sA1wFbAPsHeH/sxST6X+3vsr8HPq0qGlqPuxnxb4fsA3clAPjEMAACAASURBVOorD1KRNEweZPI3/gsBM/ofSnVdadf2Q+BqyPnAPcBjgAp4GVS/6H8cbahuAj7ZdhQaT6lzl18DdwMbVnDtLGNbUifVXwJe1k6EkppiCUfPZPnRahumR8rupb/yMh3GK8i/6kM1GotpIciOkDdB/rfuRZxlm7u+NF4CBwZuC0x4oE/gKYEZgRHafzASRqqEQ4PBBHqBZD3IdyE3lE1b0yB/gzy37cjUa1kUcjnka3WyPMf468v//3Wbj01SEwLfCnxvkjkXB7ps8lULRiqBtgZaQy6PB84C1gbeAGwB7AmcBhzT7Eqk+q+6DzgQ2B/4I+TFkKdA9oN8D/g0cAhU/241TEn9tCKzlG3MLjAFuAV4WuBJqWv1JY0gV6DnSxYqt+t/OHFf2uwBeRDiruyRkw0hR5XDTFK6Qvy6TqYljbLANwI/6DD2nMClqX8w3Bt4sHz8dMDTKts1UivQ4yTl0en5TuNNMIGeL3kK9Ql0q3eZ8zvIF5uLSc2zbZo0TgL7B+4IrDrb888N3B/4QUmcNwosEdgrcFXgN6k3+KodJtBDaqIEefbkua0k2gR6vuRVkIsnmXM45M/NxCNJ6rfAlMDfy2P98tzUwDWBbwauTd1mcdbP2TBwV+pWd2rHSCXQ41IDPTMprjo8N+tj1jFJGhKZAjkA8o2yifZn5Q3kam1HJvVSVbez3J26jd1FgdOBE4HVgZcAvwHeONvnXEbdcvJ5zUarUTUuCbRG03nABpMkCE8p86QRlqWB44GvAFOpe+ReCbwAOL/0q5ZGRgU3VLAj8EzgaGAacDOweQWvrGD6BJ92HmXFevBkatsRSBPpVr4xN3P7zRKO+ZKFIOfW3RcmbGm2a9lEuE3zsUlNyvcgF0LWnu35KZBPUh9/3mWvgDTcAi8I/HeSOe8O/KWpmCaXPSB/hNwCub98D38CsnzbkfXJSJVwjItO9c3daqKbZAI937IV5DbICaWV2aMhz4B8DDId8p62I5T6K+tCZkA6/FJ6qFvN+5uNS2pOYP3SeaNj16XAqYFPNBlXZ3l/+R11JGRvyHaQ10HOp+51v1bbEfaBCfSQ6rRh0E2EQy8bQo4u7+IDuQ/yd8i+bUcm9V8OgFw/yZwP1Ctd0ugK/DRwVmDlCcbeGZgW2KCN2GaLZgfqDlLPmmBscchfIL9tPKz+G6kEeuG2A2jQ3G4QtMXN0Kku46Gd1VkFuBWq+9uMSOqdLAxsB2xG/QvoXOAkqKaVCUsDt03yIrfhYRIafa8Efg+cV/pEn0993PezgScAL6rg8hbjm+kQ4CdQ/WHOoWoa5I3AmZD1oLqy2dCk4eIKtKQJ5ImQS8pdlbMgp0PuglxX1/gD5NmQe+qVq46v8xXIT5qJWWpPYJHAawM/D1wQ+Evgs4GN247tYTkf8tpJ5twO2bOZeBozUivQGgwm0JJmk41Kff+3HrmpKEtAPlSS6qeVW743Qd7a4XXWKr+MX9RI2NJcy2KQl5c3eL+FfBHygnLXZYTlIsjBk8y5pa6NHikm0Oo5E2hJs8lRdd3yRB1mgLrf81/Lnw+i3sX/dkj5OZKqbEy6CHISZEojYUtzJRtCLoDcSN1F5kOQH0HuKHtYVmk7wv7JLyBf7TK+UdnP8+jmYmqECfSI68VGwnWBa4Fb5vJxd7mmNYqSitwK6XJqWrah7r6xQvnvF9WbCfMg5ArIneXP34Is00jI0lzJ1FLG8Ns5vzazKuS08qZvRPckZW/INMgWE4wtBPkp5NTm4+q7kUqgR/w2SWuuBl5D/cUyN3YGXsWCJ+6SRkIWB5ajPgylkyuoNz2vBtwC1XdLnfMWwKbA9cDZUF3b52ClebUfsAbwNKjueORQdX1543gJ9ebZPzUeXd9VP4McA/wJ8l7qUxRvAjYH3gJsRf13lzQJSzgkzSJV2Ri4e5c5jy23eT0gRUMmXyoJZLc5f4Mc3kw8bchCkDeVu0WlhXWmldXnDduOrk9GagXao7wlaeBUAU6iPoq7kxcAF0F1XSMhSb2zLPWx293cXOaNqGoGVJ+Fan1gBWAjYCmo9imtWTXgxjGBHqQDVCSpkw8Az4e8ec5a0OwPvB04ooW4pAV1DZMfaLJhmTcGqlvrpLl6sO1IpIl4EqGkIZMDIHeXThrfKu2+ziodN97WdnTS/Mm25Wt4sw7jO1Gf1DdAvZvVAyNVwjEu5jY5biuJNoGW1EHWgLyFum3d9yDvNLHQ8MvRkKsgz5jluap0qLgZ8un2YlOfmEAPoXlJik2gJY2R7Af5OeRS6lMPfwbZq+2oNOqyGOTLZaX55nJn5TbqA4I+hH3LR9FIJdC2sZOksZSFgG9RtxQ7Cvh1GXgS8IN6tZtXlQ2NUo9V9wKHQD4IbAOsDVwOnFa3spM0CCzhkKRHyJuoD2t5/ARjW1OfCHdI83FJGlEjtQI9TtxEKEkPyWWQt3cZPwxyQXPxSBpxI5VAj1Mbu6o8FnSOJA25rEjdRuz3XSb9HtgU4ht7SZrNONZAmyBLGneLlY/3dJkzbZa5d/U3HC24LALsATwBWBG4CPgdVOe3GpY0osZpBVqSVLseuBPo0IcXythtwC2NRKQFkMcB5wLfALamLgd8Sf1cPl02jErSyLEGWhorWQXyPsgf6jrj/LquR87SDcbwDcjpkEUnGFsc8s+6zZgGW5aDXAM5BjLb0dd5Rtko+p5WQpMeaaRqoDUYTKClsZFtIDdAziv9bg+BfBzy77Kxb8OG4li9HGTxF8h2JWleArID5BTI5XWiP8qy6JxJ57DJYaV/9yIdxl8AmTb8f0+NABNo9ZwJtDQWsjTkWsjXIbPtQcmSkN+WAyUaOkQia5WDU2ZAHpzlcUydYI+iTCkt/M4vh3ikvHn5FGSZtqObd/kT5ANdxqdSHwe/a3MxSRMygVbPmUCPlSwP2RayR73aaH3i+MjBkOsgi3UYXxVyL+RZDce1DOTJkCc1W0bStEwpbxhugbwD8nTIVpBXQi4q5TQrtR3lvMm5kNdNMudKyEGNhCN1ZgKtnjOBHgtZttSd3l8ed5TVr/PqW+gaffkG5KhJ5pwMObyZeMZNXk19XPSjJhhbutR9f7v5uBZE/gj5cJfxRSH3QJ7dXEzShEYqgXblS2pEFqHuq/sUYFdgSaiWoe7F+xfgOMj2LQaoZizB5C3h7gSWbCCWcfRK4EioLppzqLoTeBfwfIar9/XvgAPqGvYJHQDMAE5uLiRJaoYr0CMvbygbxzpsysqX6ppMjbZ8GHJSl/Gq1OO+urGQxkrugTyny/hy5a7QBMebD6osDbmi1M/P9vMle0HupOuJk1JjRmoFWoPBBHrk5c+QD3UZX7v84n5cczGpeXlC2aS3bYfxF5WOCWs0G9e4mKyUIcuW78Mtm4tpgijgyYEjA38MHB/4bOoDUjp9xkZl8+k9kFMhvypJ9f2Q99ZvzKTWjVQCbQmH1Iz1gS4rzNV/qG/dr99MOFmo3p2vZlX/AL4E/ALykoc37GUFyFuArwKHQ3VtezGOtPPo/sv7qcB9wKXNhDOnwIeoyy02oi7vOgV4NHBa4LCJP6u6lDrBfi7wM+pTCD9Yv0Z1BFTpf+SS1DxXoEdeLoQc0mV8Ych0yDP7GEMFeQXkNMhd5XrnQI7oUj+pnssUyP+WTaQzIDeXVc8bIK9qO7rRlkOoDxbZeIKxpcoq7neaj6tEAAcF7gnsPMHYHoH7Avu1EZvUAyO1Aq3BYAI98vJtyK+7jO9WEtrl+nT9hSDfK0nbB+vb2NkR8lbqwzTOYCh74A6zLA7ZGrI3ZAs6HoSh3skUyM/Lm5ZDIU+p653zcuoWdhdCVm4tOjg/8N4u458InNFkTFIPmUCr50ygR162pD604eAJxtahPoGuj8cm5xUled5sgrEVqXvgfrF/15cGRaZA3lyS5ZkHqVwN+QwtntYXWCF1MB3rrwNPD8wIdOgjLg00E2j1nAn0WMjLyyrz8ZB3QV4H+T/I7eW5Jfp47b/TfRPjPqWsw1IODbBsCHkx5N2QgyYuxZin11u8f3d95k1gnZJAb9BlzuPKnCE77EUCTKDVBybQYyOPg3wB8lfqE8R+XDaT9fno5kyD7NJlfCXsAqKBlUUhX6HuYHIVdVebf5ca8m+Mwhu/wKKBewMdu4QE9g3cGRsAaDiZQKvnTKDVR6kg90F26jJn+ZJAb9FcXNLcylGQ/zDHiZ15Wkmkf9hOXL0V+EngDxMlyIEpgb8EJjnJUhpYJtDqORNo9Vn+VZeNdBzfBXIvD7VVkwbFQ72zO/RBzhallvnJzcbVe4FNArcGjg6sO8vzGwZ+Hrhh1uelIWMCrZ7rUwKdnSC/LCs0d5Y62MMhHhM8dvIW6jZpa08wtnj52vh+83FJk8m7IadOMucvkPc3E09/BbYInFlqnf9bkuak7gP96LbjkxbASCXQC7cdgPolhwFHAN+lbr5/G7AZdbL+fMiOUN3YYoBq1ueB3YBTIe8F/gpMA7YG3gksS30IgzRoVgOunGTOlcDqfY+kARWcXU4dfAzwWOqE49wKLmg3Mkn9lvLQ3OvxCnS2K7c095hgbFnIP+rNaxovWbROnnNtqXdO6QDytXoToTSI8kHIHyeZ83vIx5uJR9J8GqkV6PmVuXho7vU6gT66fnQcf3qpKRyJFRvNj6wEWaftKKTJZaeyCbbD12vWhNwD2bXZuCTNo7FPoE2ee6/XCfRFTHhgx0PjFXVbs47tkiRpMKQqbev+DlljtrHVIKeUh63dpME2Ugn0gvzAqWb7czXbc2rPIsD0zsNVgPuBqQ3FI0nzqQqwL/AAcAnkWMiRkF8Dl1L/HtsbqhltRilpvMxvAl3N9nH2MVeh23UxXY6DpT69a+kyT5IGXHUj8HTgQOA86g2DFwAvBp4K1X9bDE6S5srsyfFEybIJ9LzpdQnHi0vbugmOuU0F+VF9O1SSJLUrC0FeBvkN5ErIheX39M5tR9ZjI1XCMT9mr3Oe7L81uV4n0AuV/s//hbwCsj5kudKd41el88Lje3MtSZJmlwqyHmT5tiMZbFm0JM63Qz4LeSnk1dSnb94P+XDbEfaQCTSPTJLdSLjg+nCQSqZCjoDcPEvLsgdKuyeb8UuS+iBrQb5f7oLO/N3zb8ihkCltRzd48mHI1ZANJhib2YFm7+bj6ouxT6Ch86qzyfP86fNR3lmX+rjbxfrz+pIkZcNy5/OvkOeWFegtIG+E3AT5qd1SZpVFILdBDuoy5/OQkxoLqb9MoNVzfU6gJUnqt/wBchxkglOOs2lZle6SLI6bPLas0K/aZc4e9b/bSBipBNqjvDXGsiqwF/A4YAZwDvAzqG5uNSxJGjpZC9gJeCJUD8w5Xl0I+RrwUuA7jYY2uBYtH+/pMmdaPS9VaemoAeGtFI2pHARcDryTuiXW2sB76ueyb4uBSdIwehR1r+4zu8z5O7BpM+EMhSuBB4HNu8zZDLjc5FmamCUcjcrOZXfzGx5Zj5cpkHdCpkOe0l58kgZBYOHAqwLHBM4P/DnwudTJoh4hO5SN6l02CuZFkP80FtJQyLFlc/8E/25Znrqt3RGNh9UfI1XCocFgAt2onAr5Qpfxo+paPknjKrBM4OTALYEvBF4bOCzwp8C0wAvajnGwZOWSQG/XZc5X6oRRD8smZYPlbyBPLm3tloE8B3Iu5J+QUckNTKDVcybQjckykBn1D6qOc3Ypq9DuEZDGVOC7ZdV59QnG3hK4L5YjzCY/hpw+ccKXp5WWbHs2H9egyyZl8+XMdrMpv4O+wWj10TaBVs+ZQDcm65cfTut2mbNZmbPifF5jeci29S+KbGzbJmm4BNYIPBjouJoaOCnQ5U7WOMqq1KfoXVxK5LaD7A75BGQa5Mi2IxxsWQ7yVMgTIIu3HU0fmECr50ygG5OlIQ/WqyEd5+wKubd7LV/H1/5qqa++n7q/ZyAXQZ65YHFLakrguYHbA1WXOYcGzmgyruGQZSAfgVxQfg7eATkZ8vy2I1PrTKDVcybQjcqf61tjHcePgfx6Hl9z4fJL4uJSArJIeX4dyOfK7bid5z9mSU0JHBC4dpI5rwmc31RMw2nmz0EJMIFWH5hANypPLwnt4Y/8AZ/FIB8ttxq3nMfXPJj62PQ56iXL+Gcgl1rOIQ2+wFMCDwQ6lnEFjgy4IU6aeybQ6jkT6MZlr5Lw3gQ5HvJHyK2Q6+sV5Hl+veMhn+wyvmrZvPiE+Y9ZUhMCUwJXBD7eYXztwG2pDwWRNHdMoNVzJtCtyDJ1XV7eD3kvZD/IkvP5WpdCXjHJnBvra0gadIHnBO4PfDqwTnluscCugcsCJwbmcZ+ENNZMoNVzJtBDL2dD3tRlfCHIPZDnNBeTpAUR2DlwcerdwLeXso7pgS/Fn9fSvBqpBNo+t1JvnAbsDny2w/gzqH94uGtfGhIVHFd6PW8IPBq4GTi3gtvbjUySBK5Aj4A8trRseuMEY2uV7hxdOn9IkjTSXIGWNLvqPMjLgK9B9gGOB24FNqM+8vefwATJtSRJGja21JJ6pvou8HjgX8CzgNdQt8F6M/BMqO5qMThJktQjrkBLPVVdiCvNkiSNNFegJUmSpHlgAl1LeUhSj2UfyO8h10Fuh5wCeavHHEvS8BqXBDqTPCaaJ0kLKJ8Hvg9cCvw/4CDg98ChwImQoeu8E1gusHVgjbZjkST112QJdLekugm2sZNGTvaHTINM0LIpq5XTK49sPq75E9gx8I9yqMjMx38CBweqtuOTNPBGqo3dOOmWGLe96mwCLY2c/AnS6WAdIPtC7oYs3lxM8yewTznW+kuBrQJLBjYJvD1wV+Bjbcco9VcWhjwd8mrIqyBPqU+Y1TwwgR5inRJlE2hJPZY7IHt2GV++LOQ+vrmY5l1gqcANgXd3GN8p8GBg66Zjk5qRp5U7Rg9ALoJcUv58HuQJbUc3REYqgR63d08zbzO2nTBLGn1TgeldxqfPMm+Q7QIsCnx0osGqPjToJODABmOSGpLNqfctnACsAtWjoNqYeg/AWcDxkI3bjFDtGLcEGh5Zq2cSLalfLgK26jK+FfAgcFkz4cy3jYHzKrivy5wzgU0aikdq0keA46B6NVS3PPx0dQP1puB/AO9vJzS1aRwTaKiT6FlXoyWp174LvBGy+pxDmQq8Dzj2kb+UB9L91CvQ3SxK99V2aQhlCWBnoMNm32oG8AVgd+uhx8+4/w9357ikfjmSun3d3yAHQtaFrAjZhbrsYVPq1naD7kxgs8AqEw2WDhzPoL6dLY2SVahPbO52l+hSYElguUYikvQIbiKURlKWgHyiHKAys/vbdMhPIOu0Hd3cCEwJ/Cvw00xQrx34n8DdgbXaiE/qn4c2+nYpxcqOkAfLXSV1N1KbCBduO4ARNQXYnfqLZW64i1caSdU9wNsghwLrA4sDl0A1NOUOVd1h4wXUm6jOCHwLuBhYE3gu8EzgRRVc3V6UUj9Ut0LOAZ5HfSdmIvsBp0B1f3NxSYOpFx061gWuBW6Zy8fd5ZpLL+B1JakvAqsGPhU4s/R+vjhwVGCztmOT+if7Q+6D7DPB2Ish90Oe3XxcQ2mkVqA1J08ilCRJRf6n9H3+G+Qz9QmiOb2UY72u7eiGyEgl0OO+iXAis3bokCRJY636CLAFdRnTOsDqwLHAY6H6QpuRqT3WQEuSJHVVnQcc3nYUGhzjmEB3K89w5VmSJEldjVMCPTd1zTPnmEhLkiRpQuOSQM+aPHdLjjPLR5NoSdKIyyLAY4ANgKuA80v7RUmap84aduGQJI2BvBpyYzks5CbIDMgdkP+FTGk7Oo2ckerCMS4r0JIk6SF5O/Be4J3At8uhIUsB+wKfBlYD3tBigI0KLAPsBjyuPHUO8JsK7mgvKql9Ye5Wlud2Xq+5Ai1JakjWhNwLObDD+HbleOqxOCU3sGfg5sCNgT+Ux43luT3bjm+EjNQK9DjJPDyaZgItSWpIXgO5YpI5f4Z8qJl42hN4SmB64D2pE7yZzy9SnpseeHKbMY6QkUqgx+kglbk5IMVDVCQNlcBibcegobMecMEkc84H1u9/KK17P3B0Be+pYPrMJyuYXsF7gB8BH2grOA2ucUqgZ6q6PCRp4AW2DfwmcBMwLfDvwLczHgmPFtw9TH7Hc2ng7gZiaU1587kD8M0u074BbB9YtJGgNDTGMYGWpKEVeCVwInXyfAj17dDDqZPnswJbtxiehsOpwDaQVScezuLAM8u8h5+FxQNbBXYMrNL3KPtvBWAKcHWXOVdTN1xYsZGIJM0Ta6AlTSqwYeDewMETjC1UVqEvDkxtIz4Ni0yB/BPyW8iSs41NhXwTcnXpykFgqcAXAvel7nk38+Opga3a+Bv0QnlD8EBg+y5zdihzLJVacCNVA63BYAItaVKB9wf+0WV8+ZJg79JkXBpG2RByGeTfkE9AXgv5MOR8yPWQJ8JDm+lODlxaulUsG1g4sHngB4G7hvmuR+Ck1GUanca/ETipwZBGmQm0es4EWtKkAj9P3aO325zTA29rKiYNsyxd94POr0ri/HvIeyArPzQDXl9auq0+4SvAdwOnNxZyjwW2C9wfeHvqco6Zz08JvKOMbdtmjCNkpBJoD1KR+iZPoj6UYDPqzTjnAN+BapL2UVJHU4AHJ5nzIO5v0Vyp7gQ+Vh6dHAB8pYLrOoy/D7gosHEFl/Q6wn6r4M+BFwJfBd4YOKMMbU29kfKFFfyltQA1sPwhK/VcKsingL8BWwJnA9cCzwXOhxzUZnQaahcA23QaDCxJfZLahY1FpFG3AfWb/wlVcDFwb5k3lKq6Vd0GwBHA5eVxBLBBGZM0oCzhGCl5I+QOyAQbU/J6yP0QG/OPmbIR632BfwTuCVwTODbwrHl4jceVDU17dxj/ZODqwOK9i1zjLHBF4OVdxqdOthFPKkaqhEODYUAS6CwO2QqyEcS7E/MlC0Gug/y/LnN+CPl5czGpbYFVAxcELi91lbsGDgx8vdRYHjYPr/WucjraR1KforZOYOfAj8oGwp36+XfReClfV0d3Gd+1dOVYrsm4NJRMoNVzLSfQ2QhyLOSBujNRUlZQP176gWqu5VHl32/tLnOeB7mluZjUtsDPAn9PXVM5+9jugQfnZaNSYL/AP8vKX0ri/IdhbimmwRR4evn63H+CsTUClwS+0kZsGjom0Oq5FhPobAq5uey+3h6yLGQtyIGlvdGJdV9QzZ08sSTQS3SZ88zyZsXTL8dAYM3AjEDHsp2yyveD+XjtxQPrxw3h6qPAm8ubtZ8E3hB4SeBTgZtTb8Kz/FBzwwRaPddmAn1CWX2eoGQja0Fugryh+biGVdYoCfTmXeYcDLmysZDUqnKL+65AxzdMgUNSbxCUBlLgyYHvBM5OfXT8b8vXrW/eNLdMoNVzLSXQWQMyo6577jjnfZBTO49rTjkN8vUOY4tAzoJ8rtmY1JbAcwO3TTLnFYFLm4pJklowUgm0G8XG28bUX8xnd5lzFrBJM+GMjLcCL4J8si6JmSnrAj8DVgE+2E5oasHF1Ke3bdhlzlZlniRpCJhAj7fp1LeVu9U4L1rmaa5VJwO7AfsBN0MuquvJuRJYEdgRqutbDFD/v737jpKtKvM+/j1EAQkiSlAEBAREEMRXxADiiFcERUAUHcSAoiOOAUfFOI66GJ2RwYABGRkZFQwYEEUMmNFRQSWjApKjJNGb4ff+cfaVvk1Vdfft6nMqfD9r9epL7d23Hu7prn5qn2c/u0FVXZpxDvDvnco4AtsCLwE+23BoIyWwaeBDqU9ivKls2jwmsEnbsUmS5kZbJRzrQBZC9ukx5wTIGc3FNEqyKuSJpeb5RZCd2o5I7QjsFLgz8M3AnoEHBrYKvDJwc+CrvWqk1VvgCYHbS9L8ptKl5M2B3wT+nPpUOWlslA3G22awesKPVAmHBkObmwhPgFwKeXCHsadBFvdOsCVNR/lldmbp+7ysX+TNgbe7EWvFpT6g5rrAJzPprmpg5cBnAlcOWCIhzYnAvHIXZlmLy6Xlv6d9YNMcMoFW37WZQK9TbxLMDZB3Q/Yvq6UnUJ+Yd3TzMUmjK7B66hMFH9p2LKMg8JLyRqRjglwS7NsDBzcdm9Skshl5aeCjqQ9Z2rh8Pq48/pKWQzSBVt+1fZDK6pA3Qn4Gub30fz4dsnc78UjS9JTk4CtTzPlW4D+biklqWkmW/xZ4dZfx15R2mhs1HdsEI5VAe9tQQLUIOKZ8SCMsmwPPBrYHFgDnA1+B6s42o9KsrE59LXtZUOZJo+p5wI3AJ7qMf5y6Q9RzgeOaCmqU2YVD0pjIkdSt4v6J+kjtzYD3AZdB5rUZmWblMqDHwUUAPBq4vIFYpLZsA5xT1Su891HBPdTdgLZtNCppjrVcwiHVAruXTVfnBi4IfCGwf9txzV7+EbKoPqJ+ucdXhXwAMh/yyHZi02wEtgwsDhzUZfzQwILApk3HJjWl1D2fOsWcrwU+1FRMHYxUCYcGgwm0Whd4b+kQcWrgyMARJZleEPh8YOW2Y1wxqSB/gryzx5wzIZ9vLib1U+Ct5fv0rYEtSveNhwfeFVgUeH3bMUpzKfDywPXpcq5DYLXAjYGXNR3bBCbQ6jsTaLUqcEBJNO5TyhDYsfTSfUsbsc1etipd47boMecQyI3NxaR+K904rimtu+4pn68K/GPbsUlzLbBe4JbAv3cZ/4/SrWbdTuMNMYFW35lAq1WBnwU+3GP8iMANk/vsDofsWhLoHn2A8w9120YNu8DmpRRps7ZjkZoUeEa5E3NG4EWBJ5USpjMD8wegF7QJtPrOBFqtCVSlhrTri2u5LZ5Aj1XcQZXNSwL9iB5zXgq5rrGQJGkOBLYPnFLuviy7C3NKYLu2Y2PEEmjb2Elalfq14K895iwbW3Puw+m36krIJcDLgTffdzwrAS8Fvt1oWGMjGwD7AI8EFlG3DvwWVFO1npM0QxVcBLwAILBKBUtbDkmaU65Aq1WldvQVPcafehUIWwAAIABJREFUUjYYrtNkXP2TZ5WTNV8HmbBwkHUgJ0Lu6F0jrRWTl0D+CrkecgbkrHJY03WQPdqOTlKjRmoFWoPBBFqtChwTuDiwVoexlQLfCZzeRmz9k0Mhf4HcDPke5GzIXZAr6jpp9dff37T8c1nlX/b4mpCPln/7bdqLT1LDTKDVdybQalVg/cAfA78IPCGwamkFtkPgtMCtgR41xMMi60MOhrwP8lbIvpDV2o5qNOVCSJfjs1NBvgv5XLMxSWqRCbT6zgRarQtsXBrt31M2FS4om1B+OiAbUDQ08tCycbPH4TR5IeSW5mKS1LKRSqDdRCgJgApuAPYPbAA8ivrF7qIKWulOEaioW5FtDVwP/KECW80NhweXz9f2mHMt8EDIylDd3UBMkqQR4wq0NEFgv8DlZQV8Yfl8RzlpbkhPRBwneVhZgd62x5yDIX9uLiZJLRupFeghPBRBgykbQA6CvAvyWsjudZ2jNDOBQ4BTgS8BWwJrAA8C/gV4E/CJ9qLT9FRXA5cCh/aYdCjwvWbikSSNoiFfgc4/lVZVt0J+AjkPshhyLmTrtqPT8AisE7gtdbLcaXzXwNLAk5uOTTOVA0oXjpcv/2Y6q0M+CJnfu0Za0ogZqRVoDYYhTqDz4pIsH17XMv798Y1L39erIeu1F18/ZBXICyDHQ34A+V/IayBrtx3ZqAkcFLg99eEu3eZ8K3Bck3FpReWVkAWQKyGnlteEmyE3QfZqOzpJjRqpBNoSDs1CVgE+ALwDqk8tvxGougE4AFgIvL6V8PoiDwR+ChxPfYjIT4DFwFHAhZAdWgxuFD0cuHSKzYIXUJd2aOBVx1Nf06OpN6NeABwJbAWV5RuShpZdODQbj6XebX9C5+FqIeQkYD/g3Y1F1V8nU79rfgRUN977cNYAPgN8s74NXf2tlehGz0KmPi58TcBjoIdGdQPwqbajkKR+cgVas7ERcCdUt/eYcxWwcUPx9FkeC+wFvHD55BmgWgC8lDq5PqTx0EbXr4HtA5t2GiwdOJ5e5kmS1AoTaM3GbcDa9dG8XW1Y5g2jJwMXQvX7zsPVfOBM3NDWT78AzgFOzKSV6NIX+j3Ub8j+p4XYJEkCLOHQ7PwamA88j7qcYZJUwMHAD5oMqo/WYerk/1ZG4ojrwVDVzYMPBs4CLgx8Hvg98BDgWcBOwEEV3Njjr5EkaU6ZQGsWqgWQ9wMfqnfZVz+6dyyr14+zNbB/G9H1wbXAlvUbgSpd5mxN79PWNEMVXBnYGXgtsCfwEuqTCH8JHFrBFS2GJ0mSBsQwt7GrIMdC7oH8EnIC5MuQG8rHk9qOcMVlE8giyHO7jG8DWQiZ12xckiQNnZFqY6fBMMQJ9DJ5NORtkM9CjoMcNhp9kvMuyF2QQyf1uX5q6W17WmuhSZI0PEyg1XcjkECPqlSQo8pJiwsgF0LugCyFfGqKDZSSpimwceCDgV8Fbg6cEzgusFnbsUnqi5FKoK2BlnqqAry/PoWQx1JvGLwWOAeq61oNTRoRpeb9u9SHrZwCXAZsDjwXOD/wrKo+xEgCIHX+siVwSzW8nZ4kzZIr0JLGUmD1wOWBz2XSok7qd7AfDdwUWLetGDU4AtsGvhVYlLprTwJXBV4bW/MOupFagR43mfAx1ZwmmUBrgmwJORDyEsjjIKu2HZE0VwIHBv6Sum1kp/HVA9cHDm86Ng2WwC7le+Vbgb1K2c8OgSMDd8b+8IPOBHpIpcNHr3lNMoEWpevHGWVR5VbIFaW7ydWQvduOTpoLgaNTl2/0mnNK4PimYtLgKXcjzgt8vhyqNHl8l7IqvU8b8WlaRiqBHpca6GUJcTXpv0OHH0QNimwAHAjsQP29eiHwtdGsPc7a1AfO3AbsCNUF5fH1gKOA0yD7QPW91kKU5sbqwMIp5iwo8zS+dqL+XbBv1WGRq4JzA18EXgx8q+ngNH7GtV5oYtLc9GqzpiUHAJcDb6c+Dnw94HXAZZBRvJX7euoEYd69yTNAdQdURwGfAD7STmjSnLqM+jZ8r8WMR5d5Gl/bADdWcE2POb8Gtm0oHmksdCvL6FTOYQlH67IrZHHpKz2x93IFeQVkCWTf9uKbC/lN/f/bdXyzUtqxXXMxSXOv1LHOD7y8y/hzAktSJ1AaU4GDAjdPMecNgd80FZNmbKRKOMbFdGqeM425c8UEejk5A3JKj/FjIL9tLp4m5ObuJx7+fY6nHmokBV4dWBx4T2CrwMqBLQJvKcn1u9qOUe0KPKJ03Ni+x5zT3Eg40Eygh9R0k2gT6FalKolij40geUxZjd2gubjmWi6vV9e7jq9VNhTu1lxMUnMCzwtcMaE1WQLXBQ5rOzYNhsBZgR8G7tdhbL/A3YHHtxGbpsUEekhNt32dCXSrsnb53blLjzkblzkjdEs3J9Ur713H/5H6NMQ1motJal7goYEnpz5IZeQFVgk8OvDc8v9tv+suApsFrgxcFPjnwJ6ltONTpcynRxmcBoAJtPrOBPrvUpVE8Tk95uxaVmMf0Fxccy07lrrvN3YZuwnyvubjkjRXAs8vq+xJfXz5ksDCwLGdVlkFgfUDx5QkenHglsCZgae3HZumZAKtvjOBXk5OhXyzx/gJkJ83F09T8nzIfMi5pc773ZCvQRZBPg8Zl7aT0sgLHFoS5ncGNiiPrV5KEa4JfL3tGAddYOWpZ2mAmECr70ygl5PtIX+DfKSu/f3746tB3llWavdoL765lM0h74V8A/IjyCcgz2g7Kkn9E7h/4LbAkV3GtwksCDy76dikOTRSCbSHiNzXsvrn2fzbbEy9E3i6744fAmxHfZTtXbN43hGSpwCfo/43OQ9YQt1IP8DLofpae7FJ0ooL7Ad8FnhQBYu6zDkZWFrBoY0Gp74pdfyHA7sADwQuBb4NfKGCu1sMrS2rUX+/PxEY+rvI3hKeG3cC32P6/767UifQTW9eHGDVjyBbAfOARwGrAh8HvgOVbzLUmMCaFcxvOw6NlM2AP3VLnotLgL0aikd9Vt4kfZ76On4f+DP177JPAC8L7FfBX1sMURoJlnBIAySwY+ArZWNXykalrwce03ZsGn6BwwJXTDHnP1OvVmrIBB5eSnDemUl3swObBv4wpv2qR6qEQ4PBBFoaEIFnlk4Ip5XexI8rrbK+ElhUVpaGSuABpUXa7oH1245n3AW2L2/MHtVlfKXSZcIDZIZQ4EPpUaJQ2u/dHdioybgGgAn0kJvc77mt3s8TmUBLAyCwXlltPrrL+LsCty/rmjDoSk/l0wL3lI4PS8qfv5m6jEAtCZwR+PXk76WSPP9H4M4xTLBGQuBXgaN6jFfl+g7dm/FZGqkEeqW2A2jQdJLkthNpSe06gHpzz7u7jB9NvdH3oKYCWlEl+TqbesX5ydRv0Nei3sCzFnB2YJP2IhxG2RnyytIp58WQh8/iLzuUeqP5JYGPBV5T3ridQ73x7LkV3NiPqNW4tYC/dBus6jzjLlw00xCY7ipzW6vRrkBLAyD1ARY9++8Gvph6Q+tAS30627npfOzxaoFfBj7TQmhDKA+AnA65G3Ip5PuQqyBLIR9e0R7tqfs+vyrw5cAFge8Gjg48tN//B2pOubvw4R7j65W7QU9qMq4BMFIr0ONiJkmxCfTASQXZD/JxyA8gX4C8CTIUt9E1PErt4lenmHNK4JNNxbQiShnAHYHn95hzQOCu2I1pClkJ8mPI+XWP+uXG9oLcDPlQO7FpEKXeJHpb6pa2ncbfE7h2DH/2TKCHkAn00MqakDMgC6hPKPy3crjIHyC3jO6BKmpD4JWpT4Hr2MO9JKaXB17XdGwzEXhQ2aS2fY85W5c5D2kytuGT/SF/hXRZFc7Tykr0Fs3GpUEVWCXws8ClgT2WvZ4EHhh4X1l9fk7bcbbABHoIWcIxK1mL+ljp35RE9mbIdyHPauC5Pw25HLLlpMdXoT6p8A6IG23UF4ENyuaeN3UZf23gr91WlgZF6pPuEvh/PebsVObYlaOnnAD58hRzroC8qpl4NAwC6wQ+E1iauqvP9eXn7eox3Dy4jAn0kMoMPpo2wAl0NoBcALkS8mbIPMhBpZxiMeQDc/jcm5Sawz27jK9Ubqu+b+5i0LgJHFx+6X068NTA5qnbTh1fHn9x2zFOR+Di9GiDFjgq8McmYxpO+Qbkg1PM+WG9yCAtL/DgwNMCLwjsPIZlGxOZQA+5QUqclxnkBPoUyG8h63YYeypkCWTvOXrugyB/hvQ4Vj3vgfxobp5f4yp1v+Qfp+77nMDickv2qW3HNl2Bw0uN864dxnYpK+1HtBHbcMlnIJ+dYs7FkNc2Eo40vEyg1XcDmkBng1Lb12UFGCD/U6/QzMnzHwa5bIo5r69LS6T+K7WMD0t9lHzTz71l4PmBNwb2D2w4w6+vAp8sbwI+k7rbwysDJ5Zbyp/OeLUyXUE5FHIr5AFdxneG3APpeCiKpL8zgVbfDWoCvWdJoDtuqCpzDoVcPUfPPw8yH7JGjzkfm7sEXmpeqV/+39QHntyQ+lCG20vS+96ZJr2BfVO33rs4dc/hLweePVfxj56sBrmIunXdpM4/2RbyR8gX2olNGiom0Oq7QU2g94IsmqKE4gWQ6+fo+dcoKz9v6DK+IeQ2yMvm5vml5qXuIXtZYLcJj1WBA0si/f424xtP2RzyO8hfqLsCfarUPS+h7g+9VtsRSkPABFp9N6gJ9MPq8s/s2GPOB+tfJHMWw0vLZsXXQ1af8Phjy+bG/2MFDzGQBk1g77LSvFWX8X1St8DarOnYlFUgB9Ybp/N56paaPcrbJE1iAq2+G9AEGsoqyzc7l3FkK8iddZI7pzG8rKxELy6bdW4tNYdfgtiCSyMj8PHAaVPM+VPq1wy1JPCcwOnlWlyX+gTBl1pTLvVkAq2+G+QEetvSCeOsUpO8EWRryOGQG8vtyx410n2LY81Sk/2qsgrkoQUzlrUhj+xdU642Bb4eOHaKOWcF3tNUTLrXhI2ZC0tbwxeX9mTHlq4mp6dOEiTdlwm0+m6AE2iok9V8vdRDl65euRnyLkjj3Qk0UzmwlLssu3Z3Q34JeUrbkWl5pVvG/04x57zAkU3FpHsFXpL6IJ1OrQG3CtwY+Nc2YpOGgAm0+m7AE+hlsmpZkd6k7Ug0XTmybHR6f6kb3xCyG+R46g4rz2s7Qt2rlAHcEli7y/h2pTvHLk3HJgicGzi6x/jhgZvS5Sh4acyZQKvvhiSB1nDJVqVu/IVdxo8qXUy69LdV0wL3C/yxlAKsPWls08D5gW+2Fd84C6yc+iTKrhsHA1uU2zybNxiaNCxGKoG2e4E0ul4AXATVyV3GPwi8gbon8EmNRaWuqrq2dh/gdOCKwFnAtdRdOfYCzgFe1GKI42xV6pXlBT3mLCyfV+8xRyMosClwALA9sBS4ADi1gltaDUxzxh3D0ujaBvh19+FqKfC7Mk8DooI/ADsBbwbuALYFrgQOAfas4Pb2ohtfVZ0cX0N9bbrZCVhU5mlMBF4F/BF4NfWd5A2AtwCXB57bZmzSqLOEQ3MgJ0H+Z4o5Z0Hs6CBNQ+D95ZCbdTuMrRY4O3BKG7GpHYFnl97shwWqCY+vFHhrYHGnTadjaqRKODQYTKA1B/IGyGXd2wxmLeqT1Q5sNi5pOAXWDVxYatH3CTwgsHbgKYGflJ7Qm7Ydp5oT+F3qcrhu4ycHzmgypgFmAq2+M4HWHMiG5aCbd3QYq0onjqvsCy1NX2D9wIllZXFZb8i7A18zeR4vgQeV679zjzn7BBZMXJ0eYybQ6jsTaM2R7F/6d38DcihkD8jLIT8pq8++kEkroJRsPDrw2MCabcej5gW2KQn0xj3m7FLmdGxNOWZMoNV3JtCaQ3k05IuQK8shKpdBToQ8vO3IJGlYlRKeewKP6zFn/3L4jivQI5ZA28ZOGnnVecDz6z9nJajuaTUcSTNWDmeZR10usCFwKXBWBb9vNbAxVsHtgV8ArwB+1WXay4FvV3XiKKnPXIGWJHVUjgk/LzA/8NPAVwOXlNrrD8aWtK0J7F7q4f81E/p/B+4fOK6sPj+yzRgHyEitQGswmEBLku4jsFbqQ3W+HXjQpLGnp14F/be24hME9gv8uVyLHwV+HrgrcE1g97bjGyAm0Oo7E2hJ0n0EjiyJWMeNioHnpT7B8gFNx6Z7lRXnAwLvLP2fnxVPpJzMBFp9ZwItSbqPwJmBY3qMrxK4M/CcJuOSVsBIJdBuIpQkzUopLdiB+hjri6r6CHL1x4OAa7sNVrA0cCOTyjskzS03HkiSVkhg68BZwM3At4EfA7cGvpS6U4Rm7xbgId0GUy+EbVTmSWqICbQkacYCWwI/p151fix1CdpawFOBzam7RViXO3vfpa5z7nZYy/7UtbY/aS6k8RF4QuA1gfcGDvG0SWmwWAMtaaiUo6vPKv2JJ4/dv7RZ61q7q+kp/5Z/CpwR2GDS2NMCtwXe01Z8oyqwSeDHqUtkLgh8P3BtaVn3bx6MskJGqgZag8EEWtLQKEnd4sA/9JjzivSo3R1n5Qjw/yit6c4sf96px/ytA+cH/laSulMDF5U+0P9lH+j+CqxekuazU99NmTh2QOAvgbe3FN4wM4FW35lASxoage0C6VXnHNitzLGV1wSlxdnS0i/4A4H3B35QHntHj69bObBv4F2Bj5aygm2bjH1cBF4ZuDmwXpfxFwQWBNZvOrYhZwKtvjOB1gjLEyBfh1wDWQK5GPIRiJvMhlRg85Icb9FjztMCS1wdvVfgwMCiTi3nAs8uY89rIzbdK3Ba4GM9xlcJ3BE4oMm4RsBIJdC+sEmaQzmcenPTfOAo4BnUv5h2B34H2abF4LTirqZunbZ3jzl7A+dUcE8zIQ2FtwEfreDrkwcq+AZwbJmjdm0IXNVtsIKl1OVJGzUWkaSOXIHWCMo2kMWQwzqMrQr5BuQciJtxhlApRbglsH2HsaeWW9zPbyO2QRRYM3BPeqy+BR5XVvbXbjI2La9s2PyvHuNV+d4/uMm4RsBIrUBrMJhAawTlg5Cze4w/FHI35PHNxaR+Kbexv1A2tp0QOLzU5Z5cSjc+0HaMgySwYUmOt+sxZ+syp2vfZ829wBsDVwbu12V8XqlZ37jp2IacCbT6zgRaIyjfg7xvijmXQl7ZTDyaC4GDSleI35dOESf36s4xrsobjvmBZ/WY88yycr9ak7FpeYG1A9cEvhpYZ9LYLoHrAx9pK74hZgKtvjOB1kgIPDzwtsApO3LeTQfxpR8Etu7xFRdAjmguQqk9gS+m7id8n/1HpSzgO4GvtBGblhd4ZOAPqftsnx74dOq2dncHTgqs2naMQ2ikEmg3EUrqi8CrgEuouwjc+RCu+/Of2eAx1P1qX9/hK9alTq5/32ScUoveATyGepV+k2UPllKAzwG7Am9tKTZNUMHFwA7AEcCl1O0YzwCeWMGLK1jSZnySagO5Al3aUH01cHngptKr9HW+89ZkpSZwSeClEx59IuTu9/H296Y+dGNS6658GHIlxNvVGhuBnQK/K7XOVweuKn8+P3VyLY2qkVqB1mAYuAQ69VGlS8qtqsNKnePRqZvLn+0ucU0U+Fng4x1GjoX89aWc+JP/Y9dLIA+GPBlyCmQhZM/mo5XaVco1dgocEnhRYOd4NLRGnwm0+m6gEugJq4nP6DC2UakLO76N2DR4Uh97e3fgKR1GK8gr7seC6+pFtgSyFPIjyC5NxypJao0JtPpu0BLobwZO7DH+rMBCV6EFEHhQyYzv0w94wpwtbmX9HMJn94J4tLMkjR8TaPXdoCXQNwRe0GN8jdQHAuzWZFwaTIGVS+utfXvM+YdSB71Gk7FJkgbGSCXQduFQJ6sBC3uML6Y+nteVRFHB3dS701/do47z1cBZFSxoLjJJkuaGCbQ6uQzYqcf4DtTfO5c1E46GwDuAJ1GfSLf+sgcD6wY+Rl1Pf1RbwUmSpNEzaCUcry3dNjbpMLZS4LTAj1oITQMs8PjAH0upxoWlLdeiwJ8Cu7cdnySpVSNVwqHBMGgJ9GqBnwSuKO3rHhxYK/CEssHw9l4bxjS+Uh9XvEfqco7XBPa0b7gk1cqm63XbjqMlJtDqu4FKoAECawaODfxtWe+xsnHwu4Ft2o5PkqRhUErZPlru7C77fXpV4J2pk8pxYQKtvhu4BHqZsqK4XeBxtq2TeislTtuXOzd7BTZqOyZJ7QlsELgkcHHg0PL68JjAEaXj1ffHKIk2gVbfDWwCLWl6Ak8tNeApK00LygEzpwQe2HZ8kpoX+O/AeZ0WoAKbBm4K/EsbsbXABFp9ZwItDbFS67048OHAxuWxlQNPLL88fxO4X9txSmpOOTPhb4H9esx5S+DiJuNqkQm0+s4EWhpi5fbscV3G1g9cH3hj03FJak8pf0xgwx5z9ggsDazcZGwtGakEehz7QKfHh6QRE9g6cEypNfxt4OTAC9On17/Ao4DtgA90Gq/gNuC/gQP78XyShsY95XOv15qVMP8YSuOUQE8nSTaRlkZI4GDgfGBX4BfASdSnbB4PnBlYsw9P8zDgbxVc02POJcDmfXguScPjSuAu6kOmunkScHE50VUaONNdZW5rNdoSDqnPAo8sdclHdhjbPHWf80/24XmW3YLtupM+8KrAH2b7XJKGS+C4wO87bSQOPCJwW+A1bcTWgpEq4RgXM0mKTaClERD4VOD7Pcb3DizJhKPHV/B51g4sDOzfY863Uq9+SxojqXtAnxu4MvUpv08oHXveXpLnrwdWaTm+3QJPW7YBeg6ZQA8hE2hpzAQuCLyux/jKpdXcvD4814cCVwe26jB2REnUd5rt80gaPqUbx3vLSvTSwKLSneef29o8WDY3f7bEs7QsAiTw88AOc/S0I5VAt/aupyUBqinGNYXAjsBuwGbAn4Czq/Fpw6PhsRbwl26DVd2jeX6ZN1tHAVsCvwt8BTgPWA94CvA44LAKfteH55E0ZCpYALyT+uTB1YF7KljSVjypX/N+WP5zHvBzYDHwSOBfgZ8FnlTBBS2FqAHTq/tG2904hmIFOnD/wBdTH+l9aeDbqQ+OuCdwUmCNtmOUlgn8MF06Y5TxDcv37i59er4q9QmEny23bM8K/Fdgm378/ZLUD6kT+asCD+gwVgW+lnsT7H4aqRXocTRIifMyw5JAf6MkzDtPevzxpb7r5LZikyYrpRO3BB7cZfyYwGUZr25EksZc4KLAm3qM71IWFzbq81ObQKvvBj6BTt1pYHFg2y7jO6e+Jd6X1TxptgKrBX5ZflnskVKyFtioJM+L+1H/LEnDJDA/sHeP8dVLPfRufX7qkUqgXXnRdO0N/LSCSzsNVvBb4Fx6/FBKTarqmr551N+XP6A+Uvdm4AbgOcC+FXynxRAlqQ0L6N0Df9m+kPkNxDK0xm0TYZMeRb1ZYDoeNpeB9MmGwNVTzLmaHkeWSk2r4A7g0NTHaO9I3bLuEuASDy6QNKZ+BTyTesNzJ3tTHwDTccFM6qYf9dBbUh/hOZONi6E/p6LNiXLL+9tTzPlZ4N0NhSRJkmYoMC91a81ndxjbKnBd4P1z8NQjVcKh++rXhsL7U+9wnc7HvPKcXU8ya1vgmal75j60y/hW5QfyyU3HJkmSpi/wttT9n08NvD7wisAnAncFTs/c5CMm0Oq7JzD4CXRVVph/PTmJDmwROD/Wk0qSNBQCTywtaH8T+EPgq4FD0vu8jNkwgVbfDXwCDRB4cEmiFwS+H/h04AepT1X6fqeekpIkSYxYAj2OXTgGsQ/0UKjqDga7AwcA/wesCvwU2BfYq4LbWwxPkiRJfTaTzXxNG4oVaEmSpBU0UivQ49LGbmJS3Ku2JxM+z1UNkCRJkobYuJVwTJUUmzRLkiSpp3FLoCVJkqRZGbcEeqr6ZjcSSpIkqadxqYGuWL6+eTrzJUmSpPsYlwQa7k2KeyXQJs6SJEnqaZwS6GVMkiVJkrTCxjGBHkSLy+dFrUYhSZI0txZPPWXwuRo7OB6Nb2hWxNOBo4Aj2g5EfbUl8G7gZcCSdkNRH60LHAe8Gbih5VjUXycCxwIXtB2I+uo/gZOAL/fp71sKnNenv0vSLDwPuKntINR3u1LvV1ij7UDUVxtRX9dt2w5EfbcQmNd2EOq73wOHtx3EIBq3NnaSJEnSrJhAS5IkSTNgAi1JkiTNgAm0JEmSNAMm0JIkSdIMmEBLkiRJM2ACLUmSJM2ACbQkSZI0AybQkiRJ0gyYQGvYLS4fGi2LgbvLh0bHEuqTCP2ZHT2+Fo8mr6s0olYGNms7CM2Jh7cdgOaE13U0bQFUbQehvtsUWK3tICRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJakzVdgAaW5n03zP5Xpzu1/Z7nqY2SNe109d4bVfMIF1Xf177x+s6mpq4rpPnj911HZn/EQ2VyT9Qy8wkEZrqa6czr9uc6cai5Q3Kde31d3tdZ26Qrqs/s/0zDNfVazpzbV3XTn//SF/XVdoOQGNt2Q9Rr1+Ks/3a6czr9OKQDo9regbluq5oDOpskK7rdN8Ia2ptX9dOb3Az4bOvwyumieva1t83EFZqOwCNnU63e2aaDE31tdOdV+GLc78M0nXtNV8zM0jXtdv19Od45gbpuk4em/xnTV8T13XZ41P93M0mlqFgAi0tbyR+sGXyLEmaOybQ0r2slZWGQyZ8aLjN5G6DNDBMoKWayfPo8JfvaJucNJtEjw7fFGlomEBLJs+jxOR59FXctwbTpGt49dqX4nXVwLILh8adyfNo6vaL11390mCavNnM5FkDzRVojTOTZ0mSNGMm0GrabDaMzEULrOk8r6Y2KNd18u39ybeEvdYzMyjXlQ5jWnGDfl29xiumievaRCxDwRIOtanXi+RUP2jTfYGdzryRPi2pBYNyXdVfbV/Xibf1O/Wl1Yrxuo6mJq5rP2JA3SMaAAABpElEQVQZWq5Aqw2zWQWe7te60tw8r+toGqTr6vXvH6/raGriujYRiyRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJkiRJYyLlY/KfJUnTsFLbAUiSJEnDpGo7AElS4yauOPt7QJJmyBVoSRpfJs+StAJMoCVJkqQZMIGWJEmSZsAEWpIkSZoBE2hJkiRpBkygJUmSpBkwgZYkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZIkSZKkufH/AYVDjagAwG/gAAAAAElFTkSuQmCC" }, "metadata": {}, "output_type": "display_data" } ], "source": [ "plot(a~r, data=hypercube, type=\"n\") # to show all ranges of the parameters\n", "points(a~r, data=hypercube, subset=S0 \\frac{a}{r}$\n", "\n", "### For more info:\n", "\n", "* Chalom, A. & Prado, P.I., 2012. Parameter space exploration of ecological models. http://arxiv.org/abs/1210.6278\n", "* [Vignette of package pse](https://cran.r-project.org/web/packages/pse/vignettes/pse_tutorial.pdf)\n" ] }, { "cell_type": "code", "execution_count": null, "metadata": { "collapsed": true }, "outputs": [], "source": [] } ], "metadata": { "kernelspec": { "display_name": "R", "language": "", "name": "r" }, "language_info": { "codemirror_mode": "r", "file_extension": ".r", "mimetype": "text/x-r-source", "name": "R", "pygments_lexer": "r", "version": "3.2.3" } }, "nbformat": 4, "nbformat_minor": 0 }