Create GetOSAccessPoint.R