purrr

I'm trying to solve the following problem in R: I have a dataframe with two variables (number of successes, and number of total trials). # A tibble: 4 x 2 Success N <dbl> <dbl> 1 28. 40. 2 12. 40. 3 22. 40. 4 8. 40. I would like to perform a prop.test or binom.test on each row and add the resulting list to the dataframe (or certain elements of it, like the p-value and CIs). Ideally, I would like to add a third column with the p-values and the CI-range. My attempts so far were painly unsuccessful. Here is a minimal coding example: Success <- c( 38, 12, 27, 9) N <- c( 50, 50, 50, 50) df <- as

I have a log file that look like this . I'm trying to parse the JSON in the Message column by: library(readr) library(jsonlite) df <- read_csv("log_file_from_above.csv") fromJSON(as.character(df$Message)) But, I'm hitting the following error: Error: parse error: trailing garbage "isEmailConfirmed": false } { "id": -1, "firstName": (right here) ------^ How can I get rid of the "trailing garbage"? fromJSON() isn't "apply"ing against the character vector, it's trying to convert it all to a data frame. You can try purrr::map(df$Message, jsonlite::fromJSON) what @Abdou provided or jsonlite::stream

I understand how to use map to iterate over arguments in a df and create a new list column. For example, params <- expand.grid(param_a = c(2, 4, 6) ,param_b = c(3, 6, 9) ,param_c = c(50, 100) ,param_d = c(1, 0) ) df.preprocessed <- dplyr::as.tbl(params) %>% dplyr::mutate(test_var = purrr::map(param_a, function(x){ rep(5, x) } )) However, how do I use the analogous syntax with pmap in the event that I want to specify more than 2 parameters? df.preprocessed <- dplyr::as.tbl(params) %>% dplyr::mutate(test_var = purrr::pmap(list(x = param_a ,y = param_b ,z = param_c ,u = param_d), function(x, y){

I'm trying to tighten up a %>% piped workflow where I need to apply the same function to several columns but with one argument changed each time. I feel like purrr 's map or invoke functions should help, but I can't wrap my head around it. My data frame has columns for life expectancy, poverty rate, and median household income. I can pass all these column names to vars in mutate_at , use round as the function to apply to each, and optionally supply a digits argument. But I can't figure out a way, if one exists, to pass different values for digits associated with each column. I'd like life

What's the easiest way to add titles to each ggplot that I've created below using the map function? I want the titles to reflect the name of each data frame - i.e. 4, 6, 8 (cylinders). Thanks :) mtcars_split <- mtcars %>% split(mtcars$cyl) plots <- mtcars_split %>% map(~ ggplot(data=.,mapping = aes(y=mpg,x=wt)) + geom_jitter() # + ggtitle(....)) plots Use map2 with names . plots <- map2( mtcars_split, names(mtcars_split), ~ggplot(data = .x, mapping = aes(y = mpg, x = wt)) + geom_jitter() + ggtitle(.y) ) Edit: alistaire pointed out this is the same as imap plots <- imap( mtcars_split, ~ggplot

Representative sample data (list of lists): l <- list(structure(list(a = -1.54676469632688, b = "s", c = "T", d = structure(list(id = 5L, label = "Utah", link = "Asia/Anadyr", score = -0.21104594634643), .Names = c("id", "label", "link", "score")), e = 49.1279871269422), .Names = c("a", "b", "c", "d", "e")), structure(list(a = -0.934821052832427, b = "k", c = "T", d = list(structure(list(id = 8L, label = "South Carolina", link = "Pacific/Wallis", score = 0.526540892113734, externalId = -6.74354377676955), .Names = c("id", "label", "link", "score", "externalId")), structure(list( id = 9L, label