Create exploration.R