From 1fe7794093a767bc38c1f3d4f272e0a3f74100dd Mon Sep 17 00:00:00 2001 From: Paul Date: Tue, 20 Sep 2016 16:59:28 -0500 Subject: [PATCH] Correct a typo --- vignettes/lazyeval.Rmd | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/vignettes/lazyeval.Rmd b/vignettes/lazyeval.Rmd index c672fe3..88aa99b 100644 --- a/vignettes/lazyeval.Rmd +++ b/vignettes/lazyeval.Rmd @@ -362,7 +362,7 @@ To illustrate these challenges, I will implement a `sieve()` function that works 1. It always returns a data frame. -The implementation of `sieve()` is straightforward. First we use `f_eval()` to perform NSS. Then we then check that we have a logical vector, replace `NA`s with `FALSE`, and subset with `[`. +The implementation of `sieve()` is straightforward. First we use `f_eval()` to perform NSS. Then we check that we have a logical vector, replace `NA`s with `FALSE`, and subset with `[`. ```{R} sieve <- function(df, condition) {