For the purposes of this question, let’s split the mtcars dataset into several smaller ones, for example based on carb and store them all in a list mtlist <- group_split(mtcars, carb) Let’s now say that, only on one of these datasets, I am operating some pipeline and in the end I want to select a… Read More R – how to use the exposition pipe %$% in purrr::map
I have a simple question that has nonetheless stumped me. I am trying to extract specific elements from a list of website headers for a set of given URLs. I have obtained the website headers using the httr package. Using magrittr::extract, I am able to successfully extract one element from the header for each URL… Read More Extract elements from list of httr headers
How do you pipe an object into a specific place in an apply call, that isn’t the first input? The magrittr dot placeholder does not seem to work for this. dat <- 1:10 locs <- list(c(1, 2), c(3, 4), c(5, 6)) foo <- function(x, y, z) { out <- mean(c(x[y], x[z])) return(out) } # works… Read More `magrittr` pipe into apply
How I am using wrongly label_date_short from scales package? library(tidyverse) library(scales) date_taille <- tibble( Taille = rep(c("taille_hiver", "taille_ete"), times = 2), Date_taille = c("2016-08-01", "2016-02-01", "2018-08-01", "2018-02-01") %>% as.Date() ) ggplot(date_taille) + aes(x = Date_taille, y = Taille) + geom_point() + scale_x_date(date_breaks = "month", date_labels = label_date_short()) #or label_date() #> Error in format(x, format =… Read More How to use `label_date_short`?
wondering if there was an efficient and terse/concise data.table solution to the following problem. Please suppose that I have the following data.table: library(data.table) DT <- data.table(store = c("A", "A", "A", "A", "B", "B", "B", "B"), time = c(1,2,3,4,1,2,3,4), treat_time = c(0,0,1,0, 0,1,0,0)) Here, treat_time is the time period where the store receives a treatment. Note… Read More Relative row index based on a variable value in R
I have a named numeric vector, where I am trying to divide each element by the sum of all elements. Then I want to use the signif function to round to the significant figure. This is easy enough doing it "old school", by computing the division and storing the variable, then subsequently using the stored… Read More Understanding the correct use of magrittr pipe `%>%` syntax
I am very new to the pipe %>% operator. Can someone tell me if (and if yes, how) I can turn this into one or maybe two pipe commands? b2m <- b$bdi.2m-b$bdi.pre b2m %>% as.vector(mode = "any") b2m <- b2m[!is.na(b2m)] b2m <- b2m^2 b2m <- sum(b2m)/length(b2m) b2m When I tried to resume the pipe after… Read More How to turn many commands into one pipe command in r?