use Validate.R