将原始数据转换为长格式

Question

我正在导入既不长也不宽的数据：

clear

input str1 id purchased sold
A 2017 .
B . .
C 2016 2019
C 2018 .
D 2018 2019
D 2018 .
end

我的目标是获取以下长格式的数据，以反映每年的计数：

Identifier Year Inventory
     A     2016     0
     A     2017     1
     A     2018     1
     A     2019     1
     B     2016     0
     B     2017     0
     B     2018     0
     B     2019     0
     C     2016     0
     C     2017     0
     C     2018     1
     C     2019     1
     D     2016     0
     D     2017     0
     D     2018     2
     D     2019     1

我最初的方法是先将其转换为一种宽格式，即每个标识符仅包含一行，并为2016-2018年之间的年份添加列。然后将此格式转换为所需的长格式。但是，这似乎效率很低。

因为我有更大的数据集，有没有更短，更有效的方法来做到这一点？

Answer 1

这需要几个小技巧。最关键的是reshape long和fillin。库存实质上是购买减去销售的总和。

clear
input str1 Identifier  Purchased  Sold 
A   2017    .
B   .   .
C   2016    2019
C   2018    .
D   2018    2019
D   2018    .
end 

generate long id = _n 
rename (Purchased Sold) year= 
reshape long year, i(id) j(Event) string 
drop id 

fillin Id year 
drop _fillin 
drop if missing(year) 

bysort Id (year Event) : generate inventory = sum((Event == "Purchased") - (Event == "Sold")) 
drop Event 
bysort Id year : keep if _n == _N 
list, sepby(Id) 

     +----------------------------+
     | Identi~r   year   invent~y |
     |----------------------------|
  1. |        A   2016          0 |
  2. |        A   2017          1 |
  3. |        A   2018          1 |
  4. |        A   2019          1 |
     |----------------------------|
  5. |        B   2016          0 |
  6. |        B   2017          0 |
  7. |        B   2018          0 |
  8. |        B   2019          0 |
     |----------------------------|
  9. |        C   2016          1 |
 10. |        C   2017          1 |
 11. |        C   2018          2 |
 12. |        C   2019          1 |
     |----------------------------|
 13. |        D   2016          0 |
 14. |        D   2017          0 |
 15. |        D   2018          2 |
 16. |        D   2019          1 |
     +----------------------------+