This is the code for the preprint paper "Causal Domain Adaptation with Copula Entropy based Conditional Independence Test" on arXiv. The UCI Adult data is used in the experiment. The R package 'copent', 'mnormt' and 'copula' are required to run the code.