codon_usage adaptation

Just adding the line "codonusage <- param$codonusage" for parametrization.