1
0
mirror of https://github.com/msberends/AMR.git synced 2025-07-09 05:22:48 +02:00

(v1.1.0.9019) mo_source fix

This commit is contained in:
2020-05-25 01:01:14 +02:00
parent f5ff2e6634
commit ae1969b941
73 changed files with 619 additions and 571 deletions

View File

@ -39,7 +39,7 @@
</button>
<span class="navbar-brand">
<a class="navbar-link" href="../index.html">AMR (for R)</a>
<span class="version label label-default" data-toggle="tooltip" data-placement="bottom" title="Latest development version">1.1.0.9015</span>
<span class="version label label-default" data-toggle="tooltip" data-placement="bottom" title="Latest development version">1.1.0.9019</span>
</span>
</div>
@ -186,7 +186,7 @@
<h1 data-toc-skip>Benchmarks</h1>
<h4 class="author">Matthijs S. Berends</h4>
<h4 class="date">20 May 2020</h4>
<h4 class="date">25 May 2020</h4>
<small class="dont-index">Source: <a href="https://gitlab.com/msberends/AMR/blob/master/vignettes/benchmarks.Rmd"><code>vignettes/benchmarks.Rmd</code></a></small>
<div class="hidden name"><code>benchmarks.Rmd</code></div>
@ -221,21 +221,21 @@
<span class="kw">times</span> <span class="kw">=</span> <span class="fl">10</span>)
<span class="fu"><a href="https://rdrr.io/r/base/print.html">print</a></span>(<span class="no">S.aureus</span>, <span class="kw">unit</span> <span class="kw">=</span> <span class="st">"ms"</span>, <span class="kw">signif</span> <span class="kw">=</span> <span class="fl">2</span>)
<span class="co"># Unit: milliseconds</span>
<span class="co"># expr min lq mean median uq max neval</span>
<span class="co"># as.mo("sau") 8.7 9.4 13.0 9.5 11 39.0 10</span>
<span class="co"># as.mo("stau") 140.0 150.0 160.0 170.0 180 180.0 10</span>
<span class="co"># as.mo("STAU") 140.0 140.0 160.0 150.0 170 180.0 10</span>
<span class="co"># as.mo("staaur") 8.7 9.6 16.0 11.0 11 41.0 10</span>
<span class="co"># as.mo("STAAUR") 8.7 9.2 13.0 10.0 11 37.0 10</span>
<span class="co"># as.mo("S. aureus") 10.0 12.0 23.0 13.0 39 41.0 10</span>
<span class="co"># as.mo("S aureus") 9.4 10.0 11.0 11.0 12 12.0 10</span>
<span class="co"># as.mo("Staphylococcus aureus") 7.5 7.5 8.3 8.4 9 9.3 10</span>
<span class="co"># as.mo("Staphylococcus aureus (MRSA)") 890.0 930.0 940.0 940.0 950 980.0 10</span>
<span class="co"># as.mo("Sthafilokkockus aaureuz") 370.0 390.0 420.0 400.0 440 510.0 10</span>
<span class="co"># as.mo("MRSA") 8.0 8.9 15.0 10.0 11 39.0 10</span>
<span class="co"># as.mo("VISA") 20.0 21.0 36.0 25.0 53 60.0 10</span>
<span class="co"># as.mo("VRSA") 19.0 22.0 29.0 24.0 26 53.0 10</span>
<span class="co"># as.mo(22242419) 150.0 150.0 170.0 150.0 160 290.0 10</span></pre></body></html></div>
<span class="co"># expr min lq mean median uq max neval</span>
<span class="co"># as.mo("sau") 9.7 11.0 15 11.0 12.0 49 10</span>
<span class="co"># as.mo("stau") 130.0 150.0 180 170.0 190.0 270 10</span>
<span class="co"># as.mo("STAU") 130.0 130.0 140 140.0 150.0 170 10</span>
<span class="co"># as.mo("staaur") 7.9 9.6 15 11.0 12.0 40 10</span>
<span class="co"># as.mo("STAAUR") 9.1 9.4 16 11.0 12.0 41 10</span>
<span class="co"># as.mo("S. aureus") 8.5 11.0 12 12.0 13.0 16 10</span>
<span class="co"># as.mo("S aureus") 8.4 11.0 17 12.0 14.0 47 10</span>
<span class="co"># as.mo("Staphylococcus aureus") 6.4 8.6 12 8.8 9.8 40 10</span>
<span class="co"># as.mo("Staphylococcus aureus (MRSA)") 830.0 860.0 910 900.0 930.0 1100 10</span>
<span class="co"># as.mo("Sthafilokkockus aaureuz") 370.0 390.0 410 400.0 430.0 440 10</span>
<span class="co"># as.mo("MRSA") 9.2 9.5 16 11.0 11.0 63 10</span>
<span class="co"># as.mo("VISA") 22.0 22.0 36 26.0 54.0 59 10</span>
<span class="co"># as.mo("VRSA") 21.0 23.0 48 27.0 55.0 180 10</span>
<span class="co"># as.mo(22242419) 150.0 160.0 160 160.0 170.0 190 10</span></pre></body></html></div>
<p><img src="benchmarks_files/figure-html/unnamed-chunk-4-1.png" width="562.5"></p>
<p>In the table above, all measurements are shown in milliseconds (thousands of seconds). A value of 5 milliseconds means it can determine 200 input values per second. It case of 100 milliseconds, this is only 10 input values per second.</p>
<p>To achieve this speed, the <code>as.mo</code> function also takes into account the prevalence of human pathogenic microorganisms. The downside of this is of course that less prevalent microorganisms will be determined less fast. See this example for the ID of <em>Methanosarcina semesiae</em> (<code>B_MTHNSR_SEMS</code>), a bug probably never found before in humans:</p>
@ -247,18 +247,18 @@
<span class="kw">times</span> <span class="kw">=</span> <span class="fl">10</span>)
<span class="fu"><a href="https://rdrr.io/r/base/print.html">print</a></span>(<span class="no">M.semesiae</span>, <span class="kw">unit</span> <span class="kw">=</span> <span class="st">"ms"</span>, <span class="kw">signif</span> <span class="kw">=</span> <span class="fl">4</span>)
<span class="co"># Unit: milliseconds</span>
<span class="co"># expr min lq mean median uq</span>
<span class="co"># as.mo("metsem") 163.900 165.300 180.600 176.600 192.600</span>
<span class="co"># as.mo("METSEM") 153.500 156.100 177.300 176.000 200.400</span>
<span class="co"># as.mo("M. semesiae") 9.155 10.250 15.980 10.800 12.790</span>
<span class="co"># as.mo("M. semesiae") 9.498 10.160 16.700 10.560 11.050</span>
<span class="co"># as.mo("Methanosarcina semesiae") 7.006 7.345 7.993 7.814 8.413</span>
<span class="co"># max neval</span>
<span class="co"># 206.600 10</span>
<span class="co"># 206.800 10</span>
<span class="co"># 38.630 10</span>
<span class="co"># 46.810 10</span>
<span class="co"># 9.659 10</span></pre></body></html></div>
<span class="co"># expr min lq mean median uq max</span>
<span class="co"># as.mo("metsem") 152.700 163.100 172.10 171.40 176.20 213.80</span>
<span class="co"># as.mo("METSEM") 148.300 167.900 181.50 185.30 196.70 204.60</span>
<span class="co"># as.mo("M. semesiae") 8.610 9.468 13.88 10.05 15.28 35.20</span>
<span class="co"># as.mo("M. semesiae") 9.164 9.530 21.29 11.58 42.98 50.57</span>
<span class="co"># as.mo("Methanosarcina semesiae") 6.625 7.229 14.25 7.98 11.32 42.18</span>
<span class="co"># neval</span>
<span class="co"># 10</span>
<span class="co"># 10</span>
<span class="co"># 10</span>
<span class="co"># 10</span>
<span class="co"># 10</span></pre></body></html></div>
<p>Looking up arbitrary codes of less prevalent microorganisms costs the most time. Full names (like <em>Methanosarcina semesiae</em>) are always very fast and only take some thousands of seconds to coerce - they are the most probable input from most data sets.</p>
<p>In the figure below, we compare <em>Escherichia coli</em> (which is very common) with <em>Prevotella brevis</em> (which is moderately common) and with <em>Methanosarcina semesiae</em> (which is uncommon):</p>
<p><img src="benchmarks_files/figure-html/unnamed-chunk-6-1.png" width="900"></p>
@ -267,8 +267,7 @@
<h3 class="hasAnchor">
<a href="#repetitive-results" class="anchor"></a>Repetitive results</h3>
<p>Repetitive results are unique values that are present more than once. Unique values will only be calculated once by <code><a href="../reference/as.mo.html">as.mo()</a></code>. We will use <code><a href="../reference/mo_property.html">mo_name()</a></code> for this test - a helper function that returns the full microbial name (genus, species and possibly subspecies) which uses <code><a href="../reference/as.mo.html">as.mo()</a></code> internally.</p>
<div class="sourceCode" id="cb4"><html><body><pre class="r"><span class="fu"><a href="https://rdrr.io/r/base/library.html">library</a></span>(<span class="no">dplyr</span>)</pre></body></html></div>
<div class="sourceCode" id="cb5"><html><body><pre class="r"><span class="co"># take all MO codes from the example_isolates data set</span>
<div class="sourceCode" id="cb4"><html><body><pre class="r"><span class="co"># take all MO codes from the example_isolates data set</span>
<span class="no">x</span> <span class="kw">&lt;-</span> <span class="no">example_isolates</span>$<span class="no">mo</span> <span class="kw">%&gt;%</span>
<span class="co"># keep only the unique ones</span>
<span class="fu"><a href="https://rdrr.io/r/base/unique.html">unique</a></span>() <span class="kw">%&gt;%</span>
@ -293,25 +292,25 @@
<span class="fu"><a href="https://rdrr.io/r/base/print.html">print</a></span>(<span class="no">run_it</span>, <span class="kw">unit</span> <span class="kw">=</span> <span class="st">"ms"</span>, <span class="kw">signif</span> <span class="kw">=</span> <span class="fl">3</span>)
<span class="co"># Unit: milliseconds</span>
<span class="co"># expr min lq mean median uq max neval</span>
<span class="co"># mo_name(x) 1690 1710 1770 1760 1810 1870 10</span></pre></body></html></div>
<p>So transforming 500,000 values (!!) of 50 unique values only takes 1.76 seconds. You only lose time on your unique input values.</p>
<span class="co"># mo_name(x) 1700 1760 1780 1770 1800 1880 10</span></pre></body></html></div>
<p>So transforming 500,000 values (!!) of 50 unique values only takes 1.77 seconds. You only lose time on your unique input values.</p>
</div>
<div id="precalculated-results" class="section level3">
<h3 class="hasAnchor">
<a href="#precalculated-results" class="anchor"></a>Precalculated results</h3>
<p>What about precalculated results? If the input is an already precalculated result of a helper function like <code><a href="../reference/mo_property.html">mo_name()</a></code>, it almost doesnt take any time at all (see C below):</p>
<div class="sourceCode" id="cb6"><html><body><pre class="r"><span class="no">run_it</span> <span class="kw">&lt;-</span> <span class="fu">microbenchmark</span>(<span class="kw">A</span> <span class="kw">=</span> <span class="fu"><a href="../reference/mo_property.html">mo_name</a></span>(<span class="st">"B_STPHY_AURS"</span>),
<div class="sourceCode" id="cb5"><html><body><pre class="r"><span class="no">run_it</span> <span class="kw">&lt;-</span> <span class="fu">microbenchmark</span>(<span class="kw">A</span> <span class="kw">=</span> <span class="fu"><a href="../reference/mo_property.html">mo_name</a></span>(<span class="st">"B_STPHY_AURS"</span>),
<span class="kw">B</span> <span class="kw">=</span> <span class="fu"><a href="../reference/mo_property.html">mo_name</a></span>(<span class="st">"S. aureus"</span>),
<span class="kw">C</span> <span class="kw">=</span> <span class="fu"><a href="../reference/mo_property.html">mo_name</a></span>(<span class="st">"Staphylococcus aureus"</span>),
<span class="kw">times</span> <span class="kw">=</span> <span class="fl">10</span>)
<span class="fu"><a href="https://rdrr.io/r/base/print.html">print</a></span>(<span class="no">run_it</span>, <span class="kw">unit</span> <span class="kw">=</span> <span class="st">"ms"</span>, <span class="kw">signif</span> <span class="kw">=</span> <span class="fl">3</span>)
<span class="co"># Unit: milliseconds</span>
<span class="co"># expr min lq mean median uq max neval</span>
<span class="co"># A 6.240 6.490 6.860 6.910 7.15 7.510 10</span>
<span class="co"># B 10.500 10.600 15.300 12.000 12.10 49.300 10</span>
<span class="co"># C 0.198 0.243 0.266 0.278 0.29 0.322 10</span></pre></body></html></div>
<span class="co"># expr min lq mean median uq max neval</span>
<span class="co"># A 5.640 5.890 10.300 6.580 6.850 44.400 10</span>
<span class="co"># B 11.000 11.300 11.500 11.400 11.500 12.400 10</span>
<span class="co"># C 0.217 0.238 0.271 0.267 0.298 0.383 10</span></pre></body></html></div>
<p>So going from <code><a href="../reference/mo_property.html">mo_name("Staphylococcus aureus")</a></code> to <code>"Staphylococcus aureus"</code> takes 0.0003 seconds - it doesnt even start calculating <em>if the result would be the same as the expected resulting value</em>. That goes for all helper functions:</p>
<div class="sourceCode" id="cb7"><html><body><pre class="r"><span class="no">run_it</span> <span class="kw">&lt;-</span> <span class="fu">microbenchmark</span>(<span class="kw">A</span> <span class="kw">=</span> <span class="fu"><a href="../reference/mo_property.html">mo_species</a></span>(<span class="st">"aureus"</span>),
<div class="sourceCode" id="cb6"><html><body><pre class="r"><span class="no">run_it</span> <span class="kw">&lt;-</span> <span class="fu">microbenchmark</span>(<span class="kw">A</span> <span class="kw">=</span> <span class="fu"><a href="../reference/mo_property.html">mo_species</a></span>(<span class="st">"aureus"</span>),
<span class="kw">B</span> <span class="kw">=</span> <span class="fu"><a href="../reference/mo_property.html">mo_genus</a></span>(<span class="st">"Staphylococcus"</span>),
<span class="kw">C</span> <span class="kw">=</span> <span class="fu"><a href="../reference/mo_property.html">mo_name</a></span>(<span class="st">"Staphylococcus aureus"</span>),
<span class="kw">D</span> <span class="kw">=</span> <span class="fu"><a href="../reference/mo_property.html">mo_family</a></span>(<span class="st">"Staphylococcaceae"</span>),
@ -323,21 +322,21 @@
<span class="fu"><a href="https://rdrr.io/r/base/print.html">print</a></span>(<span class="no">run_it</span>, <span class="kw">unit</span> <span class="kw">=</span> <span class="st">"ms"</span>, <span class="kw">signif</span> <span class="kw">=</span> <span class="fl">3</span>)
<span class="co"># Unit: milliseconds</span>
<span class="co"># expr min lq mean median uq max neval</span>
<span class="co"># A 0.248 0.253 0.266 0.256 0.271 0.323 10</span>
<span class="co"># B 0.248 0.254 0.272 0.255 0.257 0.420 10</span>
<span class="co"># C 0.245 0.259 0.265 0.268 0.271 0.286 10</span>
<span class="co"># D 0.248 0.252 0.268 0.261 0.278 0.323 10</span>
<span class="co"># E 0.250 0.256 0.265 0.261 0.268 0.312 10</span>
<span class="co"># F 0.237 0.238 0.249 0.243 0.246 0.317 10</span>
<span class="co"># G 0.239 0.242 0.252 0.245 0.245 0.319 10</span>
<span class="co"># H 0.233 0.241 0.262 0.256 0.272 0.347 10</span></pre></body></html></div>
<span class="co"># A 0.205 0.208 0.230 0.219 0.240 0.307 10</span>
<span class="co"># B 0.201 0.216 0.227 0.223 0.229 0.293 10</span>
<span class="co"># C 0.209 0.210 0.224 0.218 0.241 0.255 10</span>
<span class="co"># D 0.200 0.211 0.222 0.217 0.224 0.279 10</span>
<span class="co"># E 0.199 0.209 0.220 0.211 0.219 0.280 10</span>
<span class="co"># F 0.201 0.205 0.228 0.212 0.217 0.346 10</span>
<span class="co"># G 0.193 0.208 0.218 0.217 0.220 0.272 10</span>
<span class="co"># H 0.190 0.195 0.206 0.200 0.203 0.263 10</span></pre></body></html></div>
<p>Of course, when running <code><a href="../reference/mo_property.html">mo_phylum("Firmicutes")</a></code> the function has zero knowledge about the actual microorganism, namely <em>S. aureus</em>. But since the result would be <code>"Firmicutes"</code> anyway, there is no point in calculating the result. And because this package knows all phyla of all known bacteria (according to the Catalogue of Life), it can just return the initial value immediately.</p>
</div>
<div id="results-in-other-languages" class="section level3">
<h3 class="hasAnchor">
<a href="#results-in-other-languages" class="anchor"></a>Results in other languages</h3>
<p>When the system language is non-English and supported by this <code>AMR</code> package, some functions will have a translated result. This almost doest take extra time:</p>
<div class="sourceCode" id="cb8"><html><body><pre class="r"><span class="fu"><a href="../reference/mo_property.html">mo_name</a></span>(<span class="st">"CoNS"</span>, <span class="kw">language</span> <span class="kw">=</span> <span class="st">"en"</span>) <span class="co"># or just mo_name("CoNS") on an English system</span>
<div class="sourceCode" id="cb7"><html><body><pre class="r"><span class="fu"><a href="../reference/mo_property.html">mo_name</a></span>(<span class="st">"CoNS"</span>, <span class="kw">language</span> <span class="kw">=</span> <span class="st">"en"</span>) <span class="co"># or just mo_name("CoNS") on an English system</span>
<span class="co"># [1] "Coagulase-negative Staphylococcus (CoNS)"</span>
<span class="fu"><a href="../reference/mo_property.html">mo_name</a></span>(<span class="st">"CoNS"</span>, <span class="kw">language</span> <span class="kw">=</span> <span class="st">"es"</span>) <span class="co"># or just mo_name("CoNS") on a Spanish system</span>
@ -357,13 +356,13 @@
<span class="fu"><a href="https://rdrr.io/r/base/print.html">print</a></span>(<span class="no">run_it</span>, <span class="kw">unit</span> <span class="kw">=</span> <span class="st">"ms"</span>, <span class="kw">signif</span> <span class="kw">=</span> <span class="fl">4</span>)
<span class="co"># Unit: milliseconds</span>
<span class="co"># expr min lq mean median uq max neval</span>
<span class="co"># en 20.99 21.59 26.64 22.35 22.94 69.49 100</span>
<span class="co"># de 22.02 22.54 26.83 22.98 23.87 63.13 100</span>
<span class="co"># nl 25.78 26.55 34.69 27.25 28.22 182.90 100</span>
<span class="co"># es 21.92 22.67 26.97 23.26 24.01 62.68 100</span>
<span class="co"># it 21.96 22.58 25.11 22.90 23.50 66.81 100</span>
<span class="co"># fr 21.82 22.76 27.53 23.26 23.84 66.75 100</span>
<span class="co"># pt 21.76 22.56 25.84 23.13 23.90 63.63 100</span></pre></body></html></div>
<span class="co"># en 20.45 21.03 25.78 21.63 27.29 71.19 100</span>
<span class="co"># de 21.48 22.06 28.50 22.81 28.56 73.54 100</span>
<span class="co"># nl 25.11 26.21 33.48 27.31 35.01 81.28 100</span>
<span class="co"># es 21.59 22.20 29.02 23.05 30.33 73.83 100</span>
<span class="co"># it 21.46 22.05 28.45 22.79 29.45 64.36 100</span>
<span class="co"># fr 21.47 22.12 31.87 22.83 31.24 174.10 100</span>
<span class="co"># pt 21.53 22.22 27.19 22.91 25.67 71.87 100</span></pre></body></html></div>
<p>Currently supported are German, Dutch, Spanish, Italian, French and Portuguese.</p>
</div>
</div>