[R/addAQILegend.R:21:1:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addAQILegend.R#L21) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/addAQILegend.R:22:12:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addAQILegend.R#L22) *style:* **Put spaces around all infix operators.**
```r
  legend( x=x, y=y, col=col, legend=legend, pch=pch, title=title, ... )
          ~^~
```
[R/addAQILegend.R:22:17:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addAQILegend.R#L22) *style:* **Put spaces around all infix operators.**
```r
  legend( x=x, y=y, col=col, legend=legend, pch=pch, title=title, ... )
               ~^~
```
[R/addAQILegend.R:22:24:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addAQILegend.R#L22) *style:* **Put spaces around all infix operators.**
```r
  legend( x=x, y=y, col=col, legend=legend, pch=pch, title=title, ... )
                      ~^~
```
[R/addAQILegend.R:22:36:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addAQILegend.R#L22) *style:* **Put spaces around all infix operators.**
```r
  legend( x=x, y=y, col=col, legend=legend, pch=pch, title=title, ... )
                                  ~^~
```
[R/addAQILegend.R:22:48:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addAQILegend.R#L22) *style:* **Put spaces around all infix operators.**
```r
  legend( x=x, y=y, col=col, legend=legend, pch=pch, title=title, ... )
                                              ~^~
```
[R/addAQILegend.R:22:59:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addAQILegend.R#L22) *style:* **Put spaces around all infix operators.**
```r
  legend( x=x, y=y, col=col, legend=legend, pch=pch, title=title, ... )
                                                         ~^~
```
[R/addAQILegend.R:23:1:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addAQILegend.R#L23) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/addAQILines.R:10:1:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addAQILines.R#L10) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/addAQILines.R:11:21:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addAQILines.R#L11) *style:* **Put spaces around all infix operators.**
```r
  graphics::abline(h=AQI$breaks_24, col=AQI$colors, ...)
                   ~^~
```
[R/addAQILines.R:11:40:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addAQILines.R#L11) *style:* **Put spaces around all infix operators.**
```r
  graphics::abline(h=AQI$breaks_24, col=AQI$colors, ...)
                                      ~^~
```
[R/addAQILines.R:12:1:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addAQILines.R#L12) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/addAQIStackedBar.R:19:16:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addAQIStackedBar.R#L19) *style:* **Put spaces around all infix operators.**
```r
    l <- usr[2]-width*(usr[2]-usr[1])
              ~^~
```
[R/addAQIStackedBar.R:19:22:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addAQIStackedBar.R#L19) *style:* **Put spaces around all infix operators.**
```r
    l <- usr[2]-width*(usr[2]-usr[1])
                    ~^~
```
[R/addAQIStackedBar.R:19:23:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addAQIStackedBar.R#L19) *style:* **Place a space before left parenthesis, except in a function call.**
```r
    l <- usr[2]-width*(usr[2]-usr[1])
                      ^
```
[R/addAQIStackedBar.R:19:30:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addAQIStackedBar.R#L19) *style:* **Put spaces around all infix operators.**
```r
    l <- usr[2]-width*(usr[2]-usr[1])
                            ~^~
```
[R/addAQIStackedBar.R:23:16:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addAQIStackedBar.R#L23) *style:* **Put spaces around all infix operators.**
```r
    r <- usr[1]+width*(usr[2]-usr[1])
              ~^~
```
[R/addAQIStackedBar.R:23:22:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addAQIStackedBar.R#L23) *style:* **Put spaces around all infix operators.**
```r
    r <- usr[1]+width*(usr[2]-usr[1])
                    ~^~
```
[R/addAQIStackedBar.R:23:23:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addAQIStackedBar.R#L23) *style:* **Place a space before left parenthesis, except in a function call.**
```r
    r <- usr[1]+width*(usr[2]-usr[1])
                      ^
```
[R/addAQIStackedBar.R:23:30:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addAQIStackedBar.R#L23) *style:* **Put spaces around all infix operators.**
```r
    r <- usr[1]+width*(usr[2]-usr[1])
                            ~^~
```
[R/addAQIStackedBar.R:28:20:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addAQIStackedBar.R#L28) *style:* **Commas should always have a space after.**
```r
         min(max(0,AQI$breaks_24[i]), height*usr[4]),
                   ^
```
[R/addAQIStackedBar.R:28:45:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addAQIStackedBar.R#L28) *style:* **Put spaces around all infix operators.**
```r
         min(max(0,AQI$breaks_24[i]), height*usr[4]),
                                           ~^~
```
[R/addAQIStackedBar.R:30:29:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addAQIStackedBar.R#L30) *style:* **Put spaces around all infix operators.**
```r
         min(AQI$breaks_24[i+1], height*usr[4]),
                           ~^~
```
[R/addAQIStackedBar.R:30:40:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addAQIStackedBar.R#L30) *style:* **Put spaces around all infix operators.**
```r
         min(AQI$breaks_24[i+1], height*usr[4]),
                                      ~^~
```
[R/addBullseye.R:25:63:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addBullseye.R#L25) *style:* **Put spaces around all infix operators.**
```r
    RgoogleMaps::PlotOnStaticMap(map, latitude, longitude, add=TRUE, cex=cex, lwd=lwd, col='black')
                                                             ~^~
```
[R/addBullseye.R:25:73:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addBullseye.R#L25) *style:* **Put spaces around all infix operators.**
```r
    RgoogleMaps::PlotOnStaticMap(map, latitude, longitude, add=TRUE, cex=cex, lwd=lwd, col='black')
                                                                       ~^~
```
[R/addBullseye.R:25:82:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addBullseye.R#L25) *style:* **Put spaces around all infix operators.**
```r
    RgoogleMaps::PlotOnStaticMap(map, latitude, longitude, add=TRUE, cex=cex, lwd=lwd, col='black')
                                                                                ~^~
```
[R/addBullseye.R:25:91:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addBullseye.R#L25) *style:* **Put spaces around all infix operators.**
```r
    RgoogleMaps::PlotOnStaticMap(map, latitude, longitude, add=TRUE, cex=cex, lwd=lwd, col='black')
                                                                                ~^~
```
[R/addBullseye.R:25:92:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addBullseye.R#L25) *style:* **Only use double-quotes.**
```r
    RgoogleMaps::PlotOnStaticMap(map, latitude, longitude, add=TRUE, cex=cex, lwd=lwd, col='black')
                                                                                ^~~~~~~
```
[R/addBullseye.R:26:1:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addBullseye.R#L26) *style:* **Lines should not be more than 100 characters.**
```r
    RgoogleMaps::PlotOnStaticMap(map, latitude, longitude, add=TRUE, cex=cex*0.75, lwd=lwd, col='white')
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/addBullseye.R:26:63:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addBullseye.R#L26) *style:* **Put spaces around all infix operators.**
```r
    RgoogleMaps::PlotOnStaticMap(map, latitude, longitude, add=TRUE, cex=cex*0.75, lwd=lwd, col='white')
                                                             ~^~
```
[R/addBullseye.R:26:73:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addBullseye.R#L26) *style:* **Put spaces around all infix operators.**
```r
    RgoogleMaps::PlotOnStaticMap(map, latitude, longitude, add=TRUE, cex=cex*0.75, lwd=lwd, col='white')
                                                                       ~^~
```
[R/addBullseye.R:26:77:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addBullseye.R#L26) *style:* **Put spaces around all infix operators.**
```r
    RgoogleMaps::PlotOnStaticMap(map, latitude, longitude, add=TRUE, cex=cex*0.75, lwd=lwd, col='white')
                                                                           ~^~
```
[R/addBullseye.R:26:87:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addBullseye.R#L26) *style:* **Put spaces around all infix operators.**
```r
    RgoogleMaps::PlotOnStaticMap(map, latitude, longitude, add=TRUE, cex=cex*0.75, lwd=lwd, col='white')
                                                                                ~^~
```
[R/addBullseye.R:26:96:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addBullseye.R#L26) *style:* **Put spaces around all infix operators.**
```r
    RgoogleMaps::PlotOnStaticMap(map, latitude, longitude, add=TRUE, cex=cex*0.75, lwd=lwd, col='white')
                                                                                ~^~
```
[R/addBullseye.R:26:97:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addBullseye.R#L26) *style:* **Only use double-quotes.**
```r
    RgoogleMaps::PlotOnStaticMap(map, latitude, longitude, add=TRUE, cex=cex*0.75, lwd=lwd, col='white')
                                                                                ^~~~~~~
```
[R/addBullseye.R:27:1:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addBullseye.R#L27) *style:* **Lines should not be more than 100 characters.**
```r
    RgoogleMaps::PlotOnStaticMap(map, latitude, longitude, add=TRUE, cex=cex*0.5, lwd=lwd, col='black')
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/addBullseye.R:27:63:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addBullseye.R#L27) *style:* **Put spaces around all infix operators.**
```r
    RgoogleMaps::PlotOnStaticMap(map, latitude, longitude, add=TRUE, cex=cex*0.5, lwd=lwd, col='black')
                                                             ~^~
```
[R/addBullseye.R:27:73:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addBullseye.R#L27) *style:* **Put spaces around all infix operators.**
```r
    RgoogleMaps::PlotOnStaticMap(map, latitude, longitude, add=TRUE, cex=cex*0.5, lwd=lwd, col='black')
                                                                       ~^~
```
[R/addBullseye.R:27:77:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addBullseye.R#L27) *style:* **Put spaces around all infix operators.**
```r
    RgoogleMaps::PlotOnStaticMap(map, latitude, longitude, add=TRUE, cex=cex*0.5, lwd=lwd, col='black')
                                                                           ~^~
```
[R/addBullseye.R:27:86:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addBullseye.R#L27) *style:* **Put spaces around all infix operators.**
```r
    RgoogleMaps::PlotOnStaticMap(map, latitude, longitude, add=TRUE, cex=cex*0.5, lwd=lwd, col='black')
                                                                                ~^~
```
[R/addBullseye.R:27:95:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addBullseye.R#L27) *style:* **Put spaces around all infix operators.**
```r
    RgoogleMaps::PlotOnStaticMap(map, latitude, longitude, add=TRUE, cex=cex*0.5, lwd=lwd, col='black')
                                                                                ~^~
```
[R/addBullseye.R:27:96:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addBullseye.R#L27) *style:* **Only use double-quotes.**
```r
    RgoogleMaps::PlotOnStaticMap(map, latitude, longitude, add=TRUE, cex=cex*0.5, lwd=lwd, col='black')
                                                                                ^~~~~~~
```
[R/addBullseye.R:31:36:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addBullseye.R#L31) *style:* **Put spaces around all infix operators.**
```r
    points(longitude, latitude, pch=1, cex=cex, lwd=lwd, col='black')
                                  ~^~
```
[R/addBullseye.R:31:43:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addBullseye.R#L31) *style:* **Put spaces around all infix operators.**
```r
    points(longitude, latitude, pch=1, cex=cex, lwd=lwd, col='black')
                                         ~^~
```
[R/addBullseye.R:31:52:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addBullseye.R#L31) *style:* **Put spaces around all infix operators.**
```r
    points(longitude, latitude, pch=1, cex=cex, lwd=lwd, col='black')
                                                  ~^~
```
[R/addBullseye.R:31:61:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addBullseye.R#L31) *style:* **Put spaces around all infix operators.**
```r
    points(longitude, latitude, pch=1, cex=cex, lwd=lwd, col='black')
                                                           ~^~
```
[R/addBullseye.R:31:62:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addBullseye.R#L31) *style:* **Only use double-quotes.**
```r
    points(longitude, latitude, pch=1, cex=cex, lwd=lwd, col='black')
                                                             ^~~~~~~
```
[R/addBullseye.R:32:36:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addBullseye.R#L32) *style:* **Put spaces around all infix operators.**
```r
    points(longitude, latitude, pch=1, cex=cex*0.75, lwd=lwd, col='white')
                                  ~^~
```
[R/addBullseye.R:32:43:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addBullseye.R#L32) *style:* **Put spaces around all infix operators.**
```r
    points(longitude, latitude, pch=1, cex=cex*0.75, lwd=lwd, col='white')
                                         ~^~
```
[R/addBullseye.R:32:47:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addBullseye.R#L32) *style:* **Put spaces around all infix operators.**
```r
    points(longitude, latitude, pch=1, cex=cex*0.75, lwd=lwd, col='white')
                                             ~^~
```
[R/addBullseye.R:32:57:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addBullseye.R#L32) *style:* **Put spaces around all infix operators.**
```r
    points(longitude, latitude, pch=1, cex=cex*0.75, lwd=lwd, col='white')
                                                       ~^~
```
[R/addBullseye.R:32:66:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addBullseye.R#L32) *style:* **Put spaces around all infix operators.**
```r
    points(longitude, latitude, pch=1, cex=cex*0.75, lwd=lwd, col='white')
                                                                ~^~
```
[R/addBullseye.R:32:67:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addBullseye.R#L32) *style:* **Only use double-quotes.**
```r
    points(longitude, latitude, pch=1, cex=cex*0.75, lwd=lwd, col='white')
                                                                  ^~~~~~~
```
[R/addBullseye.R:33:36:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addBullseye.R#L33) *style:* **Put spaces around all infix operators.**
```r
    points(longitude, latitude, pch=1, cex=cex*0.5, lwd=lwd, col='black')
                                  ~^~
```
[R/addBullseye.R:33:43:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addBullseye.R#L33) *style:* **Put spaces around all infix operators.**
```r
    points(longitude, latitude, pch=1, cex=cex*0.5, lwd=lwd, col='black')
                                         ~^~
```
[R/addBullseye.R:33:47:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addBullseye.R#L33) *style:* **Put spaces around all infix operators.**
```r
    points(longitude, latitude, pch=1, cex=cex*0.5, lwd=lwd, col='black')
                                             ~^~
```
[R/addBullseye.R:33:56:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addBullseye.R#L33) *style:* **Put spaces around all infix operators.**
```r
    points(longitude, latitude, pch=1, cex=cex*0.5, lwd=lwd, col='black')
                                                      ~^~
```
[R/addBullseye.R:33:65:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addBullseye.R#L33) *style:* **Put spaces around all infix operators.**
```r
    points(longitude, latitude, pch=1, cex=cex*0.5, lwd=lwd, col='black')
                                                               ~^~
```
[R/addBullseye.R:33:66:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addBullseye.R#L33) *style:* **Only use double-quotes.**
```r
    points(longitude, latitude, pch=1, cex=cex*0.5, lwd=lwd, col='black')
                                                                 ^~~~~~~
```
[R/addBullseye.R:38:1:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addBullseye.R#L38) *style:* **Trailing blank lines are superfluous.**
```r

^
```
[R/addClustering.R:31:1:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L31) *style:* **Lines should not be more than 100 characters.**
```r
    logger.error("No lonVar='%s' column found in 'tbl' tibble with columns: %s", lonVar, paste0(names(tbl), collapse=", "))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/addClustering.R:31:117:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L31) *style:* **Put spaces around all infix operators.**
```r
    logger.error("No lonVar='%s' column found in 'tbl' tibble with columns: %s", lonVar, paste0(names(tbl), collapse=", "))
                                                                                ~^~
```
[R/addClustering.R:35:1:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L35) *style:* **Lines should not be more than 100 characters.**
```r
    logger.error("No latVar='%s' column found in 'tbl' tibble with columns: %s", latVar, paste0(names(tbl), collapse=", "))
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/addClustering.R:35:117:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L35) *style:* **Put spaces around all infix operators.**
```r
    logger.error("No latVar='%s' column found in 'tbl' tibble with columns: %s", latVar, paste0(names(tbl), collapse=", "))
                                                                                ~^~
```
[R/addClustering.R:43:46:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L43) *style:* **Commas should always have a space after.**
```r
    lonString <- format( round(tbl$medoidLon,3), nsmall=3 ) # 3 decimal places
                                             ^
```
[R/addClustering.R:43:56:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L43) *style:* **Put spaces around all infix operators.**
```r
    lonString <- format( round(tbl$medoidLon,3), nsmall=3 ) # 3 decimal places
                                                      ~^~
```
[R/addClustering.R:44:46:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L44) *style:* **Commas should always have a space after.**
```r
    latString <- format( round(tbl$medoidLat,3), nsmall=3 ) # 3 decimal places
                                             ^
```
[R/addClustering.R:44:56:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L44) *style:* **Put spaces around all infix operators.**
```r
    latString <- format( round(tbl$medoidLat,3), nsmall=3 ) # 3 decimal places
                                                      ~^~
```
[R/addClustering.R:45:31:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L45) *style:* **Only use double-quotes.**
```r
    locationString <- paste0( 'lon_', lonString, '_lat_', latString )
                              ^~~~~~
```
[R/addClustering.R:45:50:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L45) *style:* **Only use double-quotes.**
```r
    locationString <- paste0( 'lon_', lonString, '_lat_', latString )
                                                 ^~~~~~~
```
[R/addClustering.R:54:44:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L54) *style:* **Commas should always have a space after.**
```r
    badLocationRows <- tbl[badLocationMask,]
                                           ^
```
[R/addClustering.R:55:33:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L55) *style:* **Commas should always have a space after.**
```r
    tbl <- tbl[!badLocationMask,]
                                ^
```
[R/addClustering.R:70:5:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L70) *style:* **Commented code should be removed.**
```r
  # NOTE:    x <- y <- c(rep(0,3),rep(1,3),rep(10,20),rep(11,20),rep(100,50),rep(101,50))
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/addClustering.R:71:5:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L71) *style:* **Commented code should be removed.**
```r
  # NOTE:    m <- cbind(x,y)
    ^~~~~~~~~~~~~~~~~~~~~~~~
```
[R/addClustering.R:72:5:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L72) *style:* **Commented code should be removed.**
```r
  # NOTE:    layout(matrix(seq(2)))
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/addClustering.R:73:5:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L73) *style:* **Commented code should be removed.**
```r
  # NOTE:    plot(x, y, pch=as.character( stats::kmeans(m,3)$cluster ))
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/addClustering.R:74:5:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L74) *style:* **Commented code should be removed.**
```r
  # NOTE:    plot(x, y, pch=as.character( cluster::pam(m,3)$cluster ))
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/addClustering.R:75:5:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L75) *style:* **Commented code should be removed.**
```r
  # NOTE:    plot(x, y, pch=as.character( cluster::clara(m,3)$cluster ))
    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/addClustering.R:92:39:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L92) *style:* **Commas should always have a space after.**
```r
      clusterObj <- cluster::pam(tbl[,c(lonVar,latVar)],clusterCount)
                                      ^
```
[R/addClustering.R:92:48:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L92) *style:* **Commas should always have a space after.**
```r
      clusterObj <- cluster::pam(tbl[,c(lonVar,latVar)],clusterCount)
                                               ^
```
[R/addClustering.R:92:57:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L92) *style:* **Commas should always have a space after.**
```r
      clusterObj <- cluster::pam(tbl[,c(lonVar,latVar)],clusterCount)
                                                        ^
```
[R/addClustering.R:95:41:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L95) *style:* **Commas should always have a space after.**
```r
      clusterObj <- cluster::clara(tbl[,c(lonVar,latVar)],clusterCount, samples=50)
                                        ^
```
[R/addClustering.R:95:50:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L95) *style:* **Commas should always have a space after.**
```r
      clusterObj <- cluster::clara(tbl[,c(lonVar,latVar)],clusterCount, samples=50)
                                                 ^
```
[R/addClustering.R:95:59:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L95) *style:* **Commas should always have a space after.**
```r
      clusterObj <- cluster::clara(tbl[,c(lonVar,latVar)],clusterCount, samples=50)
                                                          ^
```
[R/addClustering.R:95:80:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L95) *style:* **Put spaces around all infix operators.**
```r
      clusterObj <- cluster::clara(tbl[,c(lonVar,latVar)],clusterCount, samples=50)
                                                                              ~^~
```
[R/addClustering.R:97:39:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L97) *style:* **Commas should always have a space after.**
```r
    medoidLats <- clusterObj$medoids[,latVar]
                                      ^
```
[R/addClustering.R:98:43:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L98) *style:* **Commas should always have a space after.**
```r
    diameters <- 2 * clusterObj$clusinfo[,'max_diss'] # decimal degrees
                                          ^
```
[R/addClustering.R:98:43:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L98) *style:* **Only use double-quotes.**
```r
    diameters <- 2 * clusterObj$clusinfo[,'max_diss'] # decimal degrees
                                          ^~~~~~~~~~
```
[R/addClustering.R:102:40:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L102) *style:* **Put spaces around all infix operators.**
```r
    radianMedoidLats <- medoidLats * pi/180
                                      ~^~
```
[R/addClustering.R:103:54:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L103) *style:* **Put spaces around all infix operators.**
```r
    meters <- diameters * (1 + cos(radianMedoidLats))/2 * 111320
                                                    ~^~
```
[R/addClustering.R:111:37:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L111) *style:* **Commas should always have a space after.**
```r
    clusterObj <- cluster::pam(tbl[,c(lonVar,latVar)],clusterCount)
                                    ^
```
[R/addClustering.R:111:46:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L111) *style:* **Commas should always have a space after.**
```r
    clusterObj <- cluster::pam(tbl[,c(lonVar,latVar)],clusterCount)
                                             ^
```
[R/addClustering.R:111:55:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L111) *style:* **Commas should always have a space after.**
```r
    clusterObj <- cluster::pam(tbl[,c(lonVar,latVar)],clusterCount)
                                                      ^
```
[R/addClustering.R:113:39:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L113) *style:* **Commas should always have a space after.**
```r
    clusterObj <- cluster::clara(tbl[,c(lonVar,latVar)],clusterCount, samples=50)
                                      ^
```
[R/addClustering.R:113:48:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L113) *style:* **Commas should always have a space after.**
```r
    clusterObj <- cluster::clara(tbl[,c(lonVar,latVar)],clusterCount, samples=50)
                                               ^
```
[R/addClustering.R:113:57:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L113) *style:* **Commas should always have a space after.**
```r
    clusterObj <- cluster::clara(tbl[,c(lonVar,latVar)],clusterCount, samples=50)
                                                        ^
```
[R/addClustering.R:113:78:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L113) *style:* **Put spaces around all infix operators.**
```r
    clusterObj <- cluster::clara(tbl[,c(lonVar,latVar)],clusterCount, samples=50)
                                                                            ~^~
```
[R/addClustering.R:117:40:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L117) *style:* **Commas should always have a space after.**
```r
  tbl$medoidLon <- clusterObj$medoids[,lonVar][clusterObj$clustering]
                                       ^
```
[R/addClustering.R:118:40:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L118) *style:* **Commas should always have a space after.**
```r
  tbl$medoidLat <- clusterObj$medoids[,latVar][clusterObj$clustering]
                                       ^
```
[R/addClustering.R:125:44:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L125) *style:* **Commas should always have a space after.**
```r
  lonString <- format( round(tbl$medoidLon,3), nsmall=3 ) # 3 decimal places
                                           ^
```
[R/addClustering.R:125:54:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L125) *style:* **Put spaces around all infix operators.**
```r
  lonString <- format( round(tbl$medoidLon,3), nsmall=3 ) # 3 decimal places
                                                    ~^~
```
[R/addClustering.R:126:44:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L126) *style:* **Commas should always have a space after.**
```r
  latString <- format( round(tbl$medoidLat,3), nsmall=3 ) # 3 decimal places
                                           ^
```
[R/addClustering.R:126:54:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L126) *style:* **Put spaces around all infix operators.**
```r
  latString <- format( round(tbl$medoidLat,3), nsmall=3 ) # 3 decimal places
                                                    ~^~
```
[R/addClustering.R:127:29:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L127) *style:* **Only use double-quotes.**
```r
  locationString <- paste0( 'lon_', lonString, '_lat_', latString )
                            ^~~~~~
```
[R/addClustering.R:127:48:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L127) *style:* **Only use double-quotes.**
```r
  locationString <- paste0( 'lon_', lonString, '_lat_', latString )
                                               ^~~~~~~
```
[R/addClustering.R:139:35:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addClustering.R#L139) *style:* **Commas should always have a space after.**
```r
      tbl <- tbl[order(tbl$rowID),]
                                  ^
```
[R/addEsriAddress.R:26:43:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addEsriAddress.R#L26) *style:* **Put spaces around all infix operators.**
```r
  df <- as.data.frame(df, stringsAsFactors=FALSE)
                                         ~^~
```
[R/addEsriAddress.R:32:63:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addEsriAddress.R#L32) *style:* **Commas should always have a space after.**
```r
    stop(paste0("Dataframe does not contain columns lonVar='",lonVar,"' or latVar='",latVar,"'"))
                                                              ^
```
[R/addEsriAddress.R:32:70:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addEsriAddress.R#L32) *style:* **Commas should always have a space after.**
```r
    stop(paste0("Dataframe does not contain columns lonVar='",lonVar,"' or latVar='",latVar,"'"))
                                                                     ^
```
[R/addEsriAddress.R:32:86:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addEsriAddress.R#L32) *style:* **Commas should always have a space after.**
```r
    stop(paste0("Dataframe does not contain columns lonVar='",lonVar,"' or latVar='",latVar,"'"))
                                                                                ^
```
[R/addEsriAddress.R:32:93:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addEsriAddress.R#L32) *style:* **Commas should always have a space after.**
```r
    stop(paste0("Dataframe does not contain columns lonVar='",lonVar,"' or latVar='",latVar,"'"))
                                                                                ^
```
[R/addEsriAddress.R:43:1:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addEsriAddress.R#L43) *style:* **Lines should not be more than 100 characters.**
```r
  # NOTE:    https://geocode.arcgis.com/arcgis/rest/services/World/GeocodeServer/reverseGeocode?outSR=4326&returnIntersection=false&location=-121.06092453002931%2C47.255990221115475&f=json
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/addEsriAddress.R:91:23:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addEsriAddress.R#L91) *style:* **Commas should always have a space after.**
```r
    monitorID <- df[i,'monitorID']
                      ^
```
[R/addEsriAddress.R:91:23:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addEsriAddress.R#L91) *style:* **Only use double-quotes.**
```r
    monitorID <- df[i,'monitorID']
                      ^~~~~~~~~~~
```
[R/addEsriAddress.R:94:1:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addEsriAddress.R#L94) *style:* **Lines should not be more than 100 characters.**
```r
        if ( !is.na(existingMeta[monitorID,'siteName']) && existingMeta[monitorID,'siteName'] != "" ) {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/addEsriAddress.R:94:44:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addEsriAddress.R#L94) *style:* **Commas should always have a space after.**
```r
        if ( !is.na(existingMeta[monitorID,'siteName']) && existingMeta[monitorID,'siteName'] != "" ) {
                                           ^
```
[R/addEsriAddress.R:94:44:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addEsriAddress.R#L94) *style:* **Only use double-quotes.**
```r
        if ( !is.na(existingMeta[monitorID,'siteName']) && existingMeta[monitorID,'siteName'] != "" ) {
                                           ^~~~~~~~~~
```
[R/addEsriAddress.R:94:83:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addEsriAddress.R#L94) *style:* **Commas should always have a space after.**
```r
        if ( !is.na(existingMeta[monitorID,'siteName']) && existingMeta[monitorID,'siteName'] != "" ) {
                                                                                ^
```
[R/addEsriAddress.R:94:83:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addEsriAddress.R#L94) *style:* **Only use double-quotes.**
```r
        if ( !is.na(existingMeta[monitorID,'siteName']) && existingMeta[monitorID,'siteName'] != "" ) {
                                                                                ^~~~~~~~~~
```
[R/addEsriAddress.R:104:48:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addEsriAddress.R#L104) *style:* **Commas should always have a space after.**
```r
      df$siteName[i] <- existingMeta[monitorID,'siteName']
                                               ^
```
[R/addEsriAddress.R:104:48:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addEsriAddress.R#L104) *style:* **Only use double-quotes.**
```r
      df$siteName[i] <- existingMeta[monitorID,'siteName']
                                               ^~~~~~~~~~
```
[R/addEsriAddress.R:105:51:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addEsriAddress.R#L105) *style:* **Only use double-quotes.**
```r
      df$countyName[i] <- existingMeta[monitorID, 'countyName']
                                                  ^~~~~~~~~~~~
```
[R/addEsriAddress.R:110:26:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addEsriAddress.R#L110) *style:* **Commas should always have a space after.**
```r
      location <- c(df[i,lonVar],df[i,latVar])
                         ^
```
[R/addEsriAddress.R:110:34:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addEsriAddress.R#L110) *style:* **Commas should always have a space after.**
```r
      location <- c(df[i,lonVar],df[i,latVar])
                                 ^
```
[R/addEsriAddress.R:110:39:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addEsriAddress.R#L110) *style:* **Commas should always have a space after.**
```r
      location <- c(df[i,lonVar],df[i,latVar])
                                      ^
```
[R/addEsriAddress.R:116:1:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addEsriAddress.R#L116) *style:* **Lines should not be more than 100 characters.**
```r
          urlBase <- "https://geocode.arcgis.com/arcgis/rest/services/World/GeocodeServer/reverseGeocode?"
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/addEsriAddress.R:117:42:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addEsriAddress.R#L117) *style:* **Commas should always have a space after.**
```r
          location <- paste0("location=",paste0(location[1],",",location[2]),"&")
                                         ^
```
[R/addEsriAddress.R:117:61:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addEsriAddress.R#L117) *style:* **Commas should always have a space after.**
```r
          location <- paste0("location=",paste0(location[1],",",location[2]),"&")
                                                            ^
```
[R/addEsriAddress.R:117:65:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addEsriAddress.R#L117) *style:* **Commas should always have a space after.**
```r
          location <- paste0("location=",paste0(location[1],",",location[2]),"&")
                                                                ^
```
[R/addEsriAddress.R:117:78:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addEsriAddress.R#L117) *style:* **Commas should always have a space after.**
```r
          location <- paste0("location=",paste0(location[1],",",location[2]),"&")
                                                                             ^
```
[R/addEsriAddress.R:143:63:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addEsriAddress.R#L143) *style:* **Commas should always have a space after.**
```r
              df$siteName[i] <- paste0(returnObj$address$City,"-",returnObj$address$Address)
                                                              ^
```
[R/addEsriAddress.R:143:67:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addEsriAddress.R#L143) *style:* **Commas should always have a space after.**
```r
              df$siteName[i] <- paste0(returnObj$address$City,"-",returnObj$address$Address)
                                                                  ^
```
[R/addEsriAddress.R:153:82:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addEsriAddress.R#L153) *style:* **Commas should always have a space after.**
```r
            df$countyName[i] <- stringr::str_replace(returnObj$address$Subregion,' County','')
                                                                                ^
```
[R/addEsriAddress.R:153:82:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addEsriAddress.R#L153) *style:* **Only use double-quotes.**
```r
            df$countyName[i] <- stringr::str_replace(returnObj$address$Subregion,' County','')
                                                                                ^~~~~~~~~
```
[R/addEsriAddress.R:153:92:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addEsriAddress.R#L153) *style:* **Commas should always have a space after.**
```r
            df$countyName[i] <- stringr::str_replace(returnObj$address$Subregion,' County','')
                                                                                ^
```
[R/addEsriAddress.R:153:92:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addEsriAddress.R#L153) *style:* **Only use double-quotes.**
```r
            df$countyName[i] <- stringr::str_replace(returnObj$address$Subregion,' County','')
                                                                                ^~
```
[R/addEsriAddress.R:156:18:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addEsriAddress.R#L156) *style:* **Put spaces around all infix operators.**
```r
        }, silent=TRUE)
                ~^~
```
[R/addGoogleAddress.R:20:6:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L20) *style:* **Commented code should be removed.**
```r
  ###logger.trace(" ----- addGoogleAddress() ----- ")
     ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/addGoogleAddress.R:22:1:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L22) *style:* **Lines should not be more than 100 characters.**
```r
  message("addGoogleAddress() is currently disabled after discontinuation of free querys in July, 2018")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/addGoogleAddress.R:25:43:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L25) *style:* **Put spaces around all infix operators.**
```r
  df <- as.data.frame(df, stringsAsFactors=FALSE)
                                         ~^~
```
[R/addGoogleAddress.R:31:63:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L31) *style:* **Commas should always have a space after.**
```r
    stop(paste0("Dataframe does not contain columns lonVar='",lonVar,"' or latVar='",latVar,"'"))
                                                              ^
```
[R/addGoogleAddress.R:31:70:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L31) *style:* **Commas should always have a space after.**
```r
    stop(paste0("Dataframe does not contain columns lonVar='",lonVar,"' or latVar='",latVar,"'"))
                                                                     ^
```
[R/addGoogleAddress.R:31:86:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L31) *style:* **Commas should always have a space after.**
```r
    stop(paste0("Dataframe does not contain columns lonVar='",lonVar,"' or latVar='",latVar,"'"))
                                                                                ^
```
[R/addGoogleAddress.R:31:93:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L31) *style:* **Commas should always have a space after.**
```r
    stop(paste0("Dataframe does not contain columns lonVar='",lonVar,"' or latVar='",latVar,"'"))
                                                                                ^
```
[R/addGoogleAddress.R:38:3:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L38) *warning:* **local variable ‘lons’ assigned but may not be used**
```r
  lons <- df[[lonVar]]
  ^~~~
```
[R/addGoogleAddress.R:39:3:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L39) *warning:* **local variable ‘lats’ assigned but may not be used**
```r
  lats <- df[[latVar]]
  ^~~~
```
[R/addGoogleAddress.R:49:7:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L49) *style:* **Only use double-quotes.**
```r
  if ('ggmap' %in% installed.packages()[,1]) {
      ^~~~~~~
```
[R/addGoogleAddress.R:49:42:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L49) *style:* **Commas should always have a space after.**
```r
  if ('ggmap' %in% installed.packages()[,1]) {
                                         ^
```
[R/addGoogleAddress.R:60:25:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L60) *style:* **Commas should always have a space after.**
```r
      monitorID <- df[i,'monitorID']
                        ^
```
[R/addGoogleAddress.R:60:25:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L60) *style:* **Only use double-quotes.**
```r
      monitorID <- df[i,'monitorID']
                        ^~~~~~~~~~~
```
[R/addGoogleAddress.R:63:1:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L63) *style:* **Lines should not be more than 100 characters.**
```r
          if ( !is.na(existingMeta[monitorID,'siteName']) && existingMeta[monitorID,'siteName'] != "" ) {
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/addGoogleAddress.R:63:46:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L63) *style:* **Commas should always have a space after.**
```r
          if ( !is.na(existingMeta[monitorID,'siteName']) && existingMeta[monitorID,'siteName'] != "" ) {
                                             ^
```
[R/addGoogleAddress.R:63:46:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L63) *style:* **Only use double-quotes.**
```r
          if ( !is.na(existingMeta[monitorID,'siteName']) && existingMeta[monitorID,'siteName'] != "" ) {
                                             ^~~~~~~~~~
```
[R/addGoogleAddress.R:63:85:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L63) *style:* **Commas should always have a space after.**
```r
          if ( !is.na(existingMeta[monitorID,'siteName']) && existingMeta[monitorID,'siteName'] != "" ) {
                                                                                ^
```
[R/addGoogleAddress.R:63:85:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L63) *style:* **Only use double-quotes.**
```r
          if ( !is.na(existingMeta[monitorID,'siteName']) && existingMeta[monitorID,'siteName'] != "" ) {
                                                                                ^~~~~~~~~~
```
[R/addGoogleAddress.R:73:50:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L73) *style:* **Commas should always have a space after.**
```r
        df$siteName[i] <- existingMeta[monitorID,'siteName']
                                                 ^
```
[R/addGoogleAddress.R:73:50:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L73) *style:* **Only use double-quotes.**
```r
        df$siteName[i] <- existingMeta[monitorID,'siteName']
                                                 ^~~~~~~~~~
```
[R/addGoogleAddress.R:74:53:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L74) *style:* **Only use double-quotes.**
```r
        df$countyName[i] <- existingMeta[monitorID, 'countyName']
                                                    ^~~~~~~~~~~~
```
[R/addGoogleAddress.R:79:28:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L79) *style:* **Commas should always have a space after.**
```r
        location <- c(df[i,lonVar],df[i,latVar])
                           ^
```
[R/addGoogleAddress.R:79:36:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L79) *style:* **Commas should always have a space after.**
```r
        location <- c(df[i,lonVar],df[i,latVar])
                                   ^
```
[R/addGoogleAddress.R:79:41:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L79) *style:* **Commas should always have a space after.**
```r
        location <- c(df[i,lonVar],df[i,latVar])
                                        ^
```
[R/addGoogleAddress.R:82:74:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L82) *style:* **Put spaces around all infix operators.**
```r
          address <- suppressMessages( ggmap::revgeocode(location, output='more') )
                                                                        ~^~
```
[R/addGoogleAddress.R:82:75:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L82) *style:* **Only use double-quotes.**
```r
          address <- suppressMessages( ggmap::revgeocode(location, output='more') )
                                                                          ^~~~~~
```
[R/addGoogleAddress.R:84:67:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L84) *style:* **Commas should always have a space after.**
```r
          result <- try( df$siteName[i] <- paste(address$locality,address$route,sep='-'),
                                                                  ^
```
[R/addGoogleAddress.R:84:81:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L84) *style:* **Commas should always have a space after.**
```r
          result <- try( df$siteName[i] <- paste(address$locality,address$route,sep='-'),
                                                                                ^
```
[R/addGoogleAddress.R:84:84:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L84) *style:* **Put spaces around all infix operators.**
```r
          result <- try( df$siteName[i] <- paste(address$locality,address$route,sep='-'),
                                                                                ~^~
```
[R/addGoogleAddress.R:84:85:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L84) *style:* **Only use double-quotes.**
```r
          result <- try( df$siteName[i] <- paste(address$locality,address$route,sep='-'),
                                                                                ^~~
```
[R/addGoogleAddress.R:85:32:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L85) *style:* **Put spaces around all infix operators.**
```r
                         silent=TRUE ) # don't show errors
                              ~^~
```
[R/addGoogleAddress.R:87:1:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L87) *style:* **Lines should not be more than 100 characters.**
```r
            logger.warn("Google geocoding may have failed. Have you gone over the 2.5K/day limit? (2017)")
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/addGoogleAddress.R:90:1:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L90) *style:* **Lines should not be more than 100 characters.**
```r
          try( df$countyName[i] <- stringr::str_replace(address$administrative_area_level_2,' County',''),
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/addGoogleAddress.R:90:93:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L90) *style:* **Commas should always have a space after.**
```r
          try( df$countyName[i] <- stringr::str_replace(address$administrative_area_level_2,' County',''),
                                                                                ^
```
[R/addGoogleAddress.R:90:93:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L90) *style:* **Only use double-quotes.**
```r
          try( df$countyName[i] <- stringr::str_replace(address$administrative_area_level_2,' County',''),
                                                                                ^~~~~~~~~
```
[R/addGoogleAddress.R:90:103:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L90) *style:* **Commas should always have a space after.**
```r
          try( df$countyName[i] <- stringr::str_replace(address$administrative_area_level_2,' County',''),
                                                                                ^
```
[R/addGoogleAddress.R:90:103:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L90) *style:* **Only use double-quotes.**
```r
          try( df$countyName[i] <- stringr::str_replace(address$administrative_area_level_2,' County',''),
                                                                                ^~
```
[R/addGoogleAddress.R:91:22:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleAddress.R#L91) *style:* **Put spaces around all infix operators.**
```r
               silent=TRUE ) # don't show errors
                    ~^~
```
[R/addGoogleElevation.R:17:1:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleElevation.R#L17) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/addGoogleElevation.R:19:1:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleElevation.R#L19) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/addGoogleElevation.R:21:43:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleElevation.R#L21) *style:* **Put spaces around all infix operators.**
```r
  df <- as.data.frame(df, stringsAsFactors=FALSE)
                                         ~^~
```
[R/addGoogleElevation.R:22:1:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleElevation.R#L22) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/addGoogleElevation.R:27:63:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleElevation.R#L27) *style:* **Commas should always have a space after.**
```r
    stop(paste0("Dataframe does not contain columns lonVar='",lonVar,"' or latVar='",latVar,"'"))
                                                              ^
```
[R/addGoogleElevation.R:27:70:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleElevation.R#L27) *style:* **Commas should always have a space after.**
```r
    stop(paste0("Dataframe does not contain columns lonVar='",lonVar,"' or latVar='",latVar,"'"))
                                                                     ^
```
[R/addGoogleElevation.R:27:86:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleElevation.R#L27) *style:* **Commas should always have a space after.**
```r
    stop(paste0("Dataframe does not contain columns lonVar='",lonVar,"' or latVar='",latVar,"'"))
                                                                                ^
```
[R/addGoogleElevation.R:27:93:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleElevation.R#L27) *style:* **Commas should always have a space after.**
```r
    stop(paste0("Dataframe does not contain columns lonVar='",lonVar,"' or latVar='",latVar,"'"))
                                                                                ^
```
[R/addGoogleElevation.R:29:1:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleElevation.R#L29) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/addGoogleElevation.R:32:1:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleElevation.R#L32) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/addGoogleElevation.R:34:1:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleElevation.R#L34) *style:* **Trailing whitespace is superfluous.**
```r

^~
```
[R/addGoogleElevation.R:36:1:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleElevation.R#L36) *style:* **Trailing whitespace is superfluous.**
```r

^~~~
```
[R/addGoogleElevation.R:37:1:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleElevation.R#L37) *style:* **Lines should not be more than 100 characters.**
```r
    # NOTE:  If existingMeta is passed in, assume we are in an operational environment where we want to minimize web service calls.
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/addGoogleElevation.R:40:1:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleElevation.R#L40) *style:* **Trailing whitespace is superfluous.**
```r

^~~~
```
[R/addGoogleElevation.R:42:32:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleElevation.R#L42) *style:* **Commas should always have a space after.**
```r
      monitorID <- amendedDF[i,'monitorID']
                               ^
```
[R/addGoogleElevation.R:42:32:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleElevation.R#L42) *style:* **Only use double-quotes.**
```r
      monitorID <- amendedDF[i,'monitorID']
                               ^~~~~~~~~~~
```
[R/addGoogleElevation.R:44:1:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleElevation.R#L44) *style:* **Lines should not be more than 100 characters.**
```r
        amendedDF$elevation[i] <- round(existingMeta[monitorID,'elevation'], 0) # round to whole meters
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
```
[R/addGoogleElevation.R:44:64:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleElevation.R#L44) *style:* **Commas should always have a space after.**
```r
        amendedDF$elevation[i] <- round(existingMeta[monitorID,'elevation'], 0) # round to whole meters
                                                               ^
```
[R/addGoogleElevation.R:44:64:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleElevation.R#L44) *style:* **Only use double-quotes.**
```r
        amendedDF$elevation[i] <- round(existingMeta[monitorID,'elevation'], 0) # round to whole meters
                                                               ^~~~~~~~~~~
```
[R/addGoogleElevation.R:49:1:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleElevation.R#L49) *style:* **Trailing whitespace is superfluous.**
```r

^~~~
```
[R/addGoogleElevation.R:51:1:](https://github.com/MazamaScience/PWFSLSmoke/blob/0a4965dd6cded302a7edd574737f8807b30a102b/R/addGoogleElevation.R#L51) *style:* **Trailing whitespace is superfluous.**
```r

^~~~
```


I asked this in a comment in the PR - please let's change all code paths to do this.


Bug is must likely here because `$HashRates` is an array:
`[Int64]$HashRates`

Not sure of the correct implementation, please check.


Gg


Ha, no, I just dared to use the '@' symbol in a commit message. The dangers of over automation. Sorry about that.

We use 'gn' as an abbreviation for goingnowhere, our domain.


You could just match againt the `Var` instead of introducing a new helper function which exactly does that.


nice

does this means it's ready for publishing?

I somewhat think the missions thing should be on by default, as it most helps those who are more forgetful and might not check the settings first. Plus, it'd help introduce people get the feature.


# Specs execution successful
:scroll: [View logs](http://bamboo.comnull)
### Plans updated

Bamboo specs have been successfully imported and the following plans have been updated.

Project | Plan | Build
---|---|---
[Test](http://bamboo.com/browse/TEST) | [Comment test](http://bamboo.com/browse/TEST-CTEST)  | :white_check_mark: [\#1](http://bamboo.com/browse/TEST-CTEST-1)
[New project](http://bamboo.com/browse/NEW) | [Disabled plan](http://bamboo.com/browse/NEW-DISABLED) **disabled** | :white_check_mark: [\#1](http://bamboo.com/browse/NEW-DISABLED-1)

### Deployments updated

Bamboo specs have been successfully imported and the following deployment projects have been updated.

|Deployment project |
----|
[Deployment test](http://bamboo.com/deploy/viewDeploymentProjectVersions.action?id=2162689)|


This seems a bit odd and may be highlighting a problem somewhere else.

`ActiveMiners` is and array of `Miner` objects.

Probably should check why enforcing what should already be the case is causing problems.


Privacy Gods bless you


Successfully aliased the URL <https://percy-isomorphic-slwfbontsw.now.sh> to the following alias.

* https://percy-isomorphic.now.sh


The robot will coast. The robot may stop powering the motors when within 1 degree of the target but it will continue to move anyways. I strongly encourage you to look at the code examples on the CTRE documentation and code examples to figure out how to use PID control to turn the robot.


Right, like are applause and laughter correlated with negative or positive analyses? Like so much of this, you'd probably learn more about the tools than the texts in so doing. That actually wouldn't even be terribly complicated to implement... Adding it to the issues board as a possible feature!


MakeSetupOutputVarsRecurse (Myoldmopar) - i386-Windows-7-VisualStudio-14: OK (3076 of 3076 tests passed, 0 test warnings)

![Build Badge](http://img.shields.io/badge/build%20status-passing-green.png) ![Test Badge](http://img.shields.io/badge/tests%20passed-100.0%25-green.png)


Copy of this build can be found at
https://www.mewbuilds.com/build/7eec9c1797ab05b691a03943b0047aff08863ea8/index.html
                       https://www.cloudflare-ipfs.com/ipfs/QmZm6r4CAMENSyqJe8SQAkRX5K2oCJ4xVYWLAjnpG4vhxi


Copy of this build can be found at
https://www.mewbuilds.com/build/91c031b9c7c8fc5bc41f01434ae4cf905e91148b/index.html
                       https://www.cloudflare-ipfs.com/ipfs/QmetiVG8UgWL9d6Hug9zZjccBNwUezKvUgpZbaLTgobUwq


@takiz
Nice addition! Thanks...


`Failed` should end the service as there is no way of knowing that stopping mining will work.

`Default` already ends the service so this should be reverted.


Successfully aliased the URL <https://labs9-wedding-site-qd0yp3ckw.now.sh> to the following alias.

* https://vbeloved.now.sh


Aliasing failed with the following error:

~~~
Error! Invalid alias. Please confirm that the alias you provided is a valid hostname. Note: Nested domains are not supported.
~~~


Change it back


Not sure how this got committed.?!??!


To źle wklejałem do AdGuarda?


MakeSetupOutputVarsRecurse (Myoldmopar) - x86_64-Linux-Ubuntu-18.04-gcc-7.3-UnitTestsCoverage-Debug: OK (1808 of 1808 tests passed, 0 test warnings)

![Build Badge](http://img.shields.io/badge/build%20status-passing-green.png) ![Test Badge](http://img.shields.io/badge/tests%20passed-100.0%25-green.png) ![Coverage Badge](http://img.shields.io/badge/coverage%20status-41.6%25-green.png)


This commit allows for people to subscribe to channels using React Hooks


add-fmt-library (jasondegraw) - x86_64-MacOS-10.13-clang: OK (3075 of 3075 tests passed, 633 test warnings)

Messages:

 * 633 tests had: EIO diffs.

![Build Badge](http://img.shields.io/badge/build%20status-passing-green.png) ![Test Badge](http://img.shields.io/badge/tests%20passed-100.0%25-green.png)


@Myoldmopar this breaks unit tests because these aren't deallocated in a `clear_state` call.


Successfully aliased the URL <https://percy-isomorphic-sfzrvmiaut.now.sh> to the following alias.

* https://percy-isomorphic.now.sh


Awesome work! I have noticed a slight issue however: using my rips, the last track on a disc ends early (see the intro to King of Fighters '97 for an in-game example). BIN/CUE rips (done by either ISOBuster or Imgburn) end earlier than CCD rips by CloneCD, but both types of rip end early. I've tested the images and the complete audio is present in them.

There's something else I've noticed, though I'm not sure if it's connected to this or not: the clock in the emulated CDZ's CD player is running fast. When I tested the final track of KoF '97 I noticed that by the time the track abruptly stopped (at 53 on the counter), the CD player's counter was over 10 seconds ahead of the actual position in the track when played back through the Foobar2000 or VLC. I can't test an actual CDZ, but the time displayed by my Neo CD was pretty accurate to the actual position.


Not convinced this is genuine, probably hacked to 50Hz from the previous 4.2 dump.


Right, I didn't think about that it would also need to include the default graph. But if you had a call to
`$model->holds($algebra, $default_graphs)`, then it could be routed to `$model->algebra_holds($algebra, $default_graphs)`?

Perhaps it is not worth it, after all the caller will always know if they are calling it with an algebra, and performance is important.


I was wondering what the reasoning was behind the decision to "Turn on MKL-DNN contraction kernels by default."?
x86_64 is only one of many platforms that TensorFlow runs on and now all those require this option now to be disabled.
As can be seen by fixes now required to achieve successful builds on Arm and every other system that isn't x86_64.
Thanks.


merge


Successfully aliased the URL <https://pclassicorg-mocztmesn.now.sh> to the following aliases.

* https://pclassic.org
* https://www.pclassic.org


Now could not deploy this pull request since it contains the following references to invalid secrets in the `env` sections of the `now.json` file:

* `stripe-secret-key` (in env: `STRIPE_SECRET_KEY)`
* `hasura-access-key` (in env: `X_HASURA_ACCESS_KEY)`
* `sendgrid-username` (in env: `SENDGRID_USERNAME)`
* `sendgrid-password` (in env: `SENDGRID_PASSWORD)`
* `token-secret` (in env: `TOKEN_SECRET)`

Add those secrets or remove them from the `env` maps in the `now.json` file.


Successfully aliased the URL <https://labs9-wedding-site-3bdv8dr67.now.sh> to the following alias.

* https://vbeloved.now.sh


'image' and 'label' should be called 'ei' and 'cell_type' perhaps?


- This code works well only because there is no real (async) job
```js
Promise.map(
  ["first", "second", "third", "fourth", "fifth"],
  (item, index, length) => console.log(item, index, length),
  { concurrency: 1 }
);
/*
  first 0 5
  second 1 5
  third 2 5
  fourth 3 5
  fifth 4 5
*/
```
- However, if you add some async tasks, .map will interact items using the wrong direction
```js
Promise.map(
  ["first", "second", "third", "fourth", "fifth"],
  (item, index, length) => {
    console.log(item, index, length);
    return new Promise(resolve => setTimeout(resolve, 100));
  },
  { concurrency: 1 }
);
/*
  first 0 5
  fifth 4 5
  fourth 3 5
  third 2 5
  second 1 5
*/
```

Related issue https://github.com/petkaantonov/bluebird/issues/1579


Collaborator: Review for this commit was created. [Link to review](/ui#review:id=16)


Collaborator: Review for this commit was created. [Link to review](/ui#review:id=17)


remove comment with absolute path like this. Maybe make a test script to run the code? The test code can have paths like this perhaps?


I moved it to #8. There's nothing wrong with it, it had been merged into master and we had to get a critical bug fix out in v3.8.2. To keep from breaking version history, i reverted it and then cherry-picked it into a new branch. This particular commit now corresponds with https://github.com/mystyle-platform/mystyle-wp-custom-product-designer/pull/8/commits/685c36fd96f13780b411ec59dfd97617deb5bce6


@wbinnssmith 😭


itag is instruction tag.  It's unrelated to address, just used to track dynamic instructions for debugging


Collaborator: Review for this commit was created. [Link to review](/ui#review:id=40)


Collaborator: Review for this commit was created. [Link to review](/ui#review:id=41)


yeah, the be_pkg includes these in the right order


Using as reference [Medium article]( https://medium.com/@xoor/coding-a-graphql-api-with-node-js-c02d617f49f4) and [update](https://dev.to/gloriamaris/apollo-server-express-10-to-20-fix-graphiqlexpress-and-graphiqlexpress-is-not-a-function-in-a-tutorial-by-xoor-41jn) for fixes needed from version 1.0 to 2.0


The following doc(s) have been deployed to the [sparklingro](https://sparklingro-static-docs.pantheonsite.io/docs) Multidev environment:
- [/docs/debug-connections](https://sparklingro-static-docs.pantheonsite.io/docs/debug-connections)
- [/docs/guides/drupal-8-commerce-no-ci](https://4153drupal-static-docs.pantheonsite.io/docs/guides/drupal-8-commerce-no-ci)


Looks good.


I believe R# settings need to be updated somewhere.
@AndriySvyryd


second commit


Successfully aliased the URL <https://pclassicorg-mmj1bxp81.now.sh> to the following aliases.

* https://pclassic.org
* https://www.pclassic.org


It’s a pain.


## Jenkins Build Summary

Built from [this commit](https://github.com/mellery451/rippled/commit/cd75f58cdd20c06f2858c61e1524fa8b4b69a526)

Built at __20190207 - 00:50:37__

### Test Results

Build Type | Log | Result | Status
---------- | --- | ------ | ------
rpm | [logfile](http://ci.ops.ripple.com/job/mellery-rippled/job/pkg-containers/124//artifact/rpm.txt) | 1145 cases, 0 failed, t: n/a | PASS :white_check_mark:
msvc.Debug | [logfile](http://ci.ops.ripple.com/job/mellery-rippled/job/pkg-containers/124//artifact/msvc.Debug.txt) | 1142 cases, 0 failed, t: 631s | PASS :white_check_mark:
gcc.Release
-Dassert=ON,
MANUAL_TESTS=true | [logfile](http://ci.ops.ripple.com/job/mellery-rippled/job/pkg-containers/124//artifact/gcc.Release_Dassert_ON_MANUAL_TESTS_true.txt) | 915 cases, 0 failed, t: 6m7s | PASS :white_check_mark:
docs,
TARGET=docs | [logfile](http://ci.ops.ripple.com/job/mellery-rippled/job/pkg-containers/124//artifact/docs_TARGET_docs.txt) | 1 cases, 0 failed, t: 0m1s | PASS :white_check_mark:
clang.Debug | [logfile](http://ci.ops.ripple.com/job/mellery-rippled/job/pkg-containers/124//artifact/clang.Debug.txt) | 1145 cases, 0 failed, t: 3m11s | PASS :white_check_mark:
gcc.Debug
-Dcoverage=ON,
TARGET=coverage_report,
SKIP_TESTS=true | [logfile](http://ci.ops.ripple.com/job/mellery-rippled/job/pkg-containers/124//artifact/gcc.Debug_Dcoverage_ON_TARGET_coverage_report_SKIP_TESTS_true.txt) | 1145 cases, 0 failed, t: 17m20s | PASS :white_check_mark:
msvc.Debug,
NINJA_BUILD=true | [logfile](http://ci.ops.ripple.com/job/mellery-rippled/job/pkg-containers/124//artifact/msvc.Debug_NINJA_BUILD_true.txt) | 1142 cases, 0 failed, t: 642s | PASS :white_check_mark:
clang.Debug
-Dunity=OFF | [logfile](http://ci.ops.ripple.com/job/mellery-rippled/job/pkg-containers/124//artifact/clang.Debug_Dunity_OFF.txt) | 1145 cases, 0 failed, t: 2m34s | PASS :white_check_mark:
gcc.Debug | [logfile](http://ci.ops.ripple.com/job/mellery-rippled/job/pkg-containers/124//artifact/gcc.Debug.txt) | 1145 cases, 0 failed, t: 3m28s | PASS :white_check_mark:
clang.Release
-Dassert=ON | [logfile](http://ci.ops.ripple.com/job/mellery-rippled/job/pkg-containers/124//artifact/clang.Release_Dassert_ON.txt) | 1145 cases, 0 failed, t: 5m40s | PASS :white_check_mark:
gcc.Debug
-Dunity=OFF | [logfile](http://ci.ops.ripple.com/job/mellery-rippled/job/pkg-containers/124//artifact/gcc.Debug_Dunity_OFF.txt) | 1145 cases, 0 failed, t: 6m15s | PASS :white_check_mark:
gcc.Debug
-Dstatic=OFF | [logfile](http://ci.ops.ripple.com/job/mellery-rippled/job/pkg-containers/124//artifact/gcc.Debug_Dstatic_OFF.txt) | 1145 cases, 0 failed, t: 3m26s | PASS :white_check_mark:
gcc.Release
-Dassert=ON | [logfile](http://ci.ops.ripple.com/job/mellery-rippled/job/pkg-containers/124//artifact/gcc.Release_Dassert_ON.txt) | 1145 cases, 0 failed, t: 6m8s | PASS :white_check_mark:
msvc.Debug
-Dunity=OFF | [logfile](http://ci.ops.ripple.com/job/mellery-rippled/job/pkg-containers/124//artifact/msvc.Debug_Dunity_OFF.txt) | 1142 cases, 0 failed, t: 1286s | PASS :white_check_mark:
gcc.Debug
-Dstatic=OFF -DBUILD_SHARED_LIBS=ON | [logfile](http://ci.ops.ripple.com/job/mellery-rippled/job/pkg-containers/124//artifact/gcc.Debug_Dstatic_OFF_DBUILD_SHARED_LIBS_ON.txt) | 1145 cases, 0 failed, t: 3m27s | PASS :white_check_mark:
gcc.Debug,
NINJA_BUILD=true | [logfile](http://ci.ops.ripple.com/job/mellery-rippled/job/pkg-containers/124//artifact/gcc.Debug_NINJA_BUILD_true.txt) | 1145 cases, 0 failed, t: 3m3s | PASS :white_check_mark:
msvc.Release | [logfile](http://ci.ops.ripple.com/job/mellery-rippled/job/pkg-containers/124//artifact/msvc.Release.txt) | 1142 cases, 0 failed, t: 420s | PASS :white_check_mark:
clang.Debug
-Dunity=OFF -Dsan=undefined,
PARALLEL_TESTS=false | [logfile](http://ci.ops.ripple.com/job/mellery-rippled/job/pkg-containers/124//artifact/clang.Debug_Dunity_OFF_Dsan_undefined_PARALLEL_TESTS_false.txt) | 1145 cases, 0 failed, t: 2m21s | PASS :white_check_mark:
clang.Debug
-Dunity=OFF -Dsan=address,
PARALLEL_TESTS=false,
DEBUGGER=false | [logfile](http://ci.ops.ripple.com/job/mellery-rippled/job/pkg-containers/124//artifact/clang.Debug_Dunity_OFF_Dsan_address_PARALLEL_TESTS_false_DEBUGGER_false.txt) | 1145 cases, 0 failed, t: 5m54s | PASS :white_check_mark:


Hello @chriskohlhoff I was wondering what the reasoning behind this is?

What would I need to do to use hardware flow control? Everything that I need is defined under _BSD_SOURCE, but I don't think that enabling that flag is a good idea and might bring conciquences.

Thank you, -Jordan Heath


I think you forgot to compare your values. Assertion