图表复现

用 R 复现论文里的图，共 2 张，每张都附代码和输入数据。