# NOT RUN {
data("uvbModel")
model_times <- uvbModel@times
input <- rep(0,length(model_times))
input_Dataframe <- data.frame(t = model_times, u = input)
newModel <- setInput(odeModel = uvbModel,input = input_Dataframe)
# }
Run the code above in your browser using DataLab