如何根据个人往年数据填补缺失值

input float year double pid float dparty double age
2012 311561103 0 25
2014 311561103 . 27
2016 311561103 0 29
2018 311561103 0 31
2010 311562101 . 58
2014 311562101 . 62
2016 311562101 0 64
2018 311562101 0 66
2016 311562102 0 62
2010 311563101 . 41
2012 311563101 . 43
2014 311563101 . 45
2016 311563101 0 47
2018 311563101 0 49
2012 311563102 1 43
2014 311563102 . 45
2016 311563102 1 47
2018 311563102 . 49
2012 311563103 1 17
2014 311563103 . 19
2016 311563103 . 21
2018 311563103 . 23
end
数据如上（把pid数据宽度设为12即可正常显示），我想填补dparty（是否党员）的缺失值。填补原则是：第一，同一个人（相同的pid)若某年是非党员（数值为0），那么他之前的dparty都应当为0。例如，第2/5/6条记录中的dparty应该为0。第二，同一个人（相同的pid)若某年是党员（数值为1），那么他之后的dparty都应当为1.例如第20/21/22条记录中的dparty应该为1. 请问，如何编写代码？

我觉得这个帖子有些类似你的需求
https://stackoverflow.com/questions/44210446/r-carry-forward-and-backward-conditionally