Files
School/Anul 3/Semestrul 2/Calcul numeric/Lab1.m
T
2025-07-03 20:56:38 +03:00

107 lines
1.2 KiB
Matlab

A = [1,2;3,4]
det(A)
inv(A)*A
A*A
A.*A
A^2
A.^2
v=1:10
V=1:-0.1:0
v.^2
transpose(v) # or v'
A(1,:)
A(:,2)
#L1_NC.pdf
#1.a
x=-4:0.1:7.2;
p = x.^5-5*x.^4-16*x.^3+16*x.^2-17.*x+21;
#plot(x,p)
#1.b
x=-2.5;
p = [1,-5,-16,+16,-17,21];
polyval(p,x)
#1.c
roots(p)
polyval(p,7)
#2
x = 0:0.1*pi:2*pi;
f = sin(x);
g = sin(2*x);
h = sin(3*x);
#subplot(3,1,1)
#plot(x,f)
#subplot(3,1,2)
#plot(x,g)
#subplot(3,1,3)
#plot(x,h)
clf #clear plot
t= 0:0.1*pi:10*pi
R=3.8;
r=1;
x = (R+r)*cos(t) - r*cos((R/r+1)*t);
y = (R+r)*sin(t) - r*sin((R/r+1)*t);
plot(x,y)
[x, y] = meshgrid(-2:0.1:2, 0.5:0.1:4.5);
f = sin(e.^x).*cos(log(y));
clf
#mesh(x, y, f);
#xlabel('X-axis');
#ylabel('Y-axis');
#zlabel('Z-axis');
#title('3D Surface Plot using mesh');
#colormap('jet');
#colorbar;
#grid on;
figure;
plot3(x, y, f);
xlabel('X-axis');
ylabel('Y-axis');
zlabel('Z-axis');
title('3D Line Plot using plot3');
grid on;
function result = funct(n)
if n == 0
result = 1+1;
else
result = 1 + 1/ funct(n - 1);
end
end
% Increase the recursion limit to 5000
#max_recursion_depth(2025);
funct(2)
funct(10)
funct(100)
funct(2025)