Taller1 metodosnumericos

Métodos numéricos
TALLER #1

1.
OPCION 1.

function M=leemat
%leemat:lee una matriz desde teclado
%M=leemat()
%M=matriz leida y retornada
M=[ ];
nfM=input('ingrese elnumero de filas: ');
ncM=input('ingrese el numero de columnas: ');
for f=1:nfM
for c=1:ncM
kad=sprintf('elemento (%d,%d)',f,c);
M(f,c)=input(kad);
end
endOPCIÓN 2.
function leemat2;
%leemat:lee una matriz desde teclado
%M=matriz leida y retornada
nfM=input('ingrese el numero de filas: ');
ncM=input('ingrese el numero decolumnas: ');
M=zeros(nfM,ncM)
end



2.



//Función de sumas parciales que se aproxima a la función salto

function a = suma(x, n)
a = 0;
for k=1:n
a = a +(2/pi)*((1-(-1)^k)/k)*sin(k*x);
end
end

//Función salto que retorna un vector para graficarlo y comparar

function v = salto(step)
v = -pi:step:pi;
for i = 1:length(v)
if (v(i) < 0)v(i) = -1;
else
v(i) = 1;
end
end
end

3.



function d =normal(x, sigma, miu)
d = (1/(sigma*sqrt(2*pi)))*exp((-1/2)*((x-miu)/sigma).^2);
end

4.//Factorial versión recursiva: son aquellos que se llaman a si mismo. Un valor, o incógnita, para calcular su valor necesita obtenerla a partir de si misma pero de una"iteración" anterior
// Si el número tiene más de 10 dígitos la función retorna -1

function g = fact(a)
if (a == 1 | a == 0)
g = 1;
return
end
temp = fact(a-1);
if(temp < 0)
g = -1;
return
end
g = a * fact(a-1);
if (g >= 10000000000)
g = -1;
return
end
end

//Factorial versión iterativa: se emplean, necesariamente,ciclos o bucles para realizar las iteraciones o vueltas. 

function f=fact(n,i)
d=n;
while n>1
n=n-1;
d=d*n;
end
if d<(10^i)
f=d;
disp(f);
else disp('error')
end
end