data("WageData")
wages <- panel_data(WageData, id = id, wave = t)
# Create data with gaps
wages_gaps <- wages[!(wages$t == 3 & wages$id == wages$id[1]), ]
nrow(wages_gaps) # Missing one row
# Balance the panel (add NA row)
wages_balanced <- balance_panel(wages_gaps)
nrow(wages_balanced) # Back to full size
# Balance with custom fill values
wages_balanced <- balance_panel(wages_gaps, wks = 0, union = 0)
Run the code above in your browser using DataLab