Hola a todos, ¿cómo puedo codificar correctamente esta ecuación en R? y <- ?i=3 ((1+sing(t-ti)) /2) *Bi*{1-exp[-ai*((t-ti) / ?ti) ^(mi+1)]} n=3 donde para t> ti; sign(t-ti) = 1, de lo contrario; sign(t-ti) = - 1; limitar el parámetro (ai) entre 2,3 y 6,9; B1 + B2 + B3 = 1 Cualquier ayuda es muy apreciada [[alternative HTML version deleted]]