R=((1-[(Subscript[C, D])(t)*(Subscript[V, D])+(Subscript[C, A])(t)*(Subscript[V, A])])/((Subscript[C, 0])*(Subscript[V, D])))