Create multi_resistance.R