-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathcombinacion.m
More file actions
60 lines (34 loc) · 1.04 KB
/
combinacion.m
File metadata and controls
60 lines (34 loc) · 1.04 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
%INGRESAR VECTORES PARA COMPROBAR SI CON UNA CONBINACIÓN LINEAL DE v
%Matriz de vectores dados
%La solución para el problema se da en v=[ 1 2 1] y w= [-1 1 4]
clc
clear all
disp('Para el vector v')
a=input('Ingrese elemento 1 del vector v: ');
b=input('Ingrese elemento 2 del vector v: ');
c=input('Ingrese elemento 3 del vector v: ');
disp('Para el vector w')
m=input('Ingrese elemento 1 del vector w: ');
n=input('Ingrese elemento 2 del vector w: ');
p=input('Ingrese elemento 3 del vector w: ');
A=[a b c ; m n p ]';
u=[ 1 8 11 ]'
v=A(:,1)
w=A(:,2)
S=rref([A u]); % Verifica la condición de dependencia lineal
if S(1,3)~=0 && S(2,3)~=0
disp('Tiene solución')
disp('La solución es')
x=[S(1,3) S(2,3)]
else
disp('No existe tal conbinación lineal de v y w para generar u')
endif
[x,y]= meshgrid(-20:4:40);
z1= -(x*A(1,1) + A(2,1)*y)/A(3,1); %Vector v
z2=-(A(1,2)*x + A(2,2)*y)/A(3,2); %Vector w
z3=-( 1*x +8*y)/11 ;
hold on
grid
surf(x,y,z3)
surf(x,y,z1)
surf(x,y,z2)