A Simple Cost-Effectiveness Model of Screening: An Open-Source Teaching and Research Tool Coded in R | Synapse