purrr

    7熱度

    2回答

    我有一個從REST調用收到的嵌套列表。響應包括來自底層關係數據庫的嵌套的一組列表。我想將這個列表展平以簡化分析。我試圖遵循purrr tutorial中的指導原則,但我無法實現。 我的簡化輸入 hist1 <- list(field="type", from_string ="issue", to_string="bug") hist2 <- list(field="status", from_

    1熱度

    1回答

    我懷疑這是一個處理NSE的問題。但爲什麼這兩種方法不起作用,我怎麼才能讓他們工作。 temp1 <- function(x){ iris %>% ggplot(aes(Sepal.Length, Sepal.Width)) + geom_point() + facet_wrap(as.formula(paste("~", x))) } walk('Spe

    0熱度

    1回答

    我試圖找到分組變量中所有變量的關聯。具體而言,我試圖用purrr來做到這一點,以取代我一直在使用的循環。但是我遇到了一些困難,部分原因是我想在使用感興趣的矢量時使用兩個函數。例如: ## load packages library(corrr) library(dplyr) library(purrr) 沒有任何的團體能正常工作(這就是想什麼我做底座): iris %>% se

    1熱度

    2回答

    我想將一列col名稱傳遞給purrr :: map公式。 這裏是我的問題的reprex: library(dplyr) library(purrr) #Make a toy df of w vars of 2 levels cars <- mtcars %>% select(mpg, cyl, carb) %>% filter(cyl == 4 |

    3熱度

    3回答

    我知道我的問題有點含糊,所以我有一個我想要做的例子。 input <- c('I go to school') #Output '"I " * phantom("go to school")' 'phantom("I ") * "go" * phantom("to school")' 'phantom("I go ") * "to" * phantom("school")' 'phan

    1熱度

    1回答

    在這個問題上更小: Sum if the date difference is smaller than a value 現在我必須計算出以前12H感謝@Davis沃恩在發生事件數的可能性: df <- tribble( ~fechayhora, ~id, ~tipo, "2017-03-17 08:03:00", "A", "APF", "2017-05-17 1

    0熱度

    1回答

    我有一個R數據框,它有兩列colA和colB以及一個合適的glm對象。 現在,我可以使用預測數據框和glm對象來預測結果。然而,我也想預測colB + 0.1,colB + 0.2,colB + 0.3等的結果。 我正在考慮用map(purrr包)來做這件事,但我不知道如何。什麼到目前爲止,我已經試過是創造一個向量: library(tibble) range <- data_frame(col

    1熱度

    5回答

    例 假設在著名iris數據集選擇性地移除列值,我已確定,當Sepal.Length> 5.0,還有在我的測定裝置的誤差。 在這個人爲的例子中,我想保留Sepal.Length列的原始值,但如果該行的Sepal.Length> 5.0,則將其餘列更改爲NA。 作爲一個例子,這樣的: Sepal.Length Sepal.Width Petal.Length Petal.Width Species

    1熱度

    1回答

    我認爲這 kmeans(x = matrix(1:50, 5), centers = 2, iter.max = 10) 可以寫成: matrix(1:50, 5) %>% map(~kmeans(x = .x, centers = 2, iter.max = 10)) Error in sample.int(m, k) : cannot take a sample large

    0熱度

    1回答

    我試圖從循環轉換爲purrr的清晰度和(經常)更好的處理速度 我有一個可變數目的Rdata文件,說「AB.Rdata」,「CD.Rdata」和「YZ.Rdata」 我創建了一個Rdata名稱的向量,x.rdata 我想使用purrr::map來加載每個元素矢量 以下是我的打算,但我懷疑是不是很好的做法 invisible(purrr::map(x.rdata, load, envir = .Glo