Secret tRacks

name: title
class: left bottom hide-count

<link href="https://netdna.bootstrapcdn.com/font-awesome/4.0.3/css/font-awesome.css" rel="stylesheet">
  <div class="fixedContainer">
    <div class="cassette-top">
      <div class="cassette-inner-1">
         <ul class="rainbow-strips">
            <li class="purple">
            </li>
            <li class="red">
            </li>
             <li class="orange">
           </li>
           <li class="green">
           </li>
          </ul>
        <div class="cassette-inner-2">
          <div class="wheel-left">
            <div class="wheel-inner">
              <i class="fa fa-cog fa-spin"></i>
            </div>
          </div>
          <div class="center-box">
          </div>
          <div class="wheel-right">
            <div class="wheel-inner">
              <i class="fa fa-cog fa-spin"></i>
            </div>
          </div>
        </div>
      </div>
    </div>
    <div class="cassette-bottom">
    </div>
  </div>

R packages/functions you didn't know you were waiting for
]

.talk-author[
Travis Gerke, ScD<br>
.moffitt-gray[.small[.blue-medium[Moffitt Cancer Center ].blue[ :: ].blue-light[Health Informatics]]]
]

.talk-date.moffitt-gray[
April 16, 2021
]
]

---
### Why this talk?

> I believe every time I am in meeting with Travis, he mentions R packages to analyze & visualize data, create fancy presentations, etc.  In other words, Travis knows R packages for everything.

.right[.small[&#x2014; Rodrigo Carvajal]]

---
### Why this talk?

> I believe every time I am in meeting with Travis, he mentions R packages to analyze & visualize data, create fancy presentations, etc.  <strike>In other words, Travis knows R packages for everything.</strike>

.right[.small[&#x2014; Rodrigo Carvajal]]

<br>

> I believe every time I am in meeting with Travis, he mentions R packages to analyze & visualize data, create fancy presentations, etc.  .red[In other words, Travis spends too much time on Twitter.]

.right[.small[&#x2014; Me]]

---
### Follow these resources!

.pull-left[

- [@icymi_r](https://twitter.com/icymi_r)
  - R posts you might have missed!
  - Searchable history [here](https://alastairrushworth.github.io/searchable/searchable.html)
  
- [@dataandme](https://twitter.com/dataandme)  
  - The OG "in case you missed it" of R Twitter

- [&#35;TidyTuesday](https://twitter.com/search?q=%23TidyTuesday)
  - [@thomas_mock](https://twitter.com/thomas_mock) to participate

- [@grrrck](https://twitter.com/grrrck/) needs no introduction

]

.pull-right[

.position-top[
![](images/tidytuesday.png)
]

]

---
class: inverse, center

<br><br>
<span style="font-size:1.35em">And now</span><br>
<span style="font-size:3em">in no particular order</span><br>
<span style="font-size:1.23em">are a bunch of</span><br>
<span style="font-size:5em; font-family: Mansalva">secret tRacks</span>

<br><br>
.small.red[The slides do not contain full demos: feel free to interrupt for clarification.]

---
### Let [`pak` <svg viewBox="0 0 512 512" style="position:relative;display:inline-block;top:.1em;fill:#FE6B00;height:0.5em;margin-bottom:8px;" xmlns="http://www.w3.org/2000/svg">  <path d="M326.612 185.391c59.747 59.809 58.927 155.698.36 214.59-.11.12-.24.25-.36.37l-67.2 67.2c-59.27 59.27-155.699 59.262-214.96 0-59.27-59.26-59.27-155.7 0-214.96l37.106-37.106c9.84-9.84 26.786-3.3 27.294 10.606.648 17.722 3.826 35.527 9.69 52.721 1.986 5.822.567 12.262-3.783 16.612l-13.087 13.087c-28.026 28.026-28.905 73.66-1.155 101.96 28.024 28.579 74.086 28.749 102.325.51l67.2-67.19c28.191-28.191 28.073-73.757 0-101.83-3.701-3.694-7.429-6.564-10.341-8.569a16.037 16.037 0 0 1-6.947-12.606c-.396-10.567 3.348-21.456 11.698-29.806l21.054-21.055c5.521-5.521 14.182-6.199 20.584-1.731a152.482 152.482 0 0 1 20.522 17.197zM467.547 44.449c-59.261-59.262-155.69-59.27-214.96 0l-67.2 67.2c-.12.12-.25.25-.36.37-58.566 58.892-59.387 154.781.36 214.59a152.454 152.454 0 0 0 20.521 17.196c6.402 4.468 15.064 3.789 20.584-1.731l21.054-21.055c8.35-8.35 12.094-19.239 11.698-29.806a16.037 16.037 0 0 0-6.947-12.606c-2.912-2.005-6.64-4.875-10.341-8.569-28.073-28.073-28.191-73.639 0-101.83l67.2-67.19c28.239-28.239 74.3-28.069 102.325.51 27.75 28.3 26.872 73.934-1.155 101.96l-13.087 13.087c-4.35 4.35-5.769 10.79-3.783 16.612 5.864 17.194 9.042 34.999 9.69 52.721.509 13.906 17.454 20.446 27.294 10.606l37.106-37.106c59.271-59.259 59.271-155.699.001-214.959z"></path></svg>](https://pak.r-lib.org/) install your packages

It's faster and more convenient (e.g. for BioC / GitHub) than `devtools`, `remotes`, and `install.packages`

.w-50.h-center[
![](images/pak.svg)
]

---
### [`asciicast` <svg viewBox="0 0 512 512" style="position:relative;display:inline-block;top:.1em;fill:#FE6B00;height:0.5em;margin-bottom:8px;" xmlns="http://www.w3.org/2000/svg">  <path d="M326.612 185.391c59.747 59.809 58.927 155.698.36 214.59-.11.12-.24.25-.36.37l-67.2 67.2c-59.27 59.27-155.699 59.262-214.96 0-59.27-59.26-59.27-155.7 0-214.96l37.106-37.106c9.84-9.84 26.786-3.3 27.294 10.606.648 17.722 3.826 35.527 9.69 52.721 1.986 5.822.567 12.262-3.783 16.612l-13.087 13.087c-28.026 28.026-28.905 73.66-1.155 101.96 28.024 28.579 74.086 28.749 102.325.51l67.2-67.19c28.191-28.191 28.073-73.757 0-101.83-3.701-3.694-7.429-6.564-10.341-8.569a16.037 16.037 0 0 1-6.947-12.606c-.396-10.567 3.348-21.456 11.698-29.806l21.054-21.055c5.521-5.521 14.182-6.199 20.584-1.731a152.482 152.482 0 0 1 20.522 17.197zM467.547 44.449c-59.261-59.262-155.69-59.27-214.96 0l-67.2 67.2c-.12.12-.25.25-.36.37-58.566 58.892-59.387 154.781.36 214.59a152.454 152.454 0 0 0 20.521 17.196c6.402 4.468 15.064 3.789 20.584-1.731l21.054-21.055c8.35-8.35 12.094-19.239 11.698-29.806a16.037 16.037 0 0 0-6.947-12.606c-2.912-2.005-6.64-4.875-10.341-8.569-28.073-28.073-28.191-73.639 0-101.83l67.2-67.19c28.239-28.239 74.3-28.069 102.325.51 27.75 28.3 26.872 73.934-1.155 101.96l-13.087 13.087c-4.35 4.35-5.769 10.79-3.783 16.612 5.864 17.194 9.042 34.999 9.69 52.721.509 13.906 17.454 20.446 27.294 10.606l37.106-37.106c59.271-59.259 59.271-155.699.001-214.959z"></path></svg>](https://github.com/r-lib/asciicast) will make animated `.svg` &#x1F92F;

- Works for recording R console input/output
  - Way more lightweight than `.gif` or `.mov` formats
  - See [`images/make-star-wars-svg.R`](images/make-star-wars-svg.R) in [this repo](https://github.com/tgerke/secret-tracks) for the below

.w-50.h-center[
![](images/starwars.svg)
]

---
### Find html/unicode for emojis with [`ermoji` <svg viewBox="0 0 512 512" style="position:relative;display:inline-block;top:.1em;fill:#FE6B00;height:0.5em;margin-bottom:8px;" xmlns="http://www.w3.org/2000/svg">  <path d="M326.612 185.391c59.747 59.809 58.927 155.698.36 214.59-.11.12-.24.25-.36.37l-67.2 67.2c-59.27 59.27-155.699 59.262-214.96 0-59.27-59.26-59.27-155.7 0-214.96l37.106-37.106c9.84-9.84 26.786-3.3 27.294 10.606.648 17.722 3.826 35.527 9.69 52.721 1.986 5.822.567 12.262-3.783 16.612l-13.087 13.087c-28.026 28.026-28.905 73.66-1.155 101.96 28.024 28.579 74.086 28.749 102.325.51l67.2-67.19c28.191-28.191 28.073-73.757 0-101.83-3.701-3.694-7.429-6.564-10.341-8.569a16.037 16.037 0 0 1-6.947-12.606c-.396-10.567 3.348-21.456 11.698-29.806l21.054-21.055c5.521-5.521 14.182-6.199 20.584-1.731a152.482 152.482 0 0 1 20.522 17.197zM467.547 44.449c-59.261-59.262-155.69-59.27-214.96 0l-67.2 67.2c-.12.12-.25.25-.36.37-58.566 58.892-59.387 154.781.36 214.59a152.454 152.454 0 0 0 20.521 17.196c6.402 4.468 15.064 3.789 20.584-1.731l21.054-21.055c8.35-8.35 12.094-19.239 11.698-29.806a16.037 16.037 0 0 0-6.947-12.606c-2.912-2.005-6.64-4.875-10.341-8.569-28.073-28.073-28.191-73.639 0-101.83l67.2-67.19c28.239-28.239 74.3-28.069 102.325.51 27.75 28.3 26.872 73.934-1.155 101.96l-13.087 13.087c-4.35 4.35-5.769 10.79-3.783 16.612 5.864 17.194 9.042 34.999 9.69 52.721.509 13.906 17.454 20.446 27.294 10.606l37.106-37.106c59.271-59.259 59.271-155.699.001-214.959z"></path></svg>](https://github.com/gadenbuie/ermoji)

.pull-left[
.h-center[
![](images/ermoji-1.png)
]
]
.pull-right[
.h-center[
![](images/ermoji-2.png)
]
]

---
### Use web icons with [`icons` <svg viewBox="0 0 512 512" style="position:relative;display:inline-block;top:.1em;fill:#FE6B00;height:0.5em;margin-bottom:8px;" xmlns="http://www.w3.org/2000/svg">  <path d="M326.612 185.391c59.747 59.809 58.927 155.698.36 214.59-.11.12-.24.25-.36.37l-67.2 67.2c-59.27 59.27-155.699 59.262-214.96 0-59.27-59.26-59.27-155.7 0-214.96l37.106-37.106c9.84-9.84 26.786-3.3 27.294 10.606.648 17.722 3.826 35.527 9.69 52.721 1.986 5.822.567 12.262-3.783 16.612l-13.087 13.087c-28.026 28.026-28.905 73.66-1.155 101.96 28.024 28.579 74.086 28.749 102.325.51l67.2-67.19c28.191-28.191 28.073-73.757 0-101.83-3.701-3.694-7.429-6.564-10.341-8.569a16.037 16.037 0 0 1-6.947-12.606c-.396-10.567 3.348-21.456 11.698-29.806l21.054-21.055c5.521-5.521 14.182-6.199 20.584-1.731a152.482 152.482 0 0 1 20.522 17.197zM467.547 44.449c-59.261-59.262-155.69-59.27-214.96 0l-67.2 67.2c-.12.12-.25.25-.36.37-58.566 58.892-59.387 154.781.36 214.59a152.454 152.454 0 0 0 20.521 17.196c6.402 4.468 15.064 3.789 20.584-1.731l21.054-21.055c8.35-8.35 12.094-19.239 11.698-29.806a16.037 16.037 0 0 0-6.947-12.606c-2.912-2.005-6.64-4.875-10.341-8.569-28.073-28.073-28.191-73.639 0-101.83l67.2-67.19c28.239-28.239 74.3-28.069 102.325.51 27.75 28.3 26.872 73.934-1.155 101.96l-13.087 13.087c-4.35 4.35-5.769 10.79-3.783 16.612 5.864 17.194 9.042 34.999 9.69 52.721.509 13.906 17.454 20.446 27.294 10.606l37.106-37.106c59.271-59.259 59.271-155.699.001-214.959z"></path></svg>](https://pkg.mitchelloharawild.com/icons/) &#x1F448;

.small[
- Includes: 
  - Font Awesome
  - Ionicons
  - Academicons
  - Simple Icons
  - Google’s Material Design
  - Octicons
  - Feather Icons
]

```r
icons::fontawesome("dna", style = "solid")
```

```r
icons::ionicons("git-pull-request-outline")
```

---
### View object differences with [`waldo` <svg viewBox="0 0 512 512" style="position:relative;display:inline-block;top:.1em;fill:#FE6B00;height:0.5em;margin-bottom:8px;" xmlns="http://www.w3.org/2000/svg">  <path d="M326.612 185.391c59.747 59.809 58.927 155.698.36 214.59-.11.12-.24.25-.36.37l-67.2 67.2c-59.27 59.27-155.699 59.262-214.96 0-59.27-59.26-59.27-155.7 0-214.96l37.106-37.106c9.84-9.84 26.786-3.3 27.294 10.606.648 17.722 3.826 35.527 9.69 52.721 1.986 5.822.567 12.262-3.783 16.612l-13.087 13.087c-28.026 28.026-28.905 73.66-1.155 101.96 28.024 28.579 74.086 28.749 102.325.51l67.2-67.19c28.191-28.191 28.073-73.757 0-101.83-3.701-3.694-7.429-6.564-10.341-8.569a16.037 16.037 0 0 1-6.947-12.606c-.396-10.567 3.348-21.456 11.698-29.806l21.054-21.055c5.521-5.521 14.182-6.199 20.584-1.731a152.482 152.482 0 0 1 20.522 17.197zM467.547 44.449c-59.261-59.262-155.69-59.27-214.96 0l-67.2 67.2c-.12.12-.25.25-.36.37-58.566 58.892-59.387 154.781.36 214.59a152.454 152.454 0 0 0 20.521 17.196c6.402 4.468 15.064 3.789 20.584-1.731l21.054-21.055c8.35-8.35 12.094-19.239 11.698-29.806a16.037 16.037 0 0 0-6.947-12.606c-2.912-2.005-6.64-4.875-10.341-8.569-28.073-28.073-28.191-73.639 0-101.83l67.2-67.19c28.239-28.239 74.3-28.069 102.325.51 27.75 28.3 26.872 73.934-1.155 101.96l-13.087 13.087c-4.35 4.35-5.769 10.79-3.783 16.612 5.864 17.194 9.042 34.999 9.69 52.721.509 13.906 17.454 20.446 27.294 10.606l37.106-37.106c59.271-59.259 59.271-155.699.001-214.959z"></path></svg>](https://waldo.r-lib.org/)

This is much nicer to use than `all.equal()`

.w-75.h-center[
![](images/waldo-example.svg)
]

---
### Export graphics with [`ragg` <svg viewBox="0 0 512 512" style="position:relative;display:inline-block;top:.1em;fill:#FE6B00;height:0.5em;margin-bottom:8px;" xmlns="http://www.w3.org/2000/svg">  <path d="M326.612 185.391c59.747 59.809 58.927 155.698.36 214.59-.11.12-.24.25-.36.37l-67.2 67.2c-59.27 59.27-155.699 59.262-214.96 0-59.27-59.26-59.27-155.7 0-214.96l37.106-37.106c9.84-9.84 26.786-3.3 27.294 10.606.648 17.722 3.826 35.527 9.69 52.721 1.986 5.822.567 12.262-3.783 16.612l-13.087 13.087c-28.026 28.026-28.905 73.66-1.155 101.96 28.024 28.579 74.086 28.749 102.325.51l67.2-67.19c28.191-28.191 28.073-73.757 0-101.83-3.701-3.694-7.429-6.564-10.341-8.569a16.037 16.037 0 0 1-6.947-12.606c-.396-10.567 3.348-21.456 11.698-29.806l21.054-21.055c5.521-5.521 14.182-6.199 20.584-1.731a152.482 152.482 0 0 1 20.522 17.197zM467.547 44.449c-59.261-59.262-155.69-59.27-214.96 0l-67.2 67.2c-.12.12-.25.25-.36.37-58.566 58.892-59.387 154.781.36 214.59a152.454 152.454 0 0 0 20.521 17.196c6.402 4.468 15.064 3.789 20.584-1.731l21.054-21.055c8.35-8.35 12.094-19.239 11.698-29.806a16.037 16.037 0 0 0-6.947-12.606c-2.912-2.005-6.64-4.875-10.341-8.569-28.073-28.073-28.191-73.639 0-101.83l67.2-67.19c28.239-28.239 74.3-28.069 102.325.51 27.75 28.3 26.872 73.934-1.155 101.96l-13.087 13.087c-4.35 4.35-5.769 10.79-3.783 16.612 5.864 17.194 9.042 34.999 9.69 52.721.509 13.906 17.454 20.446 27.294 10.606l37.106-37.106c59.271-59.259 59.271-155.699.001-214.959z"></path></svg>](https://ragg.r-lib.org/)

Replace `png()`/`jpeg()`/`tiff()` with `agg_png()`/`agg_jpeg()`/`agg_tiff()`

.pull-left[
.w-75.h-center[
![](images/ragg-1.png)
![](images/ragg-2.png)
]
]
.pull-right[
.w-75.h-center[
![](images/cairo-1.png)
![](images/cairo-2.png)
]
]

---
### Play `gif`s from the start with [`xaringanExtra` <svg viewBox="0 0 512 512" style="position:relative;display:inline-block;top:.1em;fill:#FE6B00;height:0.5em;margin-bottom:8px;" xmlns="http://www.w3.org/2000/svg">  <path d="M326.612 185.391c59.747 59.809 58.927 155.698.36 214.59-.11.12-.24.25-.36.37l-67.2 67.2c-59.27 59.27-155.699 59.262-214.96 0-59.27-59.26-59.27-155.7 0-214.96l37.106-37.106c9.84-9.84 26.786-3.3 27.294 10.606.648 17.722 3.826 35.527 9.69 52.721 1.986 5.822.567 12.262-3.783 16.612l-13.087 13.087c-28.026 28.026-28.905 73.66-1.155 101.96 28.024 28.579 74.086 28.749 102.325.51l67.2-67.19c28.191-28.191 28.073-73.757 0-101.83-3.701-3.694-7.429-6.564-10.341-8.569a16.037 16.037 0 0 1-6.947-12.606c-.396-10.567 3.348-21.456 11.698-29.806l21.054-21.055c5.521-5.521 14.182-6.199 20.584-1.731a152.482 152.482 0 0 1 20.522 17.197zM467.547 44.449c-59.261-59.262-155.69-59.27-214.96 0l-67.2 67.2c-.12.12-.25.25-.36.37-58.566 58.892-59.387 154.781.36 214.59a152.454 152.454 0 0 0 20.521 17.196c6.402 4.468 15.064 3.789 20.584-1.731l21.054-21.055c8.35-8.35 12.094-19.239 11.698-29.806a16.037 16.037 0 0 0-6.947-12.606c-2.912-2.005-6.64-4.875-10.341-8.569-28.073-28.073-28.191-73.639 0-101.83l67.2-67.19c28.239-28.239 74.3-28.069 102.325.51 27.75 28.3 26.872 73.934-1.155 101.96l-13.087 13.087c-4.35 4.35-5.769 10.79-3.783 16.612 5.864 17.194 9.042 34.999 9.69 52.721.509 13.906 17.454 20.446 27.294 10.606l37.106-37.106c59.271-59.259 59.271-155.699.001-214.959z"></path></svg>](https://github.com/gadenbuie/xaringanExtra)

- Otherwise, they run endlessly in the background and you often land on a slide mid-gif
  - `freezeframe` plays the `gif` from the beginning, restarts it with a click

.pull-left[
.small-code[
````markdown
```{r xaringanExtra-freezeframe, echo=FALSE}
xaringanExtra::use_freezeframe(trigger = "click")
```
````
]
]
.pull-right[
.w-40.h-center[
![](images/basketball.gif)
]
]

---
### Tabulate counts with [`janitor::tabyl()` <svg viewBox="0 0 512 512" style="position:relative;display:inline-block;top:.1em;fill:#FE6B00;height:0.5em;margin-bottom:8px;" xmlns="http://www.w3.org/2000/svg">  <path d="M326.612 185.391c59.747 59.809 58.927 155.698.36 214.59-.11.12-.24.25-.36.37l-67.2 67.2c-59.27 59.27-155.699 59.262-214.96 0-59.27-59.26-59.27-155.7 0-214.96l37.106-37.106c9.84-9.84 26.786-3.3 27.294 10.606.648 17.722 3.826 35.527 9.69 52.721 1.986 5.822.567 12.262-3.783 16.612l-13.087 13.087c-28.026 28.026-28.905 73.66-1.155 101.96 28.024 28.579 74.086 28.749 102.325.51l67.2-67.19c28.191-28.191 28.073-73.757 0-101.83-3.701-3.694-7.429-6.564-10.341-8.569a16.037 16.037 0 0 1-6.947-12.606c-.396-10.567 3.348-21.456 11.698-29.806l21.054-21.055c5.521-5.521 14.182-6.199 20.584-1.731a152.482 152.482 0 0 1 20.522 17.197zM467.547 44.449c-59.261-59.262-155.69-59.27-214.96 0l-67.2 67.2c-.12.12-.25.25-.36.37-58.566 58.892-59.387 154.781.36 214.59a152.454 152.454 0 0 0 20.521 17.196c6.402 4.468 15.064 3.789 20.584-1.731l21.054-21.055c8.35-8.35 12.094-19.239 11.698-29.806a16.037 16.037 0 0 0-6.947-12.606c-2.912-2.005-6.64-4.875-10.341-8.569-28.073-28.073-28.191-73.639 0-101.83l67.2-67.19c28.239-28.239 74.3-28.069 102.325.51 27.75 28.3 26.872 73.934-1.155 101.96l-13.087 13.087c-4.35 4.35-5.769 10.79-3.783 16.612 5.864 17.194 9.042 34.999 9.69 52.721.509 13.906 17.454 20.446 27.294 10.606l37.106-37.106c59.271-59.259 59.271-155.699.001-214.959z"></path></svg>](https://cran.r-project.org/web/packages/janitor/vignettes/tabyls.html)

Though I &#x2764;&#xFE0F; `table()`/`xtabs()` for nostalgic reasons, I'll never again use them

.panelset[
.panel[.panel-name[Old way]
.small-code[

```r
library(dplyr)

table(starwars$gender, starwars$eye_color)
```

```
##            
##             black blue blue-gray brown dark gold green, yellow hazel orange
##   feminine      2    6         0     5    0    0             0     2      0
##   masculine     8   12         1    15    1    1             1     1      8
##            
##             pink red red, blue unknown white yellow
##   feminine     0   0         1       0     0      1
##   masculine    1   5         0       2     0     10
```
]
]
.panel[.panel-name[New way]
.small-code[

```r
library(dplyr)
library(janitor)

starwars %>%
  tabyl(gender, eye_color)
```

```
##     gender black blue blue-gray brown dark gold green, yellow hazel orange pink
##   feminine     2    6         0     5    0    0             0     2      0    0
##  masculine     8   12         1    15    1    1             1     1      8    1
##       <NA>     0    1         0     1    0    0             0     0      0    0
##  red red, blue unknown white yellow
##    0         1       0     0      1
##    5         0       2     0     10
##    0         0       1     1      0
```
]
]
.panel[.panel-name[New way+]
.small-code[

```r
starwars %>%
  tabyl(gender, eye_color, show_na = FALSE) %>%
  adorn_totals("row") %>%
  adorn_percentages("col") %>%
  adorn_pct_formatting(digits = 0) %>%
  adorn_ns
```

```
##     gender     black      blue blue-gray     brown     dark     gold
##   feminine  20%  (2)  33%  (6)    0% (0)  25%  (5)   0% (0)   0% (0)
##  masculine  80%  (8)  67% (12)  100% (1)  75% (15) 100% (1) 100% (1)
##      Total 100% (10) 100% (18)  100% (1) 100% (20) 100% (1) 100% (1)
##  green, yellow    hazel   orange     pink      red red, blue  unknown    yellow
##         0% (0)  67% (2)   0% (0)   0% (0)   0% (0)  100% (1)   0% (0)   9%  (1)
##       100% (1)  33% (1) 100% (8) 100% (1) 100% (5)    0% (0) 100% (2)  91% (10)
##       100% (1) 100% (3) 100% (8) 100% (1) 100% (5)  100% (1) 100% (2) 100% (11)
```
]
]
.panel[.panel-name[New way++]
.small-code[

```r
starwars %>%
  tabyl(gender, eye_color, show_na = FALSE) %>%
  adorn_totals("row") %>%
  adorn_percentages("col") %>%
  adorn_pct_formatting(digits = 0) %>%
  adorn_ns %>%
  reactable::reactable()
```
]
.smaller[
<div id="htmlwidget-62facf03d51a0f4bd978" class="reactable html-widget" style="width:auto;height:auto;"></div>
<script type="application/json" data-for="htmlwidget-62facf03d51a0f4bd978">{"x":{"tag":{"name":"Reactable","attribs":{"data":{"gender":["feminine","masculine","Total"],"black":["20%  (2)","80%  (8)","100% (10)"],"blue":["33%  (6)","67% (12)","100% (18)"],"blue-gray":["0% (0)","100% (1)","100% (1)"],"brown":["25%  (5)","75% (15)","100% (20)"],"dark":["0% (0)","100% (1)","100% (1)"],"gold":["0% (0)","100% (1)","100% (1)"],"green, yellow":["0% (0)","100% (1)","100% (1)"],"hazel":["67% (2)","33% (1)","100% (3)"],"orange":["0% (0)","100% (8)","100% (8)"],"pink":["0% (0)","100% (1)","100% (1)"],"red":["0% (0)","100% (5)","100% (5)"],"red, blue":["100% (1)","0% (0)","100% (1)"],"unknown":["0% (0)","100% (2)","100% (2)"],"yellow":["9%  (1)","91% (10)","100% (11)"]},"columns":[{"accessor":"gender","name":"gender","type":"character"},{"accessor":"black","name":"black","type":"character"},{"accessor":"blue","name":"blue","type":"character"},{"accessor":"blue-gray","name":"blue-gray","type":"character"},{"accessor":"brown","name":"brown","type":"character"},{"accessor":"dark","name":"dark","type":"character"},{"accessor":"gold","name":"gold","type":"character"},{"accessor":"green, yellow","name":"green, yellow","type":"character"},{"accessor":"hazel","name":"hazel","type":"character"},{"accessor":"orange","name":"orange","type":"character"},{"accessor":"pink","name":"pink","type":"character"},{"accessor":"red","name":"red","type":"character"},{"accessor":"red, blue","name":"red, blue","type":"character"},{"accessor":"unknown","name":"unknown","type":"character"},{"accessor":"yellow","name":"yellow","type":"character"}],"defaultPageSize":10,"paginationType":"numbers","showPageInfo":true,"minRows":1,"dataKey":"2873db20f6508cc13cb9b8904e4a2bcf","key":"2873db20f6508cc13cb9b8904e4a2bcf"},"children":[]},"class":"reactR_markup"},"evals":[],"jsHooks":[]}</script>
]
]
.panel[.panel-name[&#x1F913; Bonus]
.small-code[

```r
library(dplyr)
library(janitor)

starwars %>%
  tabyl(gender, eye_color, show_na = FALSE) %>%
  chisq.test()
```

```
## 
## 	Pearson's Chi-squared test
## 
## data:  .
## X-squared = 15.917, df = 13, p-value = 0.2537
```
]
]

]

---
### Make manuscript tables with [`gtsummary` <svg viewBox="0 0 512 512" style="position:relative;display:inline-block;top:.1em;fill:#FE6B00;height:0.5em;margin-bottom:8px;" xmlns="http://www.w3.org/2000/svg">  <path d="M326.612 185.391c59.747 59.809 58.927 155.698.36 214.59-.11.12-.24.25-.36.37l-67.2 67.2c-59.27 59.27-155.699 59.262-214.96 0-59.27-59.26-59.27-155.7 0-214.96l37.106-37.106c9.84-9.84 26.786-3.3 27.294 10.606.648 17.722 3.826 35.527 9.69 52.721 1.986 5.822.567 12.262-3.783 16.612l-13.087 13.087c-28.026 28.026-28.905 73.66-1.155 101.96 28.024 28.579 74.086 28.749 102.325.51l67.2-67.19c28.191-28.191 28.073-73.757 0-101.83-3.701-3.694-7.429-6.564-10.341-8.569a16.037 16.037 0 0 1-6.947-12.606c-.396-10.567 3.348-21.456 11.698-29.806l21.054-21.055c5.521-5.521 14.182-6.199 20.584-1.731a152.482 152.482 0 0 1 20.522 17.197zM467.547 44.449c-59.261-59.262-155.69-59.27-214.96 0l-67.2 67.2c-.12.12-.25.25-.36.37-58.566 58.892-59.387 154.781.36 214.59a152.454 152.454 0 0 0 20.521 17.196c6.402 4.468 15.064 3.789 20.584-1.731l21.054-21.055c8.35-8.35 12.094-19.239 11.698-29.806a16.037 16.037 0 0 0-6.947-12.606c-2.912-2.005-6.64-4.875-10.341-8.569-28.073-28.073-28.191-73.639 0-101.83l67.2-67.19c28.239-28.239 74.3-28.069 102.325.51 27.75 28.3 26.872 73.934-1.155 101.96l-13.087 13.087c-4.35 4.35-5.769 10.79-3.783 16.612 5.864 17.194 9.042 34.999 9.69 52.721.509 13.906 17.454 20.446 27.294 10.606l37.106-37.106c59.271-59.259 59.271-155.699.001-214.959z"></path></svg>](http://www.danieldsjoberg.com/gtsummary/)

Daniel Sjoberg is a true hero.

.h-center[
![](images/gtsummary.gif)
]

---
### Color plot text with [`ggtext` <svg viewBox="0 0 512 512" style="position:relative;display:inline-block;top:.1em;fill:#FE6B00;height:0.5em;margin-bottom:8px;" xmlns="http://www.w3.org/2000/svg">  <path d="M326.612 185.391c59.747 59.809 58.927 155.698.36 214.59-.11.12-.24.25-.36.37l-67.2 67.2c-59.27 59.27-155.699 59.262-214.96 0-59.27-59.26-59.27-155.7 0-214.96l37.106-37.106c9.84-9.84 26.786-3.3 27.294 10.606.648 17.722 3.826 35.527 9.69 52.721 1.986 5.822.567 12.262-3.783 16.612l-13.087 13.087c-28.026 28.026-28.905 73.66-1.155 101.96 28.024 28.579 74.086 28.749 102.325.51l67.2-67.19c28.191-28.191 28.073-73.757 0-101.83-3.701-3.694-7.429-6.564-10.341-8.569a16.037 16.037 0 0 1-6.947-12.606c-.396-10.567 3.348-21.456 11.698-29.806l21.054-21.055c5.521-5.521 14.182-6.199 20.584-1.731a152.482 152.482 0 0 1 20.522 17.197zM467.547 44.449c-59.261-59.262-155.69-59.27-214.96 0l-67.2 67.2c-.12.12-.25.25-.36.37-58.566 58.892-59.387 154.781.36 214.59a152.454 152.454 0 0 0 20.521 17.196c6.402 4.468 15.064 3.789 20.584-1.731l21.054-21.055c8.35-8.35 12.094-19.239 11.698-29.806a16.037 16.037 0 0 0-6.947-12.606c-2.912-2.005-6.64-4.875-10.341-8.569-28.073-28.073-28.191-73.639 0-101.83l67.2-67.19c28.239-28.239 74.3-28.069 102.325.51 27.75 28.3 26.872 73.934-1.155 101.96l-13.087 13.087c-4.35 4.35-5.769 10.79-3.783 16.612 5.864 17.194 9.042 34.999 9.69 52.721.509 13.906 17.454 20.446 27.294 10.606l37.106-37.106c59.271-59.259 59.271-155.699.001-214.959z"></path></svg>](https://wilkelab.org/ggtext/)

- Most common: avoid need for legends by coloring plot title
  - Much of [The Glamour of Graphics](https://www.rstudio.com/resources/rstudioconf-2020/the-glamour-of-graphics/) framework implementable through `ggtext`

.pull-left-60[
.small-code[

```r
library(ggtext)

ggplot(
    ...,
 labs(
    title = glue::glue(
      "Steps recorded in 2021: ",
      "<strong style = 'color: #a9a9a9'>All days</strong>",
      " versus ",
      "<strong style = 'color: #b573dc'>Easter day</strong>"
    ),
    ...,
```
]
]

.pull-right-40[
.w-90.h-center[
![](images/easter-steps.png)
]
]

---
### Copy/paste data to R with [`datapasta` <svg viewBox="0 0 512 512" style="position:relative;display:inline-block;top:.1em;fill:#FE6B00;height:0.5em;margin-bottom:8px;" xmlns="http://www.w3.org/2000/svg">  <path d="M326.612 185.391c59.747 59.809 58.927 155.698.36 214.59-.11.12-.24.25-.36.37l-67.2 67.2c-59.27 59.27-155.699 59.262-214.96 0-59.27-59.26-59.27-155.7 0-214.96l37.106-37.106c9.84-9.84 26.786-3.3 27.294 10.606.648 17.722 3.826 35.527 9.69 52.721 1.986 5.822.567 12.262-3.783 16.612l-13.087 13.087c-28.026 28.026-28.905 73.66-1.155 101.96 28.024 28.579 74.086 28.749 102.325.51l67.2-67.19c28.191-28.191 28.073-73.757 0-101.83-3.701-3.694-7.429-6.564-10.341-8.569a16.037 16.037 0 0 1-6.947-12.606c-.396-10.567 3.348-21.456 11.698-29.806l21.054-21.055c5.521-5.521 14.182-6.199 20.584-1.731a152.482 152.482 0 0 1 20.522 17.197zM467.547 44.449c-59.261-59.262-155.69-59.27-214.96 0l-67.2 67.2c-.12.12-.25.25-.36.37-58.566 58.892-59.387 154.781.36 214.59a152.454 152.454 0 0 0 20.521 17.196c6.402 4.468 15.064 3.789 20.584-1.731l21.054-21.055c8.35-8.35 12.094-19.239 11.698-29.806a16.037 16.037 0 0 0-6.947-12.606c-2.912-2.005-6.64-4.875-10.341-8.569-28.073-28.073-28.191-73.639 0-101.83l67.2-67.19c28.239-28.239 74.3-28.069 102.325.51 27.75 28.3 26.872 73.934-1.155 101.96l-13.087 13.087c-4.35 4.35-5.769 10.79-3.783 16.612 5.864 17.194 9.042 34.999 9.69 52.721.509 13.906 17.454 20.446 27.294 10.606l37.106-37.106c59.271-59.259 59.271-155.699.001-214.959z"></path></svg>](https://milesmcbain.github.io/datapasta/)

.w-75.h-center[
![](images/datapasta.gif)
]

---
### Make `ggplot`s interactive with [`ggiraph` <svg viewBox="0 0 512 512" style="position:relative;display:inline-block;top:.1em;fill:#FE6B00;height:0.5em;margin-bottom:8px;" xmlns="http://www.w3.org/2000/svg">  <path d="M326.612 185.391c59.747 59.809 58.927 155.698.36 214.59-.11.12-.24.25-.36.37l-67.2 67.2c-59.27 59.27-155.699 59.262-214.96 0-59.27-59.26-59.27-155.7 0-214.96l37.106-37.106c9.84-9.84 26.786-3.3 27.294 10.606.648 17.722 3.826 35.527 9.69 52.721 1.986 5.822.567 12.262-3.783 16.612l-13.087 13.087c-28.026 28.026-28.905 73.66-1.155 101.96 28.024 28.579 74.086 28.749 102.325.51l67.2-67.19c28.191-28.191 28.073-73.757 0-101.83-3.701-3.694-7.429-6.564-10.341-8.569a16.037 16.037 0 0 1-6.947-12.606c-.396-10.567 3.348-21.456 11.698-29.806l21.054-21.055c5.521-5.521 14.182-6.199 20.584-1.731a152.482 152.482 0 0 1 20.522 17.197zM467.547 44.449c-59.261-59.262-155.69-59.27-214.96 0l-67.2 67.2c-.12.12-.25.25-.36.37-58.566 58.892-59.387 154.781.36 214.59a152.454 152.454 0 0 0 20.521 17.196c6.402 4.468 15.064 3.789 20.584-1.731l21.054-21.055c8.35-8.35 12.094-19.239 11.698-29.806a16.037 16.037 0 0 0-6.947-12.606c-2.912-2.005-6.64-4.875-10.341-8.569-28.073-28.073-28.191-73.639 0-101.83l67.2-67.19c28.239-28.239 74.3-28.069 102.325.51 27.75 28.3 26.872 73.934-1.155 101.96l-13.087 13.087c-4.35 4.35-5.769 10.79-3.783 16.612 5.864 17.194 9.042 34.999 9.69 52.721.509 13.906 17.454 20.446 27.294 10.606l37.106-37.106c59.271-59.259 59.271-155.699.001-214.959z"></path></svg>](https://davidgohel.github.io/ggiraph/)

`plotly` is awesome but doesn't always play nice with Shiny/Xaringan (`ggiraph` does)

.panelset[
.panel[.panel-name[Make ggplots]
.small-code[

```r
library(ggplot2)
library(ggiraph)
library(cowplot)

mtcars <- mtcars
mtcars$tooltip <- rownames(mtcars)

gg1 <- ggplot(mtcars) +
  geom_point_interactive(aes(x = drat, y = wt, color = qsec,
    tooltip = tooltip, data_id = tooltip), size = 4) + 
  theme_minimal()

gg2 <- ggplot(mtcars) +
  geom_point_interactive(aes(x = qsec, y = disp, color = mpg,
    tooltip = tooltip, data_id = tooltip ), size = 4) + 
  theme_minimal()
```
]
]
.panel[.panel-name[Make ggiraph]
.small-code[

```r
girafe(ggobj = plot_grid(gg1, gg2), width_svg = 8, height_svg = 2.4)
```

<div id="htmlwidget-e0563124bb3e59a2908b" style="width:100%;height:252px;" class="girafe html-widget"></div>
<script type="application/json" data-for="htmlwidget-e0563124bb3e59a2908b">{"x":{"html":"<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n<svg xmlns='http://www.w3.org/2000/svg' xmlns:xlink='http://www.w3.org/1999/xlink' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d' viewBox='0 0 576.00 172.80'>\n  <g>\n    <defs>\n      <clipPath id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_1'>\n        <rect x='0.00' y='0.00' width='576.00' height='172.80'/>\n      <\/clipPath>\n    <\/defs>\n    <rect x='0.00' y='0.00' width='576.00' height='172.80' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_1' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_1)' fill='#FFFFFF' fill-opacity='1' stroke='#FFFFFF' stroke-opacity='1' stroke-width='0.75' stroke-linejoin='round' stroke-linecap='round'/>\n    <defs>\n      <clipPath id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_2'>\n        <rect x='0.00' y='0.00' width='576.00' height='172.80'/>\n      <\/clipPath>\n    <\/defs>\n    <defs>\n      <clipPath id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_3'>\n        <rect x='0.00' y='0.00' width='288.00' height='172.80'/>\n      <\/clipPath>\n    <\/defs>\n    <defs>\n      <clipPath id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_4'>\n        <rect x='0.00' y='0.00' width='576.00' height='172.80'/>\n      <\/clipPath>\n    <\/defs>\n    <defs>\n      <clipPath id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5'>\n        <rect x='28.35' y='5.48' width='191.97' height='135.57'/>\n      <\/clipPath>\n    <\/defs>\n    <polyline points='28.35,135.29 220.33,135.29' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_2' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='none' stroke='#EBEBEB' stroke-opacity='1' stroke-width='0.53' stroke-linejoin='round' stroke-linecap='butt'/>\n    <polyline points='28.35,103.78 220.33,103.78' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_3' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='none' stroke='#EBEBEB' stroke-opacity='1' stroke-width='0.53' stroke-linejoin='round' stroke-linecap='butt'/>\n    <polyline points='28.35,72.27 220.33,72.27' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_4' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='none' stroke='#EBEBEB' stroke-opacity='1' stroke-width='0.53' stroke-linejoin='round' stroke-linecap='butt'/>\n    <polyline points='28.35,40.76 220.33,40.76' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_5' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='none' stroke='#EBEBEB' stroke-opacity='1' stroke-width='0.53' stroke-linejoin='round' stroke-linecap='butt'/>\n    <polyline points='28.35,9.25 220.33,9.25' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_6' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='none' stroke='#EBEBEB' stroke-opacity='1' stroke-width='0.53' stroke-linejoin='round' stroke-linecap='butt'/>\n    <polyline points='36.28,141.05 36.28,5.48' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_7' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='none' stroke='#EBEBEB' stroke-opacity='1' stroke-width='0.53' stroke-linejoin='round' stroke-linecap='butt'/>\n    <polyline points='76.49,141.05 76.49,5.48' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_8' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='none' stroke='#EBEBEB' stroke-opacity='1' stroke-width='0.53' stroke-linejoin='round' stroke-linecap='butt'/>\n    <polyline points='116.70,141.05 116.70,5.48' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_9' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='none' stroke='#EBEBEB' stroke-opacity='1' stroke-width='0.53' stroke-linejoin='round' stroke-linecap='butt'/>\n    <polyline points='156.91,141.05 156.91,5.48' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_10' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='none' stroke='#EBEBEB' stroke-opacity='1' stroke-width='0.53' stroke-linejoin='round' stroke-linecap='butt'/>\n    <polyline points='197.13,141.05 197.13,5.48' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_11' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='none' stroke='#EBEBEB' stroke-opacity='1' stroke-width='0.53' stroke-linejoin='round' stroke-linecap='butt'/>\n    <polyline points='28.35,119.54 220.33,119.54' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_12' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='none' stroke='#EBEBEB' stroke-opacity='1' stroke-width='1.07' stroke-linejoin='round' stroke-linecap='butt'/>\n    <polyline points='28.35,88.03 220.33,88.03' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_13' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='none' stroke='#EBEBEB' stroke-opacity='1' stroke-width='1.07' stroke-linejoin='round' stroke-linecap='butt'/>\n    <polyline points='28.35,56.51 220.33,56.51' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_14' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='none' stroke='#EBEBEB' stroke-opacity='1' stroke-width='1.07' stroke-linejoin='round' stroke-linecap='butt'/>\n    <polyline points='28.35,25.00 220.33,25.00' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_15' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='none' stroke='#EBEBEB' stroke-opacity='1' stroke-width='1.07' stroke-linejoin='round' stroke-linecap='butt'/>\n    <polyline points='56.38,141.05 56.38,5.48' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_16' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='none' stroke='#EBEBEB' stroke-opacity='1' stroke-width='1.07' stroke-linejoin='round' stroke-linecap='butt'/>\n    <polyline points='96.60,141.05 96.60,5.48' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_17' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='none' stroke='#EBEBEB' stroke-opacity='1' stroke-width='1.07' stroke-linejoin='round' stroke-linecap='butt'/>\n    <polyline points='136.81,141.05 136.81,5.48' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_18' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='none' stroke='#EBEBEB' stroke-opacity='1' stroke-width='1.07' stroke-linejoin='round' stroke-linecap='butt'/>\n    <polyline points='177.02,141.05 177.02,5.48' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_19' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='none' stroke='#EBEBEB' stroke-opacity='1' stroke-width='1.07' stroke-linejoin='round' stroke-linecap='butt'/>\n    <polyline points='217.23,141.05 217.23,5.48' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_20' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='none' stroke='#EBEBEB' stroke-opacity='1' stroke-width='1.07' stroke-linejoin='round' stroke-linecap='butt'/>\n    <circle cx='128.77' cy='100.00' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_21' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='#214769' fill-opacity='1' stroke='#214769' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Mazda RX4' title='Mazda RX4'/>\n    <circle cx='128.77' cy='91.97' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_22' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='#265075' fill-opacity='1' stroke='#265075' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Mazda RX4 Wag' title='Mazda RX4 Wag'/>\n    <circle cx='124.74' cy='109.45' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_23' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='#326996' fill-opacity='1' stroke='#326996' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Datsun 710' title='Datsun 710'/>\n    <circle cx='62.82' cy='81.25' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_24' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='#3976A8' fill-opacity='1' stroke='#3976A8' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Hornet 4 Drive' title='Hornet 4 Drive'/>\n    <circle cx='68.45' cy='74.16' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_25' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='#265075' fill-opacity='1' stroke='#265075' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Hornet Sportabout' title='Hornet Sportabout'/>\n    <circle cx='37.08' cy='73.53' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_26' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='#3F83B9' fill-opacity='1' stroke='#3F83B9' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Valiant' title='Valiant'/>\n    <circle cx='73.27' cy='70.06' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_27' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='#1D3E5D' fill-opacity='1' stroke='#1D3E5D' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Duster 360' title='Duster 360'/>\n    <circle cx='111.88' cy='82.04' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_28' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='#3D7FB4' fill-opacity='1' stroke='#3D7FB4' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Merc 240D' title='Merc 240D'/>\n    <circle cx='130.37' cy='83.30' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_29' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='#56B1F7' fill-opacity='1' stroke='#56B1F7' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Merc 230' title='Merc 230'/>\n    <circle cx='130.37' cy='74.16' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_30' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='#30648F' fill-opacity='1' stroke='#30648F' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Merc 280' title='Merc 280'/>\n    <circle cx='130.37' cy='74.16' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_31' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='#346D9C' fill-opacity='1' stroke='#346D9C' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Merc 280C' title='Merc 280C'/>\n    <circle cx='62.01' cy='54.31' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_32' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='#29567C' fill-opacity='1' stroke='#29567C' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Merc 450SE' title='Merc 450SE'/>\n    <circle cx='62.01' cy='65.02' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_33' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='#2A5981' fill-opacity='1' stroke='#2A5981' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Merc 450SL' title='Merc 450SL'/>\n    <circle cx='62.01' cy='63.45' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_34' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='#2D5F89' fill-opacity='1' stroke='#2D5F89' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Merc 450SLC' title='Merc 450SLC'/>\n    <circle cx='50.75' cy='17.12' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_35' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='#2D5F89' fill-opacity='1' stroke='#2D5F89' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Cadillac Fleetwood' title='Cadillac Fleetwood'/>\n    <circle cx='56.38' cy='11.64' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_36' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='#2C5C85' fill-opacity='1' stroke='#2C5C85' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Lincoln Continental' title='Lincoln Continental'/>\n    <circle cx='74.88' cy='14.13' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_37' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='#29567D' fill-opacity='1' stroke='#29567D' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Chrysler Imperial' title='Chrysler Imperial'/>\n    <circle cx='143.24' cy='113.24' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_38' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='#3977A9' fill-opacity='1' stroke='#3977A9' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Fiat 128' title='Fiat 128'/>\n    <circle cx='211.60' cy='131.67' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_39' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='#316794' fill-opacity='1' stroke='#316794' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Honda Civic' title='Honda Civic'/>\n    <circle cx='154.50' cy='124.74' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_40' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='#3D7EB2' fill-opacity='1' stroke='#3D7EB2' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Toyota Corolla' title='Toyota Corolla'/>\n    <circle cx='112.68' cy='104.89' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_41' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='#3D80B5' fill-opacity='1' stroke='#3D80B5' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Toyota Corona' title='Toyota Corona'/>\n    <circle cx='37.08' cy='71.64' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_42' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='#244D71' fill-opacity='1' stroke='#244D71' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Dodge Challenger' title='Dodge Challenger'/>\n    <circle cx='68.45' cy='74.32' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_43' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='#28547A' fill-opacity='1' stroke='#28547A' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='AMC Javelin' title='AMC Javelin'/>\n    <circle cx='115.09' cy='61.56' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_44' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='#1A3854' fill-opacity='1' stroke='#1A3854' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Camaro Z28' title='Camaro Z28'/>\n    <circle cx='62.82' cy='61.40' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_45' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='#265075' fill-opacity='1' stroke='#265075' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Pontiac Firebird' title='Pontiac Firebird'/>\n    <circle cx='143.24' cy='121.59' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_46' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='#346D9C' fill-opacity='1' stroke='#346D9C' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Fiat X1-9' title='Fiat X1-9'/>\n    <circle cx='171.39' cy='115.13' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_47' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='#234B6E' fill-opacity='1' stroke='#234B6E' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Porsche 914-2' title='Porsche 914-2'/>\n    <circle cx='118.31' cy='134.88' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_48' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='#254E72' fill-opacity='1' stroke='#254E72' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Lotus Europa' title='Lotus Europa'/>\n    <circle cx='154.50' cy='82.67' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_49' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='#132B43' fill-opacity='1' stroke='#132B43' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Ford Pantera L' title='Ford Pantera L'/>\n    <circle cx='106.25' cy='95.27' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_50' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='#1A3956' fill-opacity='1' stroke='#1A3956' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Ferrari Dino' title='Ferrari Dino'/>\n    <circle cx='99.81' cy='70.06' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_51' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='#142C45' fill-opacity='1' stroke='#142C45' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Maserati Bora' title='Maserati Bora'/>\n    <circle cx='145.65' cy='94.96' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_52' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_5)' fill='#326996' fill-opacity='1' stroke='#326996' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Volvo 142E' title='Volvo 142E'/>\n    <defs>\n      <clipPath id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_6'>\n        <rect x='0.00' y='0.00' width='576.00' height='172.80'/>\n      <\/clipPath>\n    <\/defs>\n    <g clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_6)'>\n      <text x='18.53' y='122.69' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_53' font-size='6.60pt' fill='#4D4D4D' fill-opacity='1' font-family='Helvetica'>2<\/text>\n    <\/g>\n    <g clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_6)'>\n      <text x='18.53' y='91.18' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_54' font-size='6.60pt' fill='#4D4D4D' fill-opacity='1' font-family='Helvetica'>3<\/text>\n    <\/g>\n    <g clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_6)'>\n      <text x='18.53' y='59.67' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_55' font-size='6.60pt' fill='#4D4D4D' fill-opacity='1' font-family='Helvetica'>4<\/text>\n    <\/g>\n    <g clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_6)'>\n      <text x='18.53' y='28.16' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_56' font-size='6.60pt' fill='#4D4D4D' fill-opacity='1' font-family='Helvetica'>5<\/text>\n    <\/g>\n    <g clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_6)'>\n      <text x='50.27' y='152.29' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_57' font-size='6.60pt' fill='#4D4D4D' fill-opacity='1' font-family='Helvetica'>3.0<\/text>\n    <\/g>\n    <g clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_6)'>\n      <text x='90.48' y='152.29' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_58' font-size='6.60pt' fill='#4D4D4D' fill-opacity='1' font-family='Helvetica'>3.5<\/text>\n    <\/g>\n    <g clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_6)'>\n      <text x='130.69' y='152.29' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_59' font-size='6.60pt' fill='#4D4D4D' fill-opacity='1' font-family='Helvetica'>4.0<\/text>\n    <\/g>\n    <g clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_6)'>\n      <text x='170.90' y='152.29' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_60' font-size='6.60pt' fill='#4D4D4D' fill-opacity='1' font-family='Helvetica'>4.5<\/text>\n    <\/g>\n    <g clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_6)'>\n      <text x='211.12' y='152.29' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_61' font-size='6.60pt' fill='#4D4D4D' fill-opacity='1' font-family='Helvetica'>5.0<\/text>\n    <\/g>\n    <g clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_6)'>\n      <text x='114.86' y='164.90' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_62' font-size='8.25pt' font-family='Helvetica'>drat<\/text>\n    <\/g>\n    <g clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_6)'>\n      <text transform='translate(13.37,78.76) rotate(-90.00)' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_63' font-size='8.25pt' font-family='Helvetica'>wt<\/text>\n    <\/g>\n    <image x='236.77' y='37.96' width='17.28' height='86.40' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_64' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_6)' xlink:href='data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAEYAAAFaCAYAAACjTSvQAAAABmJLR0QA/wD/AP+gvaeTAAAECUlEQVR4nO3dsZEjRwyG0ekrXh6KSskpCsV2BsdQiTJuHdX+37pc470IWF1oAI3pGZ4//36+Lv7nn8f1x+O6rMtn53pYl+G+rsfLygznelwvC7P8ePcP+K5ETJBjpttWKsp10OAFyXc51/WwLJuIWY4cE45yXZTroPOdnK6THBNEzGKCt53rqSoVOSbofIPkG5yuh3OJmCT5BhGzHBGTdL6T2w6b0WYxj0kavOG+lOtwyzFFHxOU6+WpwUuSb5BjgogJyvXktkN62EmbrTQ5XSc5JjxeIuYzw/Am+U5eskiq0uLKfBMxQfINRpuLW5vbcVYq5jHJwgRbKUi+w8etzXf/jO9JgzfdckxRlYKFCWa+i5lvk3wX93zL8ey6iJjJ2CFJvkHEBA3ecN+Sb3jaSkXyDSImeKgfbKWgKgVPCYLnSkGOWY7TdbIwwVZazlGui5lvEDHTrcErIiYo18HMdzi3iEkavCD5BqPNwUdIk7NSMI9JjgTBVgrGDovLicW7BJsL0M3pOoiYIPkGDV4QMUGDN9xPEROMHYKxQ1KVgqtmwSEyyDFBxEy+nJiMHYKICTrfoMFbPCVoku/iXYJmK00iJqlKwdhhcNWsuOfbRMxk7JB0vsO55Jik8w0avCBiguQ7OUQmW2k6ku/knm+zlYKqtNhKzdhh8q3NJMcMT6PNplwHnW8QMcG3HYI+JthKk7FD0scEW2k6jgTFVgrK9XLcdkhyzGK02ZTrIGKCqhRETFCVguQ7GTtsHp80W2ny78XT77dPRMxkYYKqFETMZFCVVKVBVfqCscNitNmMHRYR0yTfyftKSVWaRExSlYb7UpWSHLP4Zni5na6LHBNspSBigqoUREzQ+QbJd3KITJ5EBltpcg1k883wZmGC5LvYSsVnUpKqFGylYOywuBnefH5/+Pj8/rt/xvdkKwVVKdhKQcRMvgYyHTPfpvMNIiZYmKAqTbeqNLky31SlRcQ0OWZwAfoLFiboY4KqtNxO10lVmkRMkmOCiAkWJuhjJvOYZCsFVSmImOB+TBAxwW2HxQXopiotx+k66XwnEZMsTFCVgj4miJigKg3n9qHjpPMNIiZYmGBQNXiR6wv6mCBigoiZjuS7mcckOWbxlKCJmEXENN+PCSJmelqYoo8JqlKwlYKqNNy3iEmSb/D4JIiYYGGCZ9eTCV5SrqejKpWHZdlEzHJcHEoWJqhKwaBqOS4OJRET5JigjwnKdbAwQVUazu/T9bt/xjfk/66LiEkiJqhKwQRv+HjJwtJ8ZoKXREwQMcGRINhKwVYKFibYSos/bGiq0mTssHlfqbhqlixMUK6DQdXwvETM5h/Sm3I93Rq8YisFZ6VgKwXJNzxe1+uvd/+I7+bfHz9//Qd9yLaxr3R2nQAAAABJRU5ErkJggg==' xmlns:xlink='http://www.w3.org/1999/xlink'/>\n    <g clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_6)'>\n      <text x='259.72' y='122.25' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_65' font-size='6.60pt' font-family='Helvetica'>15.0<\/text>\n    <\/g>\n    <g clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_6)'>\n      <text x='259.72' y='96.62' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_66' font-size='6.60pt' font-family='Helvetica'>17.5<\/text>\n    <\/g>\n    <g clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_6)'>\n      <text x='259.72' y='70.99' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_67' font-size='6.60pt' font-family='Helvetica'>20.0<\/text>\n    <\/g>\n    <g clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_6)'>\n      <text x='259.72' y='45.36' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_68' font-size='6.60pt' font-family='Helvetica'>22.5<\/text>\n    <\/g>\n    <g clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_6)'>\n      <text x='236.77' y='31.27' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_69' font-size='8.25pt' font-family='Helvetica'>qsec<\/text>\n    <\/g>\n    <line x1='236.77' y1='119.09' x2='240.22' y2='119.09' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_70' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_6)' stroke='#FFFFFF' stroke-opacity='1' stroke-width='0.38' stroke-linejoin='round' stroke-linecap='butt' fill='#FFFFFF' fill-opacity='1'/>\n    <line x1='236.77' y1='93.46' x2='240.22' y2='93.46' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_71' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_6)' stroke='#FFFFFF' stroke-opacity='1' stroke-width='0.38' stroke-linejoin='round' stroke-linecap='butt' fill='#FFFFFF' fill-opacity='1'/>\n    <line x1='236.77' y1='67.84' x2='240.22' y2='67.84' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_72' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_6)' stroke='#FFFFFF' stroke-opacity='1' stroke-width='0.38' stroke-linejoin='round' stroke-linecap='butt' fill='#FFFFFF' fill-opacity='1'/>\n    <line x1='236.77' y1='42.21' x2='240.22' y2='42.21' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_73' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_6)' stroke='#FFFFFF' stroke-opacity='1' stroke-width='0.38' stroke-linejoin='round' stroke-linecap='butt' fill='#FFFFFF' fill-opacity='1'/>\n    <line x1='250.59' y1='119.09' x2='254.05' y2='119.09' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_74' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_6)' stroke='#FFFFFF' stroke-opacity='1' stroke-width='0.38' stroke-linejoin='round' stroke-linecap='butt' fill='#FFFFFF' fill-opacity='1'/>\n    <line x1='250.59' y1='93.46' x2='254.05' y2='93.46' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_75' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_6)' stroke='#FFFFFF' stroke-opacity='1' stroke-width='0.38' stroke-linejoin='round' stroke-linecap='butt' fill='#FFFFFF' fill-opacity='1'/>\n    <line x1='250.59' y1='67.84' x2='254.05' y2='67.84' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_76' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_6)' stroke='#FFFFFF' stroke-opacity='1' stroke-width='0.38' stroke-linejoin='round' stroke-linecap='butt' fill='#FFFFFF' fill-opacity='1'/>\n    <line x1='250.59' y1='42.21' x2='254.05' y2='42.21' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_77' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_6)' stroke='#FFFFFF' stroke-opacity='1' stroke-width='0.38' stroke-linejoin='round' stroke-linecap='butt' fill='#FFFFFF' fill-opacity='1'/>\n    <defs>\n      <clipPath id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_7'>\n        <rect x='288.00' y='0.00' width='288.00' height='172.80'/>\n      <\/clipPath>\n    <\/defs>\n    <defs>\n      <clipPath id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_8'>\n        <rect x='0.00' y='0.00' width='576.00' height='172.80'/>\n      <\/clipPath>\n    <\/defs>\n    <defs>\n      <clipPath id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9'>\n        <rect x='326.14' y='5.48' width='189.69' height='135.57'/>\n      <\/clipPath>\n    <\/defs>\n    <polyline points='326.14,110.63 515.84,110.63' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_78' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='none' stroke='#EBEBEB' stroke-opacity='1' stroke-width='0.53' stroke-linejoin='round' stroke-linecap='butt'/>\n    <polyline points='326.14,79.89 515.84,79.89' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_79' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='none' stroke='#EBEBEB' stroke-opacity='1' stroke-width='0.53' stroke-linejoin='round' stroke-linecap='butt'/>\n    <polyline points='326.14,49.15 515.84,49.15' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_80' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='none' stroke='#EBEBEB' stroke-opacity='1' stroke-width='0.53' stroke-linejoin='round' stroke-linecap='butt'/>\n    <polyline points='326.14,18.40 515.84,18.40' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_81' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='none' stroke='#EBEBEB' stroke-opacity='1' stroke-width='0.53' stroke-linejoin='round' stroke-linecap='butt'/>\n    <polyline points='345.03,141.05 345.03,5.48' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_82' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='none' stroke='#EBEBEB' stroke-opacity='1' stroke-width='0.53' stroke-linejoin='round' stroke-linecap='butt'/>\n    <polyline points='386.09,141.05 386.09,5.48' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_83' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='none' stroke='#EBEBEB' stroke-opacity='1' stroke-width='0.53' stroke-linejoin='round' stroke-linecap='butt'/>\n    <polyline points='427.15,141.05 427.15,5.48' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_84' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='none' stroke='#EBEBEB' stroke-opacity='1' stroke-width='0.53' stroke-linejoin='round' stroke-linecap='butt'/>\n    <polyline points='468.21,141.05 468.21,5.48' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_85' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='none' stroke='#EBEBEB' stroke-opacity='1' stroke-width='0.53' stroke-linejoin='round' stroke-linecap='butt'/>\n    <polyline points='509.27,141.05 509.27,5.48' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_86' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='none' stroke='#EBEBEB' stroke-opacity='1' stroke-width='0.53' stroke-linejoin='round' stroke-linecap='butt'/>\n    <polyline points='326.14,126.00 515.84,126.00' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_87' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='none' stroke='#EBEBEB' stroke-opacity='1' stroke-width='1.07' stroke-linejoin='round' stroke-linecap='butt'/>\n    <polyline points='326.14,95.26 515.84,95.26' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_88' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='none' stroke='#EBEBEB' stroke-opacity='1' stroke-width='1.07' stroke-linejoin='round' stroke-linecap='butt'/>\n    <polyline points='326.14,64.52 515.84,64.52' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_89' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='none' stroke='#EBEBEB' stroke-opacity='1' stroke-width='1.07' stroke-linejoin='round' stroke-linecap='butt'/>\n    <polyline points='326.14,33.78 515.84,33.78' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_90' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='none' stroke='#EBEBEB' stroke-opacity='1' stroke-width='1.07' stroke-linejoin='round' stroke-linecap='butt'/>\n    <polyline points='365.56,141.05 365.56,5.48' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_91' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='none' stroke='#EBEBEB' stroke-opacity='1' stroke-width='1.07' stroke-linejoin='round' stroke-linecap='butt'/>\n    <polyline points='406.62,141.05 406.62,5.48' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_92' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='none' stroke='#EBEBEB' stroke-opacity='1' stroke-width='1.07' stroke-linejoin='round' stroke-linecap='butt'/>\n    <polyline points='447.68,141.05 447.68,5.48' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_93' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='none' stroke='#EBEBEB' stroke-opacity='1' stroke-width='1.07' stroke-linejoin='round' stroke-linecap='butt'/>\n    <polyline points='488.74,141.05 488.74,5.48' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_94' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='none' stroke='#EBEBEB' stroke-opacity='1' stroke-width='1.07' stroke-linejoin='round' stroke-linecap='butt'/>\n    <circle cx='375.00' cy='107.56' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_95' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='#30648F' fill-opacity='1' stroke='#30648F' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Mazda RX4' title='Mazda RX4'/>\n    <circle cx='386.50' cy='107.56' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_96' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='#30648F' fill-opacity='1' stroke='#30648F' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Mazda RX4 Wag' title='Mazda RX4 Wag'/>\n    <circle cx='419.14' cy='123.54' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_97' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='#356E9D' fill-opacity='1' stroke='#356E9D' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Datsun 710' title='Datsun 710'/>\n    <circle cx='436.18' cy='77.43' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_98' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='#316692' fill-opacity='1' stroke='#316692' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Hornet 4 Drive' title='Hornet 4 Drive'/>\n    <circle cx='386.50' cy='46.07' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_99' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='#29577E' fill-opacity='1' stroke='#29577E' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Hornet Sportabout' title='Hornet Sportabout'/>\n    <circle cx='452.19' cy='87.57' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_100' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='#275379' fill-opacity='1' stroke='#275379' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Valiant' title='Valiant'/>\n    <circle cx='362.28' cy='46.07' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_101' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='#1D3F5E' fill-opacity='1' stroke='#1D3F5E' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Duster 360' title='Duster 360'/>\n    <circle cx='447.68' cy='111.64' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_102' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='#3977A9' fill-opacity='1' stroke='#3977A9' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Merc 240D' title='Merc 240D'/>\n    <circle cx='507.21' cy='113.46' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_103' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='#356E9D' fill-opacity='1' stroke='#356E9D' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Merc 230' title='Merc 230'/>\n    <circle cx='412.78' cy='105.22' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_104' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='#2A5982' fill-opacity='1' stroke='#2A5982' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Merc 280' title='Merc 280'/>\n    <circle cx='425.10' cy='105.22' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_105' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='#275277' fill-opacity='1' stroke='#275277' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Merc 280C' title='Merc 280C'/>\n    <circle cx='394.30' cy='71.96' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_106' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='#234A6D' fill-opacity='1' stroke='#234A6D' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Merc 450SE' title='Merc 450SE'/>\n    <circle cx='398.41' cy='71.96' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_107' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='#254F73' fill-opacity='1' stroke='#254F73' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Merc 450SL' title='Merc 450SL'/>\n    <circle cx='406.62' cy='71.96' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_108' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='#204464' fill-opacity='1' stroke='#204464' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Merc 450SLC' title='Merc 450SLC'/>\n    <circle cx='406.21' cy='11.64' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_109' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='#132B43' fill-opacity='1' stroke='#132B43' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Cadillac Fleetwood' title='Cadillac Fleetwood'/>\n    <circle cx='402.92' cy='15.33' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_110' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='#132B43' fill-opacity='1' stroke='#132B43' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Lincoln Continental' title='Lincoln Continental'/>\n    <circle cx='394.71' cy='21.48' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_111' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='#1E4161' fill-opacity='1' stroke='#1E4161' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Chrysler Imperial' title='Chrysler Imperial'/>\n    <circle cx='436.80' cy='132.55' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_112' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='#51A8EA' fill-opacity='1' stroke='#51A8EA' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Fiat 128' title='Fiat 128'/>\n    <circle cx='417.29' cy='133.47' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_113' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='#4B9BDA' fill-opacity='1' stroke='#4B9BDA' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Honda Civic' title='Honda Civic'/>\n    <circle cx='445.62' cy='134.88' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_114' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='#56B1F7' fill-opacity='1' stroke='#56B1F7' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Toyota Corolla' title='Toyota Corolla'/>\n    <circle cx='447.88' cy='119.82' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_115' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='#316693' fill-opacity='1' stroke='#316693' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Toyota Corona' title='Toyota Corona'/>\n    <circle cx='383.42' cy='58.98' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_116' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='#204566' fill-opacity='1' stroke='#204566' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Dodge Challenger' title='Dodge Challenger'/>\n    <circle cx='392.25' cy='63.29' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_117' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='#204464' fill-opacity='1' stroke='#204464' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='AMC Javelin' title='AMC Javelin'/>\n    <circle cx='353.45' cy='49.15' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_118' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='#1A3A57' fill-opacity='1' stroke='#1A3A57' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Camaro Z28' title='Camaro Z28'/>\n    <circle cx='387.12' cy='33.78' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_119' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='#2A5982' fill-opacity='1' stroke='#2A5982' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Pontiac Firebird' title='Pontiac Firebird'/>\n    <circle cx='425.10' cy='132.46' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_120' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='#4288C1' fill-opacity='1' stroke='#4288C1' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Fiat X1-9' title='Fiat X1-9'/>\n    <circle cx='379.93' cy='119.76' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_121' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='#3E81B6' fill-opacity='1' stroke='#3E81B6' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Porsche 914-2' title='Porsche 914-2'/>\n    <circle cx='384.04' cy='127.51' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_122' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='#4B9BDA' fill-opacity='1' stroke='#4B9BDA' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Lotus Europa' title='Lotus Europa'/>\n    <circle cx='334.77' cy='48.84' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_123' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='#214769' fill-opacity='1' stroke='#214769' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Ford Pantera L' title='Ford Pantera L'/>\n    <circle cx='355.30' cy='112.17' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_124' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='#2C5C85' fill-opacity='1' stroke='#2C5C85' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Ferrari Dino' title='Ferrari Dino'/>\n    <circle cx='336.82' cy='64.21' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_125' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='#1F4363' fill-opacity='1' stroke='#1F4363' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Maserati Bora' title='Maserati Bora'/>\n    <circle cx='418.94' cy='119.54' r='3.47pt' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_126' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_9)' fill='#316692' fill-opacity='1' stroke='#316692' stroke-opacity='1' stroke-width='0.71' stroke-linejoin='round' stroke-linecap='round' data-id='Volvo 142E' title='Volvo 142E'/>\n    <defs>\n      <clipPath id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_10'>\n        <rect x='0.00' y='0.00' width='576.00' height='172.80'/>\n      <\/clipPath>\n    <\/defs>\n    <g clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_10)'>\n      <text x='306.53' y='129.16' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_127' font-size='6.60pt' fill='#4D4D4D' fill-opacity='1' font-family='Helvetica'>100<\/text>\n    <\/g>\n    <g clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_10)'>\n      <text x='306.53' y='98.41' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_128' font-size='6.60pt' fill='#4D4D4D' fill-opacity='1' font-family='Helvetica'>200<\/text>\n    <\/g>\n    <g clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_10)'>\n      <text x='306.53' y='67.67' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_129' font-size='6.60pt' fill='#4D4D4D' fill-opacity='1' font-family='Helvetica'>300<\/text>\n    <\/g>\n    <g clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_10)'>\n      <text x='306.53' y='36.93' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_130' font-size='6.60pt' fill='#4D4D4D' fill-opacity='1' font-family='Helvetica'>400<\/text>\n    <\/g>\n    <g clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_10)'>\n      <text x='360.67' y='152.29' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_131' font-size='6.60pt' fill='#4D4D4D' fill-opacity='1' font-family='Helvetica'>16<\/text>\n    <\/g>\n    <g clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_10)'>\n      <text x='401.72' y='152.29' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_132' font-size='6.60pt' fill='#4D4D4D' fill-opacity='1' font-family='Helvetica'>18<\/text>\n    <\/g>\n    <g clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_10)'>\n      <text x='442.78' y='152.29' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_133' font-size='6.60pt' fill='#4D4D4D' fill-opacity='1' font-family='Helvetica'>20<\/text>\n    <\/g>\n    <g clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_10)'>\n      <text x='483.84' y='152.29' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_134' font-size='6.60pt' fill='#4D4D4D' fill-opacity='1' font-family='Helvetica'>22<\/text>\n    <\/g>\n    <g clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_10)'>\n      <text x='409.37' y='164.90' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_135' font-size='8.25pt' font-family='Helvetica'>qsec<\/text>\n    <\/g>\n    <g clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_10)'>\n      <text transform='translate(301.37,83.35) rotate(-90.00)' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_136' font-size='8.25pt' font-family='Helvetica'>disp<\/text>\n    <\/g>\n    <image x='532.27' y='37.96' width='17.28' height='86.40' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_137' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_10)' xlink:href='data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAEYAAAFaCAYAAACjTSvQAAAABmJLR0QA/wD/AP+gvaeTAAAECUlEQVR4nO3dsZEjRwyG0ekrXh6KSskpCsV2BsdQiTJuHdX+37pc470IWF1oAI3pGZ4//36+Lv7nn8f1x+O6rMtn53pYl+G+rsfLygznelwvC7P8ePcP+K5ETJBjpttWKsp10OAFyXc51/WwLJuIWY4cE45yXZTroPOdnK6THBNEzGKCt53rqSoVOSbofIPkG5yuh3OJmCT5BhGzHBGTdL6T2w6b0WYxj0kavOG+lOtwyzFFHxOU6+WpwUuSb5BjgogJyvXktkN62EmbrTQ5XSc5JjxeIuYzw/Am+U5eskiq0uLKfBMxQfINRpuLW5vbcVYq5jHJwgRbKUi+w8etzXf/jO9JgzfdckxRlYKFCWa+i5lvk3wX93zL8ey6iJjJ2CFJvkHEBA3ecN+Sb3jaSkXyDSImeKgfbKWgKgVPCYLnSkGOWY7TdbIwwVZazlGui5lvEDHTrcErIiYo18HMdzi3iEkavCD5BqPNwUdIk7NSMI9JjgTBVgrGDovLicW7BJsL0M3pOoiYIPkGDV4QMUGDN9xPEROMHYKxQ1KVgqtmwSEyyDFBxEy+nJiMHYKICTrfoMFbPCVoku/iXYJmK00iJqlKwdhhcNWsuOfbRMxk7JB0vsO55Jik8w0avCBiguQ7OUQmW2k6ku/knm+zlYKqtNhKzdhh8q3NJMcMT6PNplwHnW8QMcG3HYI+JthKk7FD0scEW2k6jgTFVgrK9XLcdkhyzGK02ZTrIGKCqhRETFCVguQ7GTtsHp80W2ny78XT77dPRMxkYYKqFETMZFCVVKVBVfqCscNitNmMHRYR0yTfyftKSVWaRExSlYb7UpWSHLP4Zni5na6LHBNspSBigqoUREzQ+QbJd3KITJ5EBltpcg1k883wZmGC5LvYSsVnUpKqFGylYOywuBnefH5/+Pj8/rt/xvdkKwVVKdhKQcRMvgYyHTPfpvMNIiZYmKAqTbeqNLky31SlRcQ0OWZwAfoLFiboY4KqtNxO10lVmkRMkmOCiAkWJuhjJvOYZCsFVSmImOB+TBAxwW2HxQXopiotx+k66XwnEZMsTFCVgj4miJigKg3n9qHjpPMNIiZYmGBQNXiR6wv6mCBigoiZjuS7mcckOWbxlKCJmEXENN+PCSJmelqYoo8JqlKwlYKqNNy3iEmSb/D4JIiYYGGCZ9eTCV5SrqejKpWHZdlEzHJcHEoWJqhKwaBqOS4OJRET5JigjwnKdbAwQVUazu/T9bt/xjfk/66LiEkiJqhKwQRv+HjJwtJ8ZoKXREwQMcGRINhKwVYKFibYSos/bGiq0mTssHlfqbhqlixMUK6DQdXwvETM5h/Sm3I93Rq8YisFZ6VgKwXJNzxe1+uvd/+I7+bfHz9//Qd9yLaxr3R2nQAAAABJRU5ErkJggg==' xmlns:xlink='http://www.w3.org/1999/xlink'/>\n    <g clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_10)'>\n      <text x='555.14' y='110.52' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_138' font-size='6.60pt' font-family='Helvetica'>15<\/text>\n    <\/g>\n    <g clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_10)'>\n      <text x='555.14' y='92.20' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_139' font-size='6.60pt' font-family='Helvetica'>20<\/text>\n    <\/g>\n    <g clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_10)'>\n      <text x='555.14' y='73.87' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_140' font-size='6.60pt' font-family='Helvetica'>25<\/text>\n    <\/g>\n    <g clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_10)'>\n      <text x='555.14' y='55.55' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_141' font-size='6.60pt' font-family='Helvetica'>30<\/text>\n    <\/g>\n    <g clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_10)'>\n      <text x='532.27' y='31.27' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_142' font-size='8.25pt' font-family='Helvetica'>mpg<\/text>\n    <\/g>\n    <line x1='532.27' y1='107.36' x2='535.73' y2='107.36' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_143' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_10)' stroke='#FFFFFF' stroke-opacity='1' stroke-width='0.38' stroke-linejoin='round' stroke-linecap='butt' fill='#FFFFFF' fill-opacity='1'/>\n    <line x1='532.27' y1='89.04' x2='535.73' y2='89.04' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_144' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_10)' stroke='#FFFFFF' stroke-opacity='1' stroke-width='0.38' stroke-linejoin='round' stroke-linecap='butt' fill='#FFFFFF' fill-opacity='1'/>\n    <line x1='532.27' y1='70.72' x2='535.73' y2='70.72' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_145' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_10)' stroke='#FFFFFF' stroke-opacity='1' stroke-width='0.38' stroke-linejoin='round' stroke-linecap='butt' fill='#FFFFFF' fill-opacity='1'/>\n    <line x1='532.27' y1='52.40' x2='535.73' y2='52.40' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_146' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_10)' stroke='#FFFFFF' stroke-opacity='1' stroke-width='0.38' stroke-linejoin='round' stroke-linecap='butt' fill='#FFFFFF' fill-opacity='1'/>\n    <line x1='546.10' y1='107.36' x2='549.55' y2='107.36' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_147' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_10)' stroke='#FFFFFF' stroke-opacity='1' stroke-width='0.38' stroke-linejoin='round' stroke-linecap='butt' fill='#FFFFFF' fill-opacity='1'/>\n    <line x1='546.10' y1='89.04' x2='549.55' y2='89.04' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_148' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_10)' stroke='#FFFFFF' stroke-opacity='1' stroke-width='0.38' stroke-linejoin='round' stroke-linecap='butt' fill='#FFFFFF' fill-opacity='1'/>\n    <line x1='546.10' y1='70.72' x2='549.55' y2='70.72' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_149' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_10)' stroke='#FFFFFF' stroke-opacity='1' stroke-width='0.38' stroke-linejoin='round' stroke-linecap='butt' fill='#FFFFFF' fill-opacity='1'/>\n    <line x1='546.10' y1='52.40' x2='549.55' y2='52.40' id='svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_el_150' clip-path='url(#svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d_cl_10)' stroke='#FFFFFF' stroke-opacity='1' stroke-width='0.38' stroke-linejoin='round' stroke-linecap='butt' fill='#FFFFFF' fill-opacity='1'/>\n  <\/g>\n<\/svg>","js":null,"uid":"svg_c19b4a2d-919d-4fb7-9b6f-87744da1da6d","ratio":3.33333333333333,"settings":{"tooltip":{"css":".tooltip_SVGID_ { padding:5px;background:black;color:white;border-radius:2px 2px 2px 2px }","offx":10,"offy":0,"use_cursor_pos":true,"opacity":0.9,"usefill":false,"usestroke":false,"delay":{"over":200,"out":500}},"hover":{"css":".hover_SVGID_ { fill:orange;stroke:gray; }","reactive":false},"hoverkey":{"css":".hover_key_SVGID_ { stroke:red; }","reactive":false},"hovertheme":{"css":".hover_theme_SVGID_ { fill:green; }","reactive":false},"hoverinv":{"css":""},"zoom":{"min":1,"max":1},"capture":{"css":".selected_SVGID_ { fill:red;stroke:gray; }","type":"multiple","only_shiny":true,"selected":[]},"capturekey":{"css":".selected_key_SVGID_ { stroke:gray; }","type":"single","only_shiny":true,"selected":[]},"capturetheme":{"css":".selected_theme_SVGID_ { stroke:gray; }","type":"single","only_shiny":true,"selected":[]},"toolbar":{"position":"topright","saveaspng":true,"pngname":"diagram"},"sizing":{"rescale":true,"width":1}}},"evals":[],"jsHooks":[]}</script>
]
]
]

---
### Format your code with [`styler` <svg viewBox="0 0 512 512" style="position:relative;display:inline-block;top:.1em;fill:#FE6B00;height:0.5em;margin-bottom:8px;" xmlns="http://www.w3.org/2000/svg">  <path d="M326.612 185.391c59.747 59.809 58.927 155.698.36 214.59-.11.12-.24.25-.36.37l-67.2 67.2c-59.27 59.27-155.699 59.262-214.96 0-59.27-59.26-59.27-155.7 0-214.96l37.106-37.106c9.84-9.84 26.786-3.3 27.294 10.606.648 17.722 3.826 35.527 9.69 52.721 1.986 5.822.567 12.262-3.783 16.612l-13.087 13.087c-28.026 28.026-28.905 73.66-1.155 101.96 28.024 28.579 74.086 28.749 102.325.51l67.2-67.19c28.191-28.191 28.073-73.757 0-101.83-3.701-3.694-7.429-6.564-10.341-8.569a16.037 16.037 0 0 1-6.947-12.606c-.396-10.567 3.348-21.456 11.698-29.806l21.054-21.055c5.521-5.521 14.182-6.199 20.584-1.731a152.482 152.482 0 0 1 20.522 17.197zM467.547 44.449c-59.261-59.262-155.69-59.27-214.96 0l-67.2 67.2c-.12.12-.25.25-.36.37-58.566 58.892-59.387 154.781.36 214.59a152.454 152.454 0 0 0 20.521 17.196c6.402 4.468 15.064 3.789 20.584-1.731l21.054-21.055c8.35-8.35 12.094-19.239 11.698-29.806a16.037 16.037 0 0 0-6.947-12.606c-2.912-2.005-6.64-4.875-10.341-8.569-28.073-28.073-28.191-73.639 0-101.83l67.2-67.19c28.239-28.239 74.3-28.069 102.325.51 27.75 28.3 26.872 73.934-1.155 101.96l-13.087 13.087c-4.35 4.35-5.769 10.79-3.783 16.612 5.864 17.194 9.042 34.999 9.69 52.721.509 13.906 17.454 20.446 27.294 10.606l37.106-37.106c59.271-59.259 59.271-155.699.001-214.959z"></path></svg>](https://styler.r-lib.org/)

.w-75.h-center[
![](images/styler.gif)
]

---
### Credits <svg viewBox="0 0 512 512" style="position:relative;display:inline-block;top:.1em;fill:#1DA1F2;height:0.5em;margin-bottom:8px;" xmlns="http://www.w3.org/2000/svg">  <path d="M459.37 151.716c.325 4.548.325 9.097.325 13.645 0 138.72-105.583 298.558-298.558 298.558-59.452 0-114.68-17.219-161.137-47.106 8.447.974 16.568 1.299 25.34 1.299 49.055 0 94.213-16.568 130.274-44.832-46.132-.975-84.792-31.188-98.112-72.772 6.498.974 12.995 1.624 19.818 1.624 9.421 0 18.843-1.3 27.614-3.573-48.081-9.747-84.143-51.98-84.143-102.985v-1.299c13.969 7.797 30.214 12.67 47.431 13.319-28.264-18.843-46.781-51.005-46.781-87.391 0-19.492 5.197-37.36 14.294-52.954 51.655 63.675 129.3 105.258 216.365 109.807-1.624-7.797-2.599-15.918-2.599-24.04 0-57.828 46.782-104.934 104.934-104.934 30.213 0 57.502 12.67 76.67 33.137 23.715-4.548 46.456-13.32 66.599-25.34-7.798 24.366-24.366 44.833-46.132 57.827 21.117-2.273 41.584-8.122 60.426-16.243-14.292 20.791-32.161 39.308-52.628 54.253z"></path></svg>

.pull-left[
[@jimhester_](https://twitter.com/jimhester_) (`pak`) <br>
[@GaborCsardi](https://twitter.com/GaborCsardi) (`pak`, `asciicast`)<br>
[@dataandme](https://twitter.com/dataandme) (`asciicast`) <br>
[@grrrck](https://twitter.com/grrrck/) (`ermoji`, `xaringanExtra`) <br>
[@mitchoharawild](https://twitter.com/mitchoharawild) (`icon`) <br>
[@hadleywickham](https://twitter.com/hadleywickham) (`waldo`) <br>
[@thomasp85](https://twitter.com/thomasp85) (`ragg`) 
]
.pull-right[
[@samfirke](https://twitter.com/samfirke) (`janitor`) <br>
[@statistishdan](https://twitter.com/statistishdan) (`gtsummary`) <br>
[@ClausWilke](https://twitter.com/ClausWilke) (`ggtext`) <br>
[@MilesMcBain](https://twitter.com/MilesMcBain) (`datapasta`) <br>
[@DavidGohel](https://twitter.com/DavidGohel) (`ggiraph`) <br>
[@krlmlr](https://twitter.com/krlmlr) (`styler`) <br>
[@lorenzwalthert](https://twitter.com/lorenzwalthert) (`styler`)
]

.center[
I'm [@travisgerke](https://twitter.com/travisgerke). See you there <svg viewBox="0 0 496 512" style="position:relative;display:inline-block;top:.1em;fill:#1DA1F2;height:0.75em;margin-bottom:8px;" xmlns="http://www.w3.org/2000/svg">  <path d="M248 8C111 8 0 119 0 256s111 248 248 248 248-111 248-248S385 8 248 8zm0 448c-110.3 0-200-89.7-200-200S137.7 56 248 56s200 89.7 200 200-89.7 200-200 200zm-80-216c17.7 0 32-14.3 32-32s-14.3-32-32-32-32 14.3-32 32 14.3 32 32 32zm160 0c17.7 0 32-14.3 32-32s-14.3-32-32-32-32 14.3-32 32 14.3 32 32 32zm4 72.6c-20.8 25-51.5 39.4-84 39.4s-63.2-14.3-84-39.4c-8.5-10.2-23.7-11.5-33.8-3.1-10.2 8.5-11.5 23.6-3.1 33.8 30 36 74.1 56.6 120.9 56.6s90.9-20.6 120.9-56.6c8.5-10.2 7.1-25.3-3.1-33.8-10.1-8.4-25.3-7.1-33.8 3.1z"></path></svg>
]