Some scripts to communicate and R Netlogo