<!-- Generated by pkgdown: do not edit by hand -->
<!DOCTYPE html>
<html>
<head>
<meta charset="utf-8">
<meta http-equiv="X-UA-Compatible" content="IE=edge">
<meta name="viewport" content="width=device-width, initial-scale=1.0">
<title>Add R script into a document object — addRScript • ReporteRs package</title>
<!-- jquery -->
<script src="https://code.jquery.com/jquery-3.1.0.min.js" integrity="sha384-nrOSfDHtoPMzJHjVTdCopGqIqeYETSXhZDFyniQ8ZHcVy08QesyHcnOUpMpqnmWq" crossorigin="anonymous"></script>
<!-- Bootstrap -->
<link href="https://maxcdn.bootstrapcdn.com/bootstrap/3.3.7/css/bootstrap.min.css" rel="stylesheet" integrity="sha384-BVYiiSIFeK1dGmJRAkycuHAHRg32OmUcww7on3RYdg4Va+PmSTsz/K68vbdEjh4u" crossorigin="anonymous">
<script src="https://maxcdn.bootstrapcdn.com/bootstrap/3.3.7/js/bootstrap.min.js" integrity="sha384-Tc5IQib027qvyjSMfHjOMaLkfuWVxZxUPnCJA7l2mCWNIpG9mGCD8wGNIcPD7Txa" crossorigin="anonymous"></script>
<!-- Font Awesome icons -->
<link href="https://maxcdn.bootstrapcdn.com/font-awesome/4.6.3/css/font-awesome.min.css" rel="stylesheet" integrity="sha384-T8Gy5hrqNKT+hzMclPo118YTQO6cYprQmhrYwIiQ/3axmI1hQomh7Ud2hPOy8SP1" crossorigin="anonymous">
<!-- pkgdown -->
<link href="../pkgdown.css" rel="stylesheet">
<script src="../jquery.sticky-kit.min.js"></script>
<script src="../pkgdown.js"></script>
<!-- mathjax -->
<script src='https://mathjax.rstudio.com/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML'></script>
<!--[if lt IE 9]>
<script src="https://oss.maxcdn.com/html5shiv/3.7.3/html5shiv.min.js"></script>
<script src="https://oss.maxcdn.com/respond/1.4.2/respond.min.js"></script>
<![endif]-->
</head>
<body>
<div class="container template-reference-topic">
<header>
<div class="navbar navbar-default navbar-fixed-top" role="navigation">
<div class="container">
<div class="navbar-header">
<button type="button" class="navbar-toggle collapsed" data-toggle="collapse" data-target="#navbar">
<span class="icon-bar"></span>
<span class="icon-bar"></span>
<span class="icon-bar"></span>
</button>
<a class="navbar-brand" href="../index.html">ReporteRs</a>
</div>
<div id="navbar" class="navbar-collapse collapse">
<ul class="nav navbar-nav">
<li class="dropdown">
<a href="#" class="dropdown-toggle" data-toggle="dropdown" role="button" aria-expanded="false">
Word
<span class="caret"></span>
</a>
<ul class="dropdown-menu" role="menu">
<li>
<a href="../articles/word.html">Overview</a>
</li>
<li>
<a href="../articles/bookmarks.html">Replace content</a>
</li>
</ul>
</li>
<li>
<a href="../articles/powerpoint.html">Powerpoint</a>
</li>
<li class="dropdown">
<a href="#" class="dropdown-toggle" data-toggle="dropdown" role="button" aria-expanded="false">
FlexTable
<span class="caret"></span>
</a>
<ul class="dropdown-menu" role="menu">
<li>
<a href="../articles/FlexTable.html">Overview</a>
</li>
<li>
<a href="../articles/flextable_examples.html">Examples</a>
</li>
</ul>
</li>
<li class="dropdown">
<a href="#" class="dropdown-toggle" data-toggle="dropdown" role="button" aria-expanded="false">
Formatting content
<span class="caret"></span>
</a>
<ul class="dropdown-menu" role="menu">
<li>
<a href="../articles/formatting_properties.html">Formatting properties</a>
</li>
<li>
<a href="../articles/pot.html">pot objects</a>
</li>
<li>
<a href="../articles/evg.html">Editable vector graphics</a>
</li>
</ul>
</li>
<li>
<a href="../articles/faq.html">FAQ</a>
</li>
</ul>
<ul class="nav navbar-nav navbar-right">
<li>
<a href="../reference/index.html">Function reference</a>
</li>
<li>
<a href="https://github.com/davidgohel/ReporteRs">
<span class="fa fa-github fa-lg"></span>
</a>
</li>
</ul>
</div><!--/.nav-collapse -->
</div><!--/.container -->
</div><!--/.navbar -->
</header>
<div class="row">
<div class="col-md-9 contents">
<div class="page-header">
<h1>Add R script into a document object</h1>
</div>
<p>Add R script into a document object</p>
<pre class="usage"><span class='fu'>addRScript</span>(<span class='no'>doc</span>, <span class='no'>rscript</span>, <span class='no'>file</span>, <span class='no'>text</span>, <span class='no'>...</span>)
<span class='co'># S3 method for docx</span>
<span class='fu'>addRScript</span>(<span class='no'>doc</span>, <span class='no'>rscript</span>, <span class='no'>file</span>, <span class='no'>text</span>, <span class='no'>bookmark</span>,
<span class='kw'>par.properties</span> <span class='kw'>=</span> <span class='fu'><a href='parProperties.html'>parProperties</a></span>(), <span class='no'>...</span>)
<span class='co'># S3 method for pptx</span>
<span class='fu'>addRScript</span>(<span class='no'>doc</span>, <span class='no'>rscript</span>, <span class='no'>file</span>, <span class='no'>text</span>, <span class='kw'>append</span> <span class='kw'>=</span> <span class='fl'>FALSE</span>, <span class='no'>...</span>)</pre>
<h2 class="hasAnchor" id="arguments"><a class="anchor" href="#arguments"></a> Arguments</h2>
<table class="ref-arguments">
<colgroup><col class="name" /><col class="desc" /></colgroup>
<tr>
<th>doc</th>
<td><p>document object</p></td>
</tr>
<tr>
<th>rscript</th>
<td><p>an object of class <code>RScript</code>.
Not used if file or text is provided.</p></td>
</tr>
<tr>
<th>file</th>
<td><p>R script file. Not used if text or
rscript is provided.</p></td>
</tr>
<tr>
<th>text</th>
<td><p>character vector. The text to parse.
Not used if file or rscript is provided.</p></td>
</tr>
<tr>
<th>...</th>
<td><p>further arguments passed to other methods</p></td>
</tr>
<tr>
<th>bookmark</th>
<td><p>a character value ; id of the Word bookmark to
replace by the script. optional.</p></td>
</tr>
<tr>
<th>par.properties</th>
<td><p>paragraph formatting properties of the
paragraphs that contain rscript. An object of class <code><a href='parProperties.html'>parProperties</a></code></p></td>
</tr>
<tr>
<th>append</th>
<td><p>boolean default to FALSE. If TRUE, paragraphs will be
appened in the current shape instead of beeing sent into a new shape.
Paragraphs can only be appended on shape containing paragraphs (i.e. you
can not add paragraphs after a FlexTable).</p></td>
</tr>
</table>
<h2 class="hasAnchor" id="value"><a class="anchor" href="#value"></a>Value</h2>
<p>a document object</p>
<h2 class="hasAnchor" id="details"><a class="anchor" href="#details"></a>Details</h2>
<p>You have to one of the following argument: file or text or rscript.</p>
<h2 class="hasAnchor" id="see-also"><a class="anchor" href="#see-also"></a>See also</h2>
<p><code><a href='docx.html'>docx</a></code>, <code><a href='pptx.html'>pptx</a></code></p>
<h2 class="hasAnchor" id="examples"><a class="anchor" href="#examples"></a>Examples</h2>
<pre class="examples"><div class='input'><span class='co'># docx example -----------</span>
<span class='no'>doc.filename</span> <span class='kw'>=</span> <span class='st'>"ex_rscript.docx"</span>
<span class='no'>doc</span> <span class='kw'><-</span> <span class='fu'><a href='docx.html'>docx</a></span>()
<span class='no'>doc</span> <span class='kw'><-</span> <span class='fu'>addRScript</span>(<span class='no'>doc</span>, <span class='kw'>text</span> <span class='kw'>=</span> <span class='st'>"x = rnorm(100)"</span> )
<span class='fu'><a href='writeDoc.html'>writeDoc</a></span>( <span class='no'>doc</span>, <span class='kw'>file</span> <span class='kw'>=</span> <span class='no'>doc.filename</span> )</div><div class='input'><span class='co'># pptx example -----------</span>
<span class='no'>doc.filename</span> <span class='kw'>=</span> <span class='st'>"ex_rscript.pptx"</span>
<span class='no'>doc</span> <span class='kw'><-</span> <span class='fu'><a href='pptx.html'>pptx</a></span>()
<span class='no'>doc</span> <span class='kw'><-</span> <span class='fu'><a href='addSlide.html'>addSlide</a></span>(<span class='no'>doc</span>, <span class='st'>"Title and Content"</span>)
<span class='no'>doc</span> <span class='kw'><-</span> <span class='fu'>addRScript</span>(<span class='no'>doc</span>, <span class='kw'>text</span> <span class='kw'>=</span> <span class='st'>"x = rnorm(100)"</span> )
<span class='fu'><a href='writeDoc.html'>writeDoc</a></span>( <span class='no'>doc</span>, <span class='kw'>file</span> <span class='kw'>=</span> <span class='no'>doc.filename</span> )</div></pre>
</div>
<div class="col-md-3 hidden-xs hidden-sm" id="sidebar">
<h2>Contents</h2>
<ul class="nav nav-pills nav-stacked">
<li><a href="#arguments">Arguments</a></li>
<li><a href="#value">Value</a></li>
<li><a href="#details">Details</a></li>
<li><a href="#see-also">See also</a></li>
<li><a href="#examples">Examples</a></li>
</ul>
</div>
</div>
<footer>
<div class="author">
<p>Version 0.8.9 - Developed by David Gohel - proudly brought to you by <a href="http://www.ardata.fr"><img src='data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAATYAAAA9CAYAAAAnDEXeAAAABHNCSVQICAgIfAhkiAAAAAlwSFlzAAAN1wAADdcBQiibeAAAABl0RVh0U29mdHdhcmUAd3d3Lmlua3NjYXBlLm9yZ5vuPBoAABtISURBVHic7Z15nBzVde+/p3oWtCVIYIMEAeMNY8cGgu0EPhhLQghJGDCIaQGGYWY00zWSQDH2S2ycxDRe4gUeeWGRumpWBEiaHrGKzQZDvIBfnNiA/YId/IyRAEnIIAlbQpql6+SPmunZerlV3T0zQv39i+m+yxF1+1f33HvuuUKRSDp1m0CWmpXWb0ftzuuK1XcukmsaTiSij4xHX/lQlRuXNbcnQlVucpciuqnIJhWXSOp9rF35UsnajzlTgZ3ANKPyKp+kJfYfJbNnEDvxU5DKkvdTbJSnce2/LUnbjS3HYnlbATEo7WF5x5FY8Vqxuq8oRiObndjU/fQtMq8hUWBchI2IVwXy3nHpKw8iHD7RNhzUiC5CxUzU/PKXAKUXNpW/AqpK3k+xUXm9ZG1b3sWYiRqAhcrFwK1F674YjeyX/nMxfYv6vDfp1p1SjL7LHEKoXBSwRg2o6Y+rTDEJ+qxULilm90URNpSgA67o/5Ay73BiTiVwXsBaJxBzTy2FOWVysOq2IxA9M2CtM2lom1MsEwoWNseJVQKfCV5Tagrtu8whhMp8YGbger47WmY86a/4LMGXuSwq+oNPkLI2ViCHS9980OADDv1g0qn7aKH9lzlEEA036FWWFdmSMvkIvmQwiOHmY34Kd0XDuKHpumV3tIwB8bgFXBCy9nuxEycX05wyOWhomwGcHbL2p4k5s4thRkHCFo/HLUHDDjgQym/TMvnZNvsMIPyA96zyC3S8iKTOAw4LWdtC9MJimFGQsH149tYzQApR2BM3uVd9pBAbyhwChHdtfESjRbKkTD4sr7BnVSQvrrA4NuEitDAD1P+H/FdhrRSFXSC/D1l3BugHi2pNmSFEP1tgCx8k5nwU1/5VUewpk5lrbqmmRxYX2Mpcmte+m8SKnYU0UpiwacEDDkUuAW4otJ0i8FjUbv9cmIrda+vmqiVPFdugkDyPaxc3RjDmbKMQV7AQmteeikfhAdb+7miphO10PKvweDnL+wpwcd5yol8mFXmi4P5U3iq4jeH0Vi0EZhTYSoRU5EKgpZBGQgvbRqf+r6AIAw7+cmNL40mXNrX+ughtlXmnkYpcjBToFgCoRIHrC28oA679i6K0E3P+YFRO5SVam35elD6LS35RNsF/CRUkbKHX2EQK2A0dRSSVKto2b5l3GKLF+bHAh7ATHy5SW2VGU5OMoBIinjUj84k5RxbSQHhhKyTMYxQqlHetyozFTnwAKJ4YlXdHS8esXXOBgsRoGBWohI+2IKSwbXRrPwiY7GZuA6PthZM3Jeo+EMaWMu9g1DRbDGZZIcqnEEqH+c71uDyrUMIWIWI04BTuQtQou0JKKB+xKjMaMzdUdDVmL9CPEnM+VJBFZTKgApjEnyminzdsdAHLW2eFtSiUsClmu6GWpQ+p8oBJWWFynUJIOg1BD/GWKSaNLccCHzcouZPZO+5HMF3AL6/nFhvb+RvgWIOSz+HY92A2a6skkjo/rEmBhe2elsZjUfmEQdE3j3ztPT+NiBoJG3BqsnX5+4PaUzq0vcttKAd2ThSiSzHJ56WymXjcw/AFCuX13KJj7oY+iL/F/ZBR6QLc0cDC1u+ljBLIqfDwvHi8/5LYHf8F8qJJ29o/qXZHI6J6Z1eiLvRb4xBjD6nIH4vYnlmMpOjgj+R+w3ZPGdiUKFM8gj0rFbOXkMo5xJw/D2NQYGEzDfMQj83p/1Z90KztyeWOAlUisqnbbSg0mvqdzh4s71xc+42itBZzjjTM59VDRb8fqOqfKvitUfvl3dHi0djyMcDkRbEdx/Zj7w478CRg8hKsDrs7GkjY1juxI1FMBlxvb2/v9wf/UDFUaPj4PWsaJkUa72FUqeqmLqdh3kQbMknxRS2x4mdFbNM0n9cTrFm1N/2XyuYcZYewdDJ5Bgc3fgpwEwbdULh1dQ+ijxnWC/WsAglbRHovwGTACT+8YvXdaUV+Yftxz+BfwpEP9azUCUFsGiemCvpgt1t/xkQbMsnYjWctSIuan16oGAR1Q30sz9DF4RiuuaU6sFVlMmH2rFQeGvW32bMSDTXRCTQQxfQWKmWE6xmPxz1E871NVUSvrmm+4wdBbBpHpqvy6Ea3zmTj5FBgDyrnpo/22Ikv8fq731Nwq+b5vJRUZOSPZdesp4F8x5J2orKAW1f3hLSwzCCNLScAJrnu3kb0yVGfPQz05qn3Wywv1DKQsbA90NYwA2W+WauRh0d/pF7OXStf1GKda0ztmSD+zFL5frLlqtMm2pAJZg8qC9NX29mJL6Hy7aK0XNn3GUzyeQm/oLXp1RGfdUdT5N5xex2V+bTEJkM2mYMfyzNbq1R5HNd+e8Rnrv0WKj/MUeu3WN68sFfyGQtbb8ozTSD3q2hT65j0P/L2vieAfRnKewKxQVFLug0XTPJZ0eF41qPD88ipZfVPpEHjzJtY3vy0qMWc64smamAeOqBZBCx7eNEOYK4vairEnHj5BquCCbdkMPR5tmf1Iv0Vc0mseI14vIIm96tBDTMWNlUrwCLhWKJf6N4PYxYMFbi6xu5oBeh2GhaiutHCutTUrgniXZ5aT25saTwJoCbW/jSwdoJtGg92I7qIxIpnAX+mBvGitV7XcRhgej9t5p32qW9/n7Ev0NcRPRvX/g2oYDv/AlxPc6K8ZhoW/0apvzEo6VHRn1nYLO9+xp4YeZH+inm0L99GTTLC9qM7EY3TvPY9QcwzEraOjrrDQI0GnAXZ19JkhDuqqrIyanesBV/UFH0AmIJqVNX4stWJ4t2Wl3p8o3PV+0TQmljHKlEpKNXKJGc3nnUOTvN/AhBz4kWdqQFU95yLWT6vbbixZzN+8y9f2A88PuyT1xGdj9P8QlrUVPzbzz2rHIAdFv9GKRP9+A/WrNqR8ZvEitdGnRgZKWqzdt2ByucAwbMCHbk0ErbpPWI64Hb+v+3HZz8b6q+99TMgasua2xMAXW79uQOiNujqHruppf50E9smmGMsrKeSLY0niKA6608rRNgw0UaVgDfwrLnpjYKYE6cUuc2M3VAZCh3I/P3gC3SkqMXc/5MWNZ8oNclIeIMPaUxPG+TeNBw6MfLfI0Rt5u51A6I2SKCXkJkrapp7TXRzPB73sn0dbWzbBfwbIg3DRU2U+xm1fqdesH/IBPIXeKmn7mldfnw02p3Sw/deCdI90UYVFcu7gNamXwKlE7V4vALT+2mzrdmM/H4rKmcNE7VbgNWjSh7N4XvKZ4KD4h9OP8uobL5n5Z8Y+TUV/XNpX76NmFPJ4Xs2ApePKvdxYs77TE3MK2xPxeMVajjgNNuC7jD6qbwsGmvvBOhK1C0RX7HHbkoINfHixUWVmuNTKe9761saj4pGu1PTe6ZdCWIagDj5Sax4GQA7cQOlykK7/ehPA0cYlNzHtH2jQwdG4p+AOI2W2IsDonYrcHXGspZ3sLxAJw/+4fRKg5JbcJqfz1nCPzFyFmtW7SDmVAIbsp4R9bMgG5FXOHbO2ToXswG3v2dK6vF8hS633TcAkom6RSJyD5AtUHLOSUe/MmFvUxW5DkgFqHJihZf64fqWxqOWrL61h31/uhiYLPcgFI6/phZ4dyoApptTjw+so+XGtd8YNlNblbWcSs3AbLGMOabPyuwkiGu/MbAksI5cJw0C3DaWf0bkmfrS+mRt7Z2ZwjnG0O02LEbkPvKEj1iSmrC36bJYexKRRiCra52BEyu81Pfuva32iOgXuvdPofIzoD8qlY3jRilnagCoGJ8JND02NSRqmWdqQ7yLV48xc6vKwMrbpwPnGJY2e1Yxp5JZu7qBfNEQp9DYcpJJkzmFTRURMbsQWTAbcN1uw2JVvReDmDhFLkkmayZscTcaa+8UsDFLYjjIyf2VkcfvXnP5zPNt9+3enr7zAaNkm5MSO3FDiWdq0NRyOmb5vDwq+x7JXyyP+zmasjtqTl/lEmCKQcm9VPfkCsD1iTmViHYZbxwZBgXnFLZup8E0gZxaGU4bjGnPF7W8M7VhHKW7Z0zo27TG7mhF9NqA1U6tjFQ//EBbw4wrVt/9x8oqXQhkDk+YzIyHqIH5JbuiP8saOpAmLWrZ3c+xLC27o4aImu5cP5b32Jq/ppYMeCG20Usotysqxrc6P7u0qfXVXAWSbsMFqno/2dfUsmAWP1dKorHOfxXhKwGrnd6T0gc3O7GpF9V37um3IosR/rskBpaCJvfr4yJqACrhDlJnKEDMTRBM1ACOZNvsQ/2YXH78xAFLjMpaXm4PriZZhUo3pqcXhvjLgezKubvP/bUYLRIKufOtdSXqlqCaBKpM2hvGs5V9qe8GrFMSamId30L5WqBKytz99D3Q0VF32OVNra9HY+33lci84mInbkD0H8epr5MB08zJOcaZCrZzGxALbIPKzbj2vweud6jRU70A+DODkilUsi8Z1CSrmLm7C1GTexJGc92YM8IZyCpsGxMNJwNGcSOpHOtrSWf5eSJyL4Fnajxb0Zc65+Kr170ZsF7JiDZ3XK/KtwJWWzCtR+5/5JZrDo40OTHnG6FmaqL3kYq8Erie6WwNtgyEBowlHrewHQeVlYH7hxtpiX0xRL1DEdNn9dOsSUd9UdsUoK1BFJXP49pGp12yCltEPNOOX1sW68i4fpR0Gy4C7z6Ci9p/Vlbp/IuvXvdm8uaaKV1OXVA3sGQsa+74Csq/BqoknLu3au+Gpyb7Ok7M+QbwDyFq3ovKMly7L0TdwkIH4nGLbbMdVJpC9P1dXPvvAWhyP4KdWBaijUMDPxzDdIaV+Vldc0s1s3bdAwRNt6/A52mJ+b+7xpZPEXMW5qqQVdjUMPeaiG4WGbtr2J2ouxjVLswC+YbzCyLWuRfVd+5J3lwzhWnTHxTka+tbGo8K2E7JqLE7rlWVYCmWhIv+MPvljZNW3GLO1wgranBpKFFb3vp+4GNGZSXTcocK22bfBjQG7lv0Jlz7SwDEnA8h+gQqKwK3c6hwxJufAt5lWHrss6pJVtFTnQxxW7wvaq59CwAx50ws72FEa3NVyihsA7dFfdSkV88bq85dbsNSFdlIOFE7J9rYtmtQ1IAFQKTCv0RmUiCCRu32qwE3YM2lO+dsaZt0Jyp8UfunEDXvIayoAUSMn+leqnpHxQOq0NSyBgguRqI34TT/HcBAXNRTwNHAp2hee0zg9g4FPMt0I/F3fhaVYfjuZzcQ9P4CRfRvR4gaPALMQOUCrr05a9hJxh+YpIzzmO97u5oRx1u63IalorqBwKImPx8Utc1ObOowURv4enKdHRVBX9h+/AqBuwLVU2pPmr2lddKIW5P7dcKImsom4LLQogbmoQPw6MjQARVi7lpEm0P0euMIUbO8J/FFDcDCs8r3IYxBBfMU4CNzrA2tqYUTNaf5VmBQ1B5lKBnHDN6emjW7bsYfl6rpaQN5vL6+88DgX8lE/SVhRa0vdSAtavvpHylqAMpZG9oa5gRrt7TE43FPZ+6tU2RjkHoC9SfN3uJMeGqmJvfroXY/VTYhenlBota89hhU/tqwvyGvIB63iLkd+IHTQbkxvabW2PIxLO9HDInaIIHS4xwSNCc+ARxnVDaSGnpWQ6IWZk1tdVrUGls+hS9q00eWkqzPaoywbWhrmIPwSYPO+2RYcsVup64GP2VPMFFT/i9UnP25let3+6LW9xBoppz3ltVvnCpl3IhGu1N7qKglZyjCWAQak279jSUyKz924p9DiZpokmO2FTZTA0hFLsTkQmR4KZ2o0N8oaAeuCtHjN9OiZidOxvJ+AByZodwZZXd0FOY717/As54G/KShM3c/QDhRW4Vr3wZAzJmH5T3GaFHz+QwxZ2qmRsYI24B45HOTUiJaW2O3fx/8mZoi6zG7Mm04P+3t7T03artvbXZiU/dr32Yg6zV3wuQ8+mLbbh8z99aA5j19MRyBL3Y59TeVyq6s+MG314Wo2c3sHZ8jHi88Fbrlmbh8W/CsBaxduZuaZKQAUfsuru2LuJ04GZUnyCxq4Luj5VnbcNQonvU5KvsW4tp9XHNLNdU93ZhnQ073BFyDa/sTJjtxFv6EIaN4AdMRzRgwPEbAJH8CuZQqV9bEOjfCiJlacFHr6V10xeq7/5gWNcl3WYycmVxbOynfptFod+/0nhlL8afMxvji1hBm4T4cYd1P6GbO9suLImqrbjsClXxH5bbiWfNobfo9NckIh+8JJ2oq30nvfja5p+QRtUHKwjZIk/sR4MQ8pZ6jsm8Bt1/9JtfcUk1v1aaQu5/X4Nq3A76oqTxM5pnacDI+qxHClmxdPgv00zka6Ue5dFlzxwaAbrfu0pAztWcGRQ1gP/1X5Bc13161IpN2cXfJ6lt7Dkzpr0H5cZB6gn6t26n/+1LZlSbmfCvkmtoGds+8rCiiBtBbdT65x8zvSUXOSovazN2d+bb3s3ADLbEvp/+yvG+TX9QATmfl7X8Ror93HvnP8T5LKnI2t1/9JtfePIWe6gdDiZrQnBY1AD+cKp+ogcp5XLlu2hizh/8h/d6FZB9wKVVqo80dmwC63IaoqtyZo3w2nqmukEXDL1SOROR7GGbQkEn+Nq2tvXPfgan9i4OKm8J3kk7D35XKroHg2y/nLTcaf02tduBqu+Igmsu12YpnnU1b45YBUesArgjRSxzXjo/4RI2TfwqpyKQeZ+NGbjf0OSr7zqGtcRfX3jyFvdMfAHIGzmbqAZWrcezRoVOmz2oahx04b/SHI4RNJeuWbr+glw3O1JJO3eWiGmam9pPqCll04fL2Pw3/cGlj2xbMs1+ccU9Lo0nGkQmjtvbOfZXVegHIz4PV1O8MHGUrLuFPFHQVbU1tkNz5vLYO3K3w+2GidmWIXuK49g1jPk1F7sM8BVVZ2PyboU7J8u3zaffz2punsG/ag4ia5mkbxN8oaIllCna/P0A7Y55VWtiSt6+cTma1TYFeVWN3doM/UwO5AwiWJ03k6eoKWTJa1AZRxPQfYnme4UWtE8hF9Z17Kqu8BTDiFp58iCVGl+bkYmSyz5jzHcKJ2l3snllcUQPor1hM5rRVL2N5nx62pnYn4UTtqxlFDaCtcQuQO1X1ICp/zfLW40P0/87BD8rNtHP9HJV9vvsZc6ayb9pmRodnGbSOaFN6o2A0c7Y/A7xu1JLokoEXZpq0sGnlgSWMHXAp0Nqo3bkeIJmoXyaqdxN0pibydHWExdlEDUDwjBVa0YPibXpRfeceKlkEjNfN468AQ2tR/kwtzNrdRuZsry+q+zlEpjXSrURSZ5NY8fKwNbXLArescj2u/fU8pUzHmWB5B8U4Kxma8Vjl88A5aVGDB4BM4Vk5W0Z0FU5zW9YS8biX+RhdRqbSVzliXW/IFR0blJsSkasGRa3brbsU4S7CuJ95RA0ganf+CvitYZun39O6/KB4m0YbOv5Q4fXPB35d4q5eBebh2r8DIOZ8k3AztY3M2X5l0WdqMJjPa3S0+FYiqXmsXflS+i7JcGtqX6Ullj+tlKi5ixMgx/47jsaWoxAdfSHy88ACXPuNAVEbG0ifH0V0JU5zIn/JUacYcjEqC7IF8Mgt11QLI+JBUiJyVU2s/W4Y2P0Mt1Hwk1zu52jUPMhVvFSWm2wmIRevuHNnxIosBF4qURevAnOHidp3IXBiTIA7mLO9+O7nIGPzeW3Bs+ayduVLxOMVzNq1ftRdkqb8g8FMzce/Ncn0OXycxpYTQthz8GN5n2XkctNoUXuI4DM1D5UGI1EDqO55AjDSDlQW0dCWXsaxAPYdtvcchgZcJlELNVOjf0remdpwxHyd7aBxRwfxMwyn5gEvF7npHXjWwlEztTC7qx3M2d5Ajnthi8DwHbZXiKTmp9fUts2+I8j1amlE/wnX/udAddR4nAmRibtQaIIZ/qx+yXBRE80ZSJ8FD2igJdZpXOPW1T2ImsaFTiGSSp9H9V3RITc0pUrdoKh1JeovGxC1YBsFyo/pn7I4umrN3iDVXth+3DNAnpz2aT65YW3dewLZNcFE7XVbiVjnANuK1OTreNZ8Wpt8N9cXtTAztQ7mbG8sqaj5+bwGj9e8Agy5nzN3r2PsBbkm/CNO8zcC17I8cxeH7OcR37HUdRwOzB3465fA2SNETcUk5nQ4KaAB174jsC1B3NFhu6NWMlkTUX/ApVSpW9bccRdAd6K+Xvw1teCilpqyJKiowcChcvJfujyARKyD7+hLtLHt/3uSmoe5gGfjdUSLIWrtJRc1gJm7z8LP5+WLmmv/btjuZzhRc+1vhrJl9o6fYPr/XzltIG/coUNl3/n4afx/TUX/uSPczzCiJhpO1HweBnqNSoouIub8OYA1cAvUrNGipkIrJveODqcAUUvbhhUgfuXgckcHuTS27kXQhUDm9Mn58UXNaX4B8A+0hxe1ppKLGjBwE9FYUQuz++mvqYUTNfB33PzjOmYcaruj/mmD31DRP3/ghvbBNbWg7qcvak7zutC2uPZbiJpePF49eD+tJaoXDhe1LreuIZSooT8qVNQApvdMNV8whE9sdK4yupdhshG1O3/lqSwAdgWsunOMqIU70D5+ooYKoqcxKGoxp5KZu5MFiFqwNbVMBHFH5eB8gYYi5kwFOY6K/nmsWbVj4LhSOFFTqS9I1AYJ4o4OPCtLse4dFLVkomG5qLQQWNTkB1OoCrymloklq2/tAeOjL4jKQbM7OppLm9uft/zrzP6Yt7DPDjxrblrUYs5NoURNtGX8RA1oTswBatOiJtqF+V0Hw/lfRRE1gJ7qxwHT8XoqduIDRel38nMc4i1hzaodrLx9OlP2P0YYUYNaWmJ3FsWi/ooH8DcfTFhIXcfh1rLmth+BP1ND1CWwqPHDA1P6Ljzfdt8OWC8H5sG6IgffOttwLrE7/l2ExeT7kansHLVRcBMQ5nYlF8e2x03UABIrXhtwP6sIfkGuj+gXce3/XTSbOusPBDg7Sqgd24MR1/4NiRU7aWibQX/Fo8CZAVtIIXolrr2+aDa1L9+G6M8MS1dT1XuhBQXM1ITH2bd3cW3tnfvyFw5ClfmCIXrawB0NBy01sY5nQBYz+jjUcFqbfpwWNX9NLYyotTJn+woQ0/OSxWPwLsng164BXIfTfHOxTQq2O3oInR29ct00IqkHCSdqdTjNG4puU8Dd0Yp1666cpgc8S9QKdCmGoJ7u3Xt39Avd+wOamJeo7b7V5TZcLsoRJuU9ry+7IFfKDu1Vk6wWL5jaVwqidvtPutz6pYrXk7NgQ9sc6H8ZCZga25N9tDStnxBRA5i16/0gjxIwXx3Ka7h2oASexlT1Pkhvtfn/x5hTWXDm4Fx41t1EvPxni61UwOQKATnswIexdAMQTKDEe5HEin8riU1wB2K4Hu1J7/8AsD0b69uqADIAAAAASUVORK5CYII=' height="12pt" style="vertical-align:middle;"/></a>
</p>
</div>
<script>
(function(i,s,o,g,r,a,m){i['GoogleAnalyticsObject']=r;i[r]=i[r]||function(){
(i[r].q=i[r].q||[]).push(arguments)},i[r].l=1*new Date();a=s.createElement(o),
m=s.getElementsByTagName(o)[0];a.async=1;a.src=g;m.parentNode.insertBefore(a,m)
})(window,document,'script','//www.google-analytics.com/analytics.js','ga');
ga('create', 'UA-48354045-1', 'auto');
ga('send', 'pageview');
</script>
</footer>
</div>
</body>
</html>