Hace algún tiempo coloque esta inquietud, y muy amablemente me respondieron y logre obtener lo que me proponia, gracias al formula que Fidel me paso.
Ahora me han contactado ya que noo esta dando algunos datos como debe ser, sobre todo cuando los periodos son quincenales. Regrese acá, leí todo y realice pruebas pero me doy cuenta de algo y no se por que sucede. Cuando aplico los datos que paso de manera "directa", me da perfectamente pero si lo paso utilizando el mismo codigo en una funcion, los datos no me dan y no comprendo por que sucede esto.
¿Me podrían ayudar a ver mi error?, Coloco, primeero el codigo de la funcion y mas abajo el codigo "directo" y que me funciona.
cf=3437879 && capital final
ci=3200000 && capital inicial
n=24 && períodos
lnTasa = IntComp(cf, ci, n)
MESSAGEBOX(lnTasa)
*-- <Comprobación>
*-- Formula interes compuesto despejada
*-- para averiguar el capital final
*-- cf = ci (1 + i)^n
cf = ci * ( (1+lnTasa)^12)
MESSAGEBOX(cf)
*---------------------------------------------------------------------------
* Funcion IntComp
* Calcula la tasa de interés compuesto a partir del capital inicial, cuotas
* y capital final
*---------------------------------------------------------------------------
* Ejemplo:
* lnTasa = IntComp(12178215, 1000000, 12)
* MESSAGEBOX(ROUND(lnTasa,5))
*-- <Comprobación>
*-- Formula interes compuesto despejada
*-- para averiguar el capital final
*-- cf = ci (1 + i)^n
* cf = 1000000 * ( (1+lnTasa)^12)
* MESSAGEBOX(ROUND(cf,0))
*---------------------------------------------------------------------------
FUNCTION IntComp
PARAMETERS tnCf, tnCi, tnN
*-- Constante e
euler = 2.71828182845904523536028
&& Capital final
capitalf = tnCf
&& capital inicial
capiltali = tnCi
&& períodos
N = tnN
x= capitalf/capiltali
nPot=LOG(x)/N
i=euler^nPot - 1
*-- Tasa períodica (tanto por unidad)
RETURN i
ENDFUNC
*!* Funciona correctamente
euler=2.71828182845904523536028
cf=3437879 && capital final
ci=3200000 && capital inicial
n=24 && períodos