Create Ch14_draw_contact_map.R