Create Appendix3.r