R codes for Panel Data Structural Breaks