Create DataAcquisition.R