tidyverse

    2熱度

    3回答

    我想改變這樣的列表tibble: l <- list(x = c(1, 2), y = c(3, 4, 5)) 到這樣的tibble: Name Value x 1 x 2 y 3 y 4 y 5

    1熱度

    2回答

    我有一個數據集,每天有多個集合每天。我想創建一個我可以用來捆綁'日子'的領域,但我想在午間而不是午夜分手。不幸的是,當我做「中午拆分」時,日期值將以整數形式出現,而不是日期值。 一些示例代碼: library(tidyverse) x <- as.POSIXct(Sys.time()) y <- as.tibble(x) #midnights comes through correctl

    1熱度

    1回答

    我試圖讓purrr::pmap工作在一個公式上,我錯過了一些明顯的東西。 library(plyr) library(tidyverse) library(broom) 這僅僅是一個容器,在那裏我會保持獨立數據的履帶框架 d1 <- expand.grid(vs = c(0, 1), am = c(0, 1)) d1$mods <- 1:4 %>% map(

    1熱度

    2回答

    如何在使用擴散函數時保持數字的等級時展開? library(tidyverse) data.frame(time = paste0("t_", 1:100)) %>% rowwise() %>% mutate(rnd = sample(1:100, size=1)) %>% spread(time, rnd) 上面顯示的代碼的執行結果的列名是t_1, t_11

    1熱度

    1回答

    我想在mutate和總結之間做些事情。 我想計算關於組的彙總統計信息,但將原始數據保留爲嵌套對象。我認爲這是一個非常通用的任務,但我無法弄清楚如何在不調用連接以及分組兩次的情況下執行操作。下面的示例代碼: mtcars %>% group_by(cyl) %>% nest() %>% left_join(mtcars %>% group_by(cyl)

    11熱度

    6回答

    我有一個玩具的例子。 什麼是總結通過X分組Y的兩個連續行 library(tibble) l = list(x = c("a", "b", "a", "b", "a", "b"), y = c(1, 4, 3, 3, 7, 0)) df <- as_tibble(l) df #> # A tibble: 6 x 2 #> x y #> <chr> <dbl> #> 1 a

    2熱度

    2回答

    我有一個數據幀,看起來像這樣一個共同occurence矩陣: id val 1 a 1 b 2 a 2 c 2 d 3 a 3 a 把每一行作爲一個標籤,val的,這是給一些觀察一個id 。 我最終想要得到的就是一個「共同occurence」矩陣看起來像這樣的東西在那裏,我得到的每個字母出現的次數相互字母相同的ID內的計數: a b c d a 1 1 1 1 b 1 0 0

    0熱度

    1回答

    我想要使用tidyverse(理想情況下)獲得數據框唯一字符串列的所有唯一成對組合。 這裏是一個虛擬的例子: library(tidyverse) a <- letters[1:3] %>% tibble::as_tibble() a #> # A tibble: 3 x 1 #> value #> <chr> #> 1 a #> 2 b #> 3 c ti

    1熱度

    1回答

    可能是一個愚蠢的問題,我想用多個條件在一個tibble中重新編碼多個變量。 數據例如: library(tidyverse) s <- matrix(sample(1:15, 20, replace = TRUE), ncol = 4) s <- as_tibble(s) 其中給出這樣的:等於 # A tibble: 5 x 4 V1 V2 V3 V4 <int> <i

    0熱度

    1回答

    使用lubridate包我想添加秒(爲示例的目的)在一個tibble的"POSIXct", "POSIXt"字段。 b <- structure(list(`"a"` = c("a", "a", "a", "a", "a"), Date_time = structure(c(1506694322, 1506694270, 1506693970, 1506693897, 1506693849),