add header to compile all together

Chapter_3.Rmd

@@ -2,6 +2,8 @@
 title: "Chapter 3"
 ---
 
+# Chapter 3
+
 Figure 3.5
 
 Pueblo lineage 
@@ -31,7 +33,6 @@ for (g in 1:gens) {
   p_after_sel <- (1 + s) * sel[g] / ((1 + s) * sel[g] + (1 - sel[g]))
   sel[g + 1] <- rbinom(1, N, p_after_sel) / N
 }
-aá
 matplot(
   cbind(0:gens, 0:gens),
   cbind(drift, sel),
@@ -43,4 +44,3 @@ legend("topright", c("drift", "selected"), col = c("grey50", "firebrick"), lwd =
 ```
 
 We will see later how this can be adapte to represent change in frequency of cultural traits under different cultrural transmission regimes
-

Chapter_4.Rmd

@@ -1,3 +1,5 @@
 ---
 title: "Chapter 4"
 ---
+
+# Chapter 4

Chapter_5.Rmd

@@ -2,6 +2,8 @@
 title: "Chapter 5"
 ---
 
+# Chapter 5
+
 Figure 5.3
 ```{r}
 ```
@@ -16,4 +18,3 @@ Figure 5.9
 Figure 5.11
 ```{r}
 ```
-

Chapter_6.Rmd

@@ -2,6 +2,8 @@
 title: "Chapter 6"
 ---
 
+# Chapter 6
+
 CV transmission etc..
 
 Figure 6.4
@@ -9,4 +11,3 @@ Figure 6.4
 ```{r}
 plot(1,1)
 ```
-

Chapter_9.Rmd

@@ -2,7 +2,8 @@
 title: "Chapter 9"
 ---
 
+# Chapter 9
+
 Figure 9.13
 ```{r}
 ```
-