Create main9.R