Use bookdown::bs4_book

DESCRIPTION

@@ -27,3 +27,12 @@ Imports:
   sessioninfo,
   tidyverse,
   viridis
+Suggests:
+    bookdown,
+    bslib,
+    downlit,
+    jsonlite,
+    xml2
+Remotes:
+    rstudio/bookdown,
+    rstudio/bslib

_bookdown.yml

@@ -1,3 +1,4 @@
+delete_merged_file: true
 new_session: yes
 
 rmd_files: [

_output.yaml

@@ -1,3 +1,10 @@
+bookdown::bs4_book:
+  theme:
+    primary: "#637238"
+  repo: https://github.com/hadley/r4ds
+  includes:
+    in_header: [ga_script.html]
+
 bookdown::gitbook:
   includes:
     in_header: [ga_script.html]

index.rmd

@@ -1,7 +1,7 @@
 ---
 knit: "bookdown::render_book"
 title: "R for Data Science"
-author: ["Garrett Grolemund", "Hadley Wickham"]
+author: "Hadley Wickham and Garrett Grolemund"
 description: "This book will teach you how to do data science with R: You'll learn how to get your data into R, get it into the most useful structure, transform it, visualise it and model it. In this book, you will find a practicum of skills for data science. Just as a chemist learns how to clean test tubes and stock a lab, you'll learn how to clean data and draw plots---and many other things besides. These are the skills that allow data science to happen, and here you will find the best practices for doing each of these things with R. You'll learn how to use the grammar of graphics, literate programming, and reproducible research to save time. You'll also learn how to manage cognitive resources to facilitate discoveries when wrangling, visualising, and exploring data."
 url: 'https\://r4ds.had.co.nz/'
 github-repo: hadley/r4ds
@@ -13,7 +13,7 @@ documentclass: book
 
 # Welcome {-} 
 
-<a href="http://amzn.to/2aHLAQ1"><img src="cover.png" width="250" height="375" alt="Cover image" align="right" style="margin: 0 1em 0 1em" /></a> This is the website for __"R for Data Science"__. This book will teach you how to do data science with R: You'll learn how to get your data into R, get it into the most useful structure, transform it, visualise it and model it. In this book, you will find a practicum of skills for data science. Just as a chemist learns how to clean test tubes and stock a lab, you'll learn how to clean data and draw plots---and many other things besides. These are the skills that allow data science to happen, and here you will find the best practices for doing each of these things with R. You'll learn how to use the grammar of graphics, literate programming, and reproducible research to save time. You'll also learn how to manage cognitive resources to facilitate discoveries when wrangling, visualising, and exploring data. 
+<a href="http://amzn.to/2aHLAQ1"><img src="cover.png" width="250" height="375" alt="Buy from amazon" class="cover" /></a> This is the website for __"R for Data Science"__. This book will teach you how to do data science with R: You'll learn how to get your data into R, get it into the most useful structure, transform it, visualise it and model it. In this book, you will find a practicum of skills for data science. Just as a chemist learns how to clean test tubes and stock a lab, you'll learn how to clean data and draw plots---and many other things besides. These are the skills that allow data science to happen, and here you will find the best practices for doing each of these things with R. You'll learn how to use the grammar of graphics, literate programming, and reproducible research to save time. You'll also learn how to manage cognitive resources to facilitate discoveries when wrangling, visualising, and exploring data. 
 
 This website is (and will always be) __free to use__, and is licensed under the [Creative Commons Attribution-NonCommercial-NoDerivs 3.0](http://creativecommons.org/licenses/by-nc-nd/3.0/us/) License.  If you'd like a __physical copy__ of the book, you can order it from [amazon](http://amzn.to/2aHLAQ1); it was published by O'Reilly in January 2017. If you'd like to __give back__
 please make a donation to [Kākāpō Recovery](https://www.doc.govt.nz/kakapo-donate): the [kākāpō](https://www.youtube.com/watch?v=9T1vfsHYiKY) (which appears on the cover of R4DS) is a critically endangered native NZ parrot; there are only 213 left.