Update simulation.R

add function crtOverlapAmat