sel <- template_WES_standard_curve$target_name == 'target_1'
tmp_n_copies <- template_WES_standard_curve$n_copies[sel]
tmp_ct_value <- template_WES_standard_curve$ct_value[sel]
est_amplification_efficiency(n_copies = tmp_n_copies,
ct_value = tmp_ct_value)
Run the code above in your browser using DataLab