fixed check is_data_frame data and dat