4ad0cb250a48478d3616568c220a5ade2103da8b — hrbrmstr 5 months ago a72e4c4
tweak
M .Rproj.user/A1BDA523/sources/prop/8B81C5F3 => .Rproj.user/A1BDA523/sources/prop/8B81C5F3 +2 -2
@@ 1,5 1,5 @@ {
      "tempName": "Untitled1",
-     "cursorPosition": "128,47",
-     "scrollLine": "84"
+     "cursorPosition": "120,5",
+     "scrollLine": "86"
  }= 
\ No newline at end of file

M .Rproj.user/A1BDA523/sources/s-5775B7A0/E0CB37FC => .Rproj.user/A1BDA523/sources/s-5775B7A0/E0CB37FC +4 -4
@@ 11,15 11,15 @@ "relative_order": 1,
      "properties": {
          "tempName": "Untitled1",
-         "cursorPosition": "128,47",
-         "scrollLine": "84"
+         "cursorPosition": "120,5",
+         "scrollLine": "86"
      },
      "folds": "",
-     "lastKnownWriteTime": 1558192299,
+     "lastKnownWriteTime": 1558192946,
      "encoding": "UTF-8",
      "collab_server": "",
      "source_window": "",
-     "last_content_update": 1558192299400,
+     "last_content_update": 1558192946874,
      "read_only": false,
      "read_only_alternatives": []
  }= 
\ No newline at end of file

M .Rproj.user/A1BDA523/sources/s-5775B7A0/E0CB37FC-contents => .Rproj.user/A1BDA523/sources/s-5775B7A0/E0CB37FC-contents +2 -0
@@ 23,6 23,8 @@ trend = scan(here::here("data/trends.txt"))
  ) -> tornado
  
+ tornado
+ 
  summary(tornado)
  
  #' Grid overview

M tornado.R => tornado.R +2 -0
@@ 23,6 23,8 @@ trend = scan(here::here("data/trends.txt"))
  ) -> tornado
  
+ tornado
+ 
  summary(tornado)
  
  #' Grid overview

M tornado.html => tornado.html +25 -9
@@ 438,14 438,30 @@ <a class="sourceLine" id="cb2-4" title="4">  <span class="dt">trend =</span> <span class="kw">scan</span>(here<span class="op">::</span><span class="kw">here</span>(<span class="st">&quot;data/trends.txt&quot;</span>))</a>
  <a class="sourceLine" id="cb2-5" title="5">) -&gt;<span class="st"> </span>tornado</a>
  <a class="sourceLine" id="cb2-6" title="6"></a>
- <a class="sourceLine" id="cb2-7" title="7"><span class="kw">summary</span>(tornado)</a>
- <a class="sourceLine" id="cb2-8" title="8"><span class="co">##       lat               lon                 trend           </span></a>
- <a class="sourceLine" id="cb2-9" title="9"><span class="co">##  Min.   : 0.8973   Min.   :-179.99808   Min.   :-0.4733610  </span></a>
- <a class="sourceLine" id="cb2-10" title="10"><span class="co">##  1st Qu.:22.0063   1st Qu.: -90.00066   1st Qu.: 0.0000000  </span></a>
- <a class="sourceLine" id="cb2-11" title="11"><span class="co">##  Median :43.1154   Median :  -0.00323   Median : 0.0000000  </span></a>
- <a class="sourceLine" id="cb2-12" title="12"><span class="co">##  Mean   :43.1154   Mean   :  -0.00323   Mean   : 0.0002756  </span></a>
- <a class="sourceLine" id="cb2-13" title="13"><span class="co">##  3rd Qu.:64.2245   3rd Qu.:  89.99419   3rd Qu.: 0.0000000  </span></a>
- <a class="sourceLine" id="cb2-14" title="14"><span class="co">##  Max.   :85.3335   Max.   : 179.99161   Max.   : 0.6314569</span></a></code></pre></div>
+ <a class="sourceLine" id="cb2-7" title="7">tornado</a>
+ <a class="sourceLine" id="cb2-8" title="8"><span class="co">## # A tibble: 30,000 x 3</span></a>
+ <a class="sourceLine" id="cb2-9" title="9"><span class="co">##      lat   lon trend</span></a>
+ <a class="sourceLine" id="cb2-10" title="10"><span class="co">##    &lt;dbl&gt; &lt;dbl&gt; &lt;dbl&gt;</span></a>
+ <a class="sourceLine" id="cb2-11" title="11"><span class="co">##  1 0.897 -180.     0</span></a>
+ <a class="sourceLine" id="cb2-12" title="12"><span class="co">##  2 0.897 -179.     0</span></a>
+ <a class="sourceLine" id="cb2-13" title="13"><span class="co">##  3 0.897 -178.     0</span></a>
+ <a class="sourceLine" id="cb2-14" title="14"><span class="co">##  4 0.897 -176.     0</span></a>
+ <a class="sourceLine" id="cb2-15" title="15"><span class="co">##  5 0.897 -175.     0</span></a>
+ <a class="sourceLine" id="cb2-16" title="16"><span class="co">##  6 0.897 -174.     0</span></a>
+ <a class="sourceLine" id="cb2-17" title="17"><span class="co">##  7 0.897 -173.     0</span></a>
+ <a class="sourceLine" id="cb2-18" title="18"><span class="co">##  8 0.897 -172.     0</span></a>
+ <a class="sourceLine" id="cb2-19" title="19"><span class="co">##  9 0.897 -170.     0</span></a>
+ <a class="sourceLine" id="cb2-20" title="20"><span class="co">## 10 0.897 -169.     0</span></a>
+ <a class="sourceLine" id="cb2-21" title="21"><span class="co">## # … with 29,990 more rows</span></a>
+ <a class="sourceLine" id="cb2-22" title="22"></a>
+ <a class="sourceLine" id="cb2-23" title="23"><span class="kw">summary</span>(tornado)</a>
+ <a class="sourceLine" id="cb2-24" title="24"><span class="co">##       lat               lon                 trend           </span></a>
+ <a class="sourceLine" id="cb2-25" title="25"><span class="co">##  Min.   : 0.8973   Min.   :-179.99808   Min.   :-0.4733610  </span></a>
+ <a class="sourceLine" id="cb2-26" title="26"><span class="co">##  1st Qu.:22.0063   1st Qu.: -90.00066   1st Qu.: 0.0000000  </span></a>
+ <a class="sourceLine" id="cb2-27" title="27"><span class="co">##  Median :43.1154   Median :  -0.00323   Median : 0.0000000  </span></a>
+ <a class="sourceLine" id="cb2-28" title="28"><span class="co">##  Mean   :43.1154   Mean   :  -0.00323   Mean   : 0.0002756  </span></a>
+ <a class="sourceLine" id="cb2-29" title="29"><span class="co">##  3rd Qu.:64.2245   3rd Qu.:  89.99419   3rd Qu.: 0.0000000  </span></a>
+ <a class="sourceLine" id="cb2-30" title="30"><span class="co">##  Max.   :85.3335   Max.   : 179.99161   Max.   : 0.6314569</span></a></code></pre></div>
  <p>Grid overview</p>
  <div class="sourceCode" id="cb3"><pre class="sourceCode r"><code class="sourceCode r"><a class="sourceLine" id="cb3-1" title="1"><span class="kw">ggplot</span>(tornado, <span class="kw">aes</span>(lon, lat)) <span class="op">+</span></a>
  <a class="sourceLine" id="cb3-2" title="2"><span class="st">  </span><span class="kw">geom_point</span>(<span class="kw">aes</span>(<span class="dt">color =</span> trend))</a></code></pre></div>


@@ 466,7 482,7 @@ <a class="sourceLine" id="cb5-9" title="9"><span class="kw">filter</span>(</a>
  <a class="sourceLine" id="cb5-10" title="10">  tornado,</a>
  <a class="sourceLine" id="cb5-11" title="11">  <span class="kw">between</span>(lon, <span class="dv">-107</span>, xlim[<span class="dv">2</span>]), <span class="kw">between</span>(lat, ylim[<span class="dv">1</span>], ylim[<span class="dv">2</span>]), <span class="co"># -107 gets us ~left-edge of TX</span></a>
- <a class="sourceLine" id="cb5-12" title="12">  ((trend <span class="op">&lt;</span><span class="st"> </span><span class="fl">-0.07</span>) <span class="op">|</span><span class="st"> </span>(trend <span class="op">&gt;</span><span class="st"> </span><span class="fl">0.07</span>)) <span class="co">#</span></a>
+ <a class="sourceLine" id="cb5-12" title="12">  ((trend <span class="op">&lt;</span><span class="st"> </span><span class="fl">-0.07</span>) <span class="op">|</span><span class="st"> </span>(trend <span class="op">&gt;</span><span class="st"> </span><span class="fl">0.07</span>)) <span class="co"># approximates notebook selection range</span></a>
  <a class="sourceLine" id="cb5-13" title="13">) -&gt;<span class="st"> </span>tornado</a></code></pre></div>
  <p>Grid overview #2</p>
  <div class="sourceCode" id="cb6"><pre class="sourceCode r"><code class="sourceCode r"><a class="sourceLine" id="cb6-1" title="1"><span class="kw">ggplot</span>(tornado, <span class="kw">aes</span>(lon, lat)) <span class="op">+</span></a>

M tornado.md => tornado.md +17 -1
@@ 23,6 23,22 @@ trend = scan(here::here("data/trends.txt"))
  ) -> tornado
  
+ tornado
+ ## # A tibble: 30,000 x 3
+ ##      lat   lon trend
+ ##    <dbl> <dbl> <dbl>
+ ##  1 0.897 -180.     0
+ ##  2 0.897 -179.     0
+ ##  3 0.897 -178.     0
+ ##  4 0.897 -176.     0
+ ##  5 0.897 -175.     0
+ ##  6 0.897 -174.     0
+ ##  7 0.897 -173.     0
+ ##  8 0.897 -172.     0
+ ##  9 0.897 -170.     0
+ ## 10 0.897 -169.     0
+ ## # … with 29,990 more rows
+ 
  summary(tornado)
  ##       lat               lon                 trend           
  ##  Min.   : 0.8973   Min.   :-179.99808   Min.   :-0.4733610  


@@ 66,7 82,7 @@ filter(
    tornado,
    between(lon, -107, xlim[2]), between(lat, ylim[1], ylim[2]), # -107 gets us ~left-edge of TX
-   ((trend < -0.07) | (trend > 0.07)) #
+   ((trend < -0.07) | (trend > 0.07)) # approximates notebook selection range
  ) -> tornado
  ```
  

A tornado_files/figure-html/map-final-1.png => tornado_files/figure-html/map-final-1.png +0 -0