diff --git a/MTUS-W6-adult-episodes-data-processing.Rmd b/MTUS-W6-adult-episodes-data-processing.Rmd index 08d7b89e96649b6f69bdfa213b95c31e66c02d17..5a8908eafcdeefbf64aa7b8af8c13761d2ecc2e4 100644 --- a/MTUS-W6-adult-episodes-data-processing.Rmd +++ b/MTUS-W6-adult-episodes-data-processing.Rmd @@ -704,7 +704,7 @@ kable(caption = "Distribution of missing location", MTUSW6UKdiaryEps_DT <- mtusUKEpsDT[, .(survey, ba_survey, ba_diarypid, ba_pid, main, sec, inout, eloc, mtrav, r_date, r_dow, - time, str_epStartTime, + time, r_epStartDateTime, r_epEndDateTime)] mtusUKEpsDT <- NULL diff --git a/MTUS-W6-adult-episodes-data-processing.html b/MTUS-W6-adult-episodes-data-processing.html index e2feae05208b8fa7b7dab60ac0cdc412f50b507c..f6b2bc73859a59f3c69f344572a7d0ce9f6d0968 100644 --- a/MTUS-W6-adult-episodes-data-processing.html +++ b/MTUS-W6-adult-episodes-data-processing.html @@ -118,7 +118,7 @@ $(document).ready(function () { <h1 class="title toc-ignore">MTUS World 6 Data Processing</h1> <h4 class="author"><em>Ben Anderson (<a href="mailto:b.anderson@soton.ac.uk">b.anderson@soton.ac.uk</a>, <a href="mailto:/@dataknut">/@dataknut</a>)</em></h4> -<h4 class="date"><em>Last run at: 2017-05-19 18:40:48</em></h4> +<h4 class="date"><em>Last run at: 2017-05-22 10:41:32</em></h4> </div> @@ -188,7 +188,7 @@ $(document).ready(function () { ## Unrecognized record type 7, subtype 18 encountered in system file</code></pre> <pre><code>## re-encoding from CP1252</code></pre> <pre><code>## user system elapsed -## 211.301 8.466 222.597</code></pre> +## 220.660 10.173 246.557</code></pre> <p>We have loaded 11,501,221 rows of data for 11 countries.</p> <pre class="r"><code>kable(caption = "Number of diaries per year", ba_tidyNum(table(mtusEpsW6DT$survey,droplevels(mtusEpsW6DT$countrya)) # removes unused countries @@ -3307,7 +3307,7 @@ kable(caption = "Check 1/2 hour coding (as string)",t)</code></pre> MTUSW6UKdiaryEps_DT <- mtusUKEpsDT[, .(survey, ba_survey, ba_diarypid, ba_pid, main, sec, inout, eloc, mtrav, r_date, r_dow, - time, str_epStartTime, + time, r_epStartDateTime, r_epEndDateTime)] mtusUKEpsDT <- NULL @@ -3366,12 +3366,9 @@ kable(caption = "Check 1/2 hour coding (as string)",t)</code></pre> <td align="left">time</td> </tr> <tr class="odd"> -<td align="left">str_epStartTime</td> -</tr> -<tr class="even"> <td align="left">r_epStartDateTime</td> </tr> -<tr class="odd"> +<tr class="even"> <td align="left">r_epEndDateTime</td> </tr> </tbody> @@ -3894,7 +3891,7 @@ kable( </tbody> </table> <hr /> -<p><strong>Meta:</strong> Analysis completed in: 5.606 seconds using <a href="https://cran.r-project.org/package=knitr">knitr</a> in <a href="http://www.rstudio.com">RStudio</a>.</p> +<p><strong>Meta:</strong> Analysis completed in: 6.158 seconds using <a href="https://cran.r-project.org/package=knitr">knitr</a> in <a href="http://www.rstudio.com">RStudio</a>.</p> </div> </div> <div id="references" class="section level1 unnumbered">