有位大神帮我写了段代码，但是不是看的很懂，谁能帮忙解释下？
特别是第5到第9行。还有请问下这段代码最终赋值给哪个dataframe，我要把最终数据保存下来。
感谢大家了。

• library(tidyverse)
• library(fBasics)
• df %>%
•   group_by(LotID, StepNo) %>%
•   nest() %>%
•   mutate(summary = map(data, basicStats),
•          stats = map(summary, rownames)) %>%
•   select(-data) %>%
•   unnest()