Mam równanie, aby przewidzieć wagę manatów na podstawie ich wieku, w dniach (dias, po portugalsku): R <- function(a, b, c, dias) c + a*(1 - exp(-b*dias)) Modelowałem to w R, używając nls () i otrzymałem następującą grafikę: Teraz chcę obliczyć 95% przedział ufności i wykreślić go na...