4

我有一个小标题,其中每一列都包含一个列表。需要将其转换为单独的行。

下面是代码。

library(tibble)
dataList = tibble(month_list = list(c("01", "02", "03", "04", "05", "06")) , year = 2017, 
                  pdays = list(c("31", "7", "31", "30", "31", "31")), 
                  apis = '05-001', 
                  formation_code = list(c("Java", "Java", "Java", "Java", "JS", "Java")))

dataList = add_row(dataList, month_list = list(c('01', '02')) , year = 2017, 
                  pdays = list(c("31", "30")), 
                  apis = '06-001', 
                  formation_code = list(c("JS", "Java")))

View(dataList)

在此处输入图像描述

我需要如下所示的输出。

在此处输入图像描述

4

0 回答 0