From c9b939b096c2a44aa2116cbab22f1a75e1b9a5ef Mon Sep 17 00:00:00 2001 From: hyginn Date: Tue, 5 Oct 2021 23:48:34 +0200 Subject: [PATCH] Typos --- RPR-Pipe.R | 18 +++++++++--------- 1 file changed, 9 insertions(+), 9 deletions(-) diff --git a/RPR-Pipe.R b/RPR-Pipe.R index 9f6ff61..517da92 100644 --- a/RPR-Pipe.R +++ b/RPR-Pipe.R @@ -50,19 +50,19 @@ # On the unix command line, pipes were used from the very beginning, implemented # with the "|" pipe character. # -# In R, the magrittr package provided the %>% operator, and recently the %|>% +# In R, the magrittr package provided the %>% operator, and recently the |> # operator has been introduced into base R. # # However there are alternatives: intermediate assignment, and nested functions -# that have always existed in bas R anyway. +# that have always existed in base R anyway. # # Let us look at an example. In writing this, I found out that virtually -# ALL non-trivial examples I cvame up with don't translate well into this idiom +# ALL non-trivial examples I came up with don't translate well into this idiom # at all. It is actually quite limited to simple filtering operations on -# data. A more intersting example might be added in the future, let me know if +# data. A more interesting example might be added in the future, let me know if # you have a good idea. # -# A somwhat contrived example is to soart a list of files by the +# A somewhat contrived example is to sort a list of files by the # length of the file names: myFiles <- list.files(pattern = "\\.R$") @@ -88,7 +88,7 @@ if (! requireNamespace("magrittr", quietly = TRUE)) { library(magrittr) -nchar(myFiles) %>% order %>% myFiles[.] +myFiles %>% nchar %>% order %>% myFiles[.] # = 4 Base R Pipe ========================================================= @@ -97,12 +97,12 @@ nchar(myFiles) %>% order %>% myFiles[.] # into the language is very rare. # # Unfortunately it won't (yet) work with the '[' function, so we need to write -# an intermediate fucntion for this example +# an intermediate function for this example extract <- function(x, v) { return(v[x]) } -nchar(myFiles) |> order() |> extract(myFiles) +myFiles |> nchar() |> order() |> extract(myFiles) # = 5 Intermediate Assignment ============================================= @@ -114,7 +114,7 @@ nchar(myFiles) |> order() |> extract(myFiles) # replacing it with the pipe makes things much better. My preferred idiom is # to use intermediate assignments. Only then is it convenient to examine # the code step by step and validate every single step. And that is the most -# important objective at all: no code is good if it doe not compute +# important objective at all: no code is good if it does not compute # correctly.