Create chapter4_code_yoneda.r