id我使用键和构建以下面板数据time：
pdata <- tibble(\n id = rep(1:10, each = 5),\n time = rep(2016:2020, times = 10),\n value = c(c(1,1,1,0,0), c(1,1,0,0,0), c(0,0,1,0,0), c(0,0,0,0,0), c(1,0,0,0,1), c(0,1,1,1,0), c(0,1,1,1,1), c(1,1,1,1,1), c(1,0,1,1,1), c(1,1,0,1,1))\n)\npdata\n# A tibble: 50 \xc3\x97 3\n id time value\n <int> <int> <dbl>\n 1 1 2016 1\n 2 1 2017 1\n 3 1 2018 1\n 4 1 2019 0\n 5 1 2020 0\n 6 2 2016 1\n 7 2 2017 1\n 8 2 2018 0\n 9 2 2019 0\n10 2 …