Archivo:Area aproximada.png - Historial de revisiones

Herraiz: Herraiz subió una nueva versión de «Archivo:Area aproximada.png»: Rayado homogéneo

2013-08-20T13:36:28Z

Herraiz subió una nueva versión de «Archivo:Area aproximada.png»: Rayado homogéneo

Herraiz: /* Aproximación del área bajo una curva */

2013-08-20T13:35:41Z

‎Aproximación del área bajo una curva

Deprecated: The each() function is deprecated. This message will be suppressed on further calls in /home/mat/public_html/w/includes/diff/DairikiDiff.php on line 434

Herraiz: Herraiz subió una nueva versión de «Archivo:Area aproximada.png»: Versión con área rallada

2013-08-20T13:30:48Z

Herraiz subió una nueva versión de «Archivo:Area aproximada.png»: Versión con área rallada

Herraiz: /* Aproximación del área bajo una curva */

2013-08-20T13:30:27Z

‎Aproximación del área bajo una curva

Herraiz: /* Aproximación del área bajo una curva */

2013-08-20T13:29:50Z

‎Aproximación del área bajo una curva

Herraiz en 17:16 19 ago 2013

2013-08-19T17:16:32Z

Herraiz: Aproximación del área bajo una curva

2013-08-19T17:12:46Z

Aproximación del área bajo una curva

Página nueva

Aproximación del área bajo una curva

@@ Línea 10: / Línea 10: @@
    set(gca,'LineWidth',4);
    grid minor;
    for xx = min(x):s:max(x)-s
      x2 = linspace(xx, xx+s, 50);
@@ Línea 15: / Línea 16: @@
      fill([xx xx+s xx+s xx],[0 0 f(xx+s) f(xx+s)], 'y');
      patch([x2 xx xx],[y2 f(xx+s) f(xx)], 'r');
-     p = patch([xx xx+s xx+s xx],[0 0 f(xx+s) f(xx+s)], 'y');
+     p1 = patch([xx xx+s xx+s xx],[0 0 f(xx+s) f(xx+s)], 'y');
-     hatchfill(p, 'single', 45, 15);
+     p = [p p1];
    end
    plot(x,f(x), 'LineWidth',16);
    text(11,25,'A_1','fontsize',24,'fontweight','bold');

@@ Línea 1: / Línea 1: @@
 == Aproximación del área bajo una curva ==
-Para generar este archivo se ha usado la siguiente función de [[Octave UPM]]
+Para generar este archivo se ha usado la siguiente función de [[Octave UPM]], junto con la función ''hatchfill'' que se encuentra [http://www.mathworks.com/matlabcentral/fileexchange/30733 un fichero en MATLAB Central].
 {{ matlab | codigo =
 function dibujaFunc(x,f,s)

@@ Línea 11: / Línea 11: @@
    grid minor;
    for xx = min(x):s:max(x)-s
      x2 = linspace(xx, xx+s, 50);
      y2 = f(x2);
-     fill([x2 xx xx],[y2 f(xx+s) f(xx)], 'r');
+     fill([xx xx+s xx+s xx],[0 0 f(xx+s) f(xx+s)], 'y');
    end
    plot(x,f(x), 'LineWidth',16);

← Revisión anterior		Revisión del 17:16 19 ago 2013
Línea 1:		Línea 1:
−	Aproximación del área bajo una curva	+	== Aproximación del área bajo una curva ==
		+
		+	Para generar este archivo se ha usado la siguiente función de [[Octave UPM]]
		+	{{ matlab \| codigo =
		+	function dibujaFunc(x,f,s)
		+	clf;
		+	hold on;
		+	set(gca,'FontSize',14);
		+	set(gca,'FontWeight','bold');
		+	set(gca,'LineWidth',4);
		+	grid minor;
		+	for xx = min(x):s:max(x)-s
		+	fill([xx xx+s xx+s xx],[0 0 f(xx+s) f(xx+s)], 'y');
		+	x2 = linspace(xx, xx+s, 50);
		+	y2 = f(x2);
		+	fill([x2 xx xx],[y2 f(xx+s) f(xx)], 'r');
		+	end
		+	plot(x,f(x), 'LineWidth',16);
		+	text(11,25,'A_1','fontsize',24,'fontweight','bold');
		+	text(13,25,'A_2','fontsize',24,'fontweight','bold');
		+	text(15,25,'A_3','fontsize',24,'fontweight','bold');
		+	text(17,25,'A_4','fontsize',24,'fontweight','bold');
		+	text(19,25,'A_5','fontsize',24,'fontweight','bold');
		+	xlabel('Eje X');
		+	ylabel('Eje Y');
		+	hold off;
		+	end}}
		+
		+	Luego, se llama a la función con
		+	{{#tag:source\|>> x = linspace(10,20,100);
		+	>> dibujaFunc(x,@(x) (3+sin(x))/100.*x.^3+x+1,2);\|lang="matlab"}}

← Revisión anterior	Revisión del 13:36 20 ago 2013
(Sin diferencias)

← Revisión anterior	Revisión del 13:30 20 ago 2013
(Sin diferencias)