From b7c15ddf071019da67e73dc686794d4fe75c63ac Mon Sep 17 00:00:00 2001
From: Michael Forster <mic.forst@gmail.com>
Date: Tue, 29 Jun 2021 13:04:43 +0200
Subject: [PATCH] Fixed error in Exercise 19.3.1
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

The character vector in `f1´ is `string`and not ´nchar`.
---
 functions.Rmd | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/functions.Rmd b/functions.Rmd
index 5a5dbdec..4b64c7aa 100644
--- a/functions.Rmd
+++ b/functions.Rmd
@@ -347,7 +347,7 @@ f3 <- function(x, y) {
 
 <div class="answer">
 
-The function `f1` tests whether each element of the character vector `nchar`
+The function `f1` tests whether each element of the character vector `string`
 starts with the string `prefix`. For example,
 ```{r}
 f1(c("abc", "abcde", "ad"), "ab")