Update export.data.R