<<Vilcretas`

GrafoString["Bienvenidos"]

FindRRHL[Table[-(((2^(5-2n))(16767*(2^n)-128*(3^n)))/2187),{n,6,16}],a,n]

Table[-(((2^(5-2 n)) (16767 (2^n)-128 (3^n)))/2187),{n,6,16}]

FindRRHL[{9,-15,-2367,90057,-2477511,60101985,-1363435407,29670733497},a,n]

SumatoriaC[n_,suma_:11368683772161602973937988281250/303164900590976079305013020833]:=If[n==0,suma,SumatoriaC[n-1,suma+((2 5^(14 (n+3)) (3+8 (n+3)^2))/(-1+4 5^(14(3+n))))]]

n+3 = 3
n = 3 -3
n = 0

((16*(3^2)+6)/(4-(5^(-14*3))))

Together[((16*(i^2)+6)/(4-(5^(-14*i))))]

SumatoriaP[n_]:=If[n==1,5764798,Sumatoria[n-1]+(1+7^(8n)-4 n^5)]

n=1

-4+(7^8)+1

Sumatori[n_]:=If[n==2,-(20266/9050451397875),Sumatori[n-1]+(-((15^(-4 (-1+n)) (-1+3^(4 (-1+n))+2 15^(4 (-1+n))))/(-10+19^(7(-1+n))+14 (-1+n))))]

n-1=1
n=1+1
n=2

Together[(((5^(-4*i))-(15^(-4*i))+2)/(-14*i-(19^(7*i))+10))]

(((5^(-4*1))-(15^(-4*1))+2)/(-14*1-(19^(7*1))+10))

FindRRHL[{5,0,-90,-810,-5670,-36450,-225990,-1377810,-8332470},a,n]

FindRRHL[Table[(1/135)(2^((-12+n)))(-35280+99(((-2))^n)+16*(3^n)),{n,5,15}],a,n]

?RR

RR[{-4,15,18},{-10,-9,6},n,inicio->3]

Sort[Solve[t^3-t^2-37 t-35==0]]

(-5)^3-(-5)^2+37*5-35