如何 rotate/transpose 与 list-columns 打个招呼

Question

我正在尝试“旋转”到包含 list-columns 的小标题。在下面的例子中，我试图从 trb_1 到 trb_2.

library(recipes)
library(tibble)

# I have to "recipes" that I organize in a tibble.

# car_rec_1
recipe(mpg ~ ., data = mtcars) %>% step_ns(disp, deg_free = 5)
# car_rec_2
recipe(mpg ~ ., data = mtcars) %>% step_dummy(am) 


trb_1 <-
  tribble(~car_rec_1,                                                     ~car_rec_2,
        recipe(mpg ~ ., data = mtcars) %>% step_ns(disp, deg_free = 5),   recipe(mpg ~ ., data = mtcars) %>% step_dummy(am) 
        )

trb_2 <-
  tribble(~name, ~value,
          "car_rec_1", recipe(mpg ~ ., data = mtcars) %>% step_ns(disp, deg_free = 5),
          "car_rec_2", recipe(mpg ~ ., data = mtcars) %>% step_dummy(am)
          )


trb_1
#> # A tibble: 1 x 2
#>   car_rec_1 car_rec_2
#>   <list>    <list>   
#> 1 <recipe>  <recipe>
trb_2
#> # A tibble: 2 x 2
#>   name      value   
#>   <chr>     <list>  
#> 1 car_rec_1 <recipe>
#> 2 car_rec_2 <recipe>

我试过了

library(sjmisc)

rotate_df(trb_1)

但是输出不是预期的（即不像预期的那样trb_2）

Answer 1

可能

trb_2 <- trb_1 %>% 
  pivot_longer(everything())

-结果

> trb_2
# A tibble: 2 x 2
  name      value   
  <chr>     <list>  
1 car_rec_1 <recipe>
2 car_rec_2 <recipe>

如何 rotate/transpose 与 list-columns 打个招呼

How to rotate/transpose a tibble with list-columns

r

tibble