
Graficas y Textbox de diferentes Botones
Publicado por Johander (6 intervenciones) el 23/09/2016 18:00:34
Estoy trabajando en una GUI de varios botones en el cual el primer boton:
Me hace calculos, los escribe en una caja de texto y me grafica
El segundo boton:
Usa otro valor, lo escribe y me grafica
pero lo que quiero es que el boton 1 no me sobreescriba los datos que ya grafique y puse en cuadro de texto, quiero que se me superponga
Esta es de el Primer Boton

Esta es lo que hace el 2do Boton

function Calc(app)
n= app.NumericEditField.Value;
q = app.EditField2.Value;
vector = str2num (q);
t = app.EditField4.Value;
vector2 = str2num (t);
ma = max(max(vector));
mi = min(min(vector));
syms x;
xi=[vector];
yi=[vector2];
scatter(app.graf,xi,yi)
hold(app.graf);
for j=1:n
producto=1;
for i=1:j-1
producto=producto*(x-xi(i)); %calculo del producto 1 superior de L
end
producto2=1;
for i=j+1:n
producto2=producto2*(x-xi(i)); %calculo del producto 2 superior de L
end
producto3=1;
for i=1:j-1
producto3=producto3*(xi(j)-xi(i)); %calculo del producto 3 inferior de L
end
producto4=1;
for i=j+1:n
producto4=producto4*(xi(j)-xi(i)); %calculo del producto 4 inferior de L
end
L(j)=(producto*producto2)/(producto3*producto4); %calculos de las L
end
pn=0;
for j=1:n
pn=pn+L(j)*yi(j); %calculo del polinomio interpolante
end
x=mi:1:ma;
y = eval(pn);
plot(app.graf,x,y);
hold(app.graf);
pn=simplify(pn);
global pn
pn=char(pn);
set(app.TextArea,'Value',['Valores Ingresados en X:',q,char(13),'Valores Ingresados en Y:',t,char(13),'Polinomio de interpolacion: ', pn]);
end
% Button2 button pushed function
function Interpolar(app)
global pn
x = app.NumericEditField2.Value;
y = eval(pn); %evaluar el punto en el polinomio
set(app.TextArea,'Value',['Nueva imagen del punto',y]);
scatter(app.graf,x,y);
end
end
Me hace calculos, los escribe en una caja de texto y me grafica
El segundo boton:
Usa otro valor, lo escribe y me grafica
pero lo que quiero es que el boton 1 no me sobreescriba los datos que ya grafique y puse en cuadro de texto, quiero que se me superponga
Esta es de el Primer Boton
Esta es lo que hace el 2do Boton
function Calc(app)
n= app.NumericEditField.Value;
q = app.EditField2.Value;
vector = str2num (q);
t = app.EditField4.Value;
vector2 = str2num (t);
ma = max(max(vector));
mi = min(min(vector));
syms x;
xi=[vector];
yi=[vector2];
scatter(app.graf,xi,yi)
hold(app.graf);
for j=1:n
producto=1;
for i=1:j-1
producto=producto*(x-xi(i)); %calculo del producto 1 superior de L
end
producto2=1;
for i=j+1:n
producto2=producto2*(x-xi(i)); %calculo del producto 2 superior de L
end
producto3=1;
for i=1:j-1
producto3=producto3*(xi(j)-xi(i)); %calculo del producto 3 inferior de L
end
producto4=1;
for i=j+1:n
producto4=producto4*(xi(j)-xi(i)); %calculo del producto 4 inferior de L
end
L(j)=(producto*producto2)/(producto3*producto4); %calculos de las L
end
pn=0;
for j=1:n
pn=pn+L(j)*yi(j); %calculo del polinomio interpolante
end
x=mi:1:ma;
y = eval(pn);
plot(app.graf,x,y);
hold(app.graf);
pn=simplify(pn);
global pn
pn=char(pn);
set(app.TextArea,'Value',['Valores Ingresados en X:',q,char(13),'Valores Ingresados en Y:',t,char(13),'Polinomio de interpolacion: ', pn]);
end
% Button2 button pushed function
function Interpolar(app)
global pn
x = app.NumericEditField2.Value;
y = eval(pn); %evaluar el punto en el polinomio
set(app.TextArea,'Value',['Nueva imagen del punto',y]);
scatter(app.graf,x,y);
end
end
Valora esta pregunta


0