Diferencia entre revisiones de «Ejercicios libres»
De Software Libre para la Enseñanza y el Aprendizaje de las Matemáticas (2010-11)
Línea 20: | Línea 20: | ||
( %i1) g(x):=1/(1+x^2); | ( %i1) g(x):=1/(1+x^2); | ||
+ | |||
( %o1) | ( %o1) | ||
g (x) :=1/1 + x2 | g (x) :=1/1 + x2 | ||
( %i2) h(x):=1+log(x); | ( %i2) h(x):=1+log(x); | ||
+ | |||
( %o2) | ( %o2) | ||
h (x) := 1 + log x | h (x) := 1 + log x | ||
Línea 32: | Línea 34: | ||
( %i3) solve(1+x^2=0); | ( %i3) solve(1+x^2=0); | ||
+ | |||
( %o3) | ( %o3) | ||
[x = -i; x = i] | [x = -i; x = i] | ||
( %i4) solve(1+x^2=0); | ( %i4) solve(1+x^2=0); | ||
+ | |||
( %o4) | ( %o4) | ||
[x = -i; x = i] | [x = -i; x = i] | ||
Línea 43: | Línea 47: | ||
( %i5) is(1+x^2>0); | ( %i5) is(1+x^2>0); | ||
+ | |||
( %o5) | ( %o5) | ||
true | true | ||
Línea 49: | Línea 54: | ||
( %i7) solve(g(x)=0,x); | ( %i7) solve(g(x)=0,x); | ||
+ | |||
( %o7) | ( %o7) | ||
[] | [] | ||
( %i8) solve(h(x)=0,x); | ( %i8) solve(h(x)=0,x); | ||
+ | |||
( %o8) | ( %o8) | ||
x = e-1 | x = e-1 | ||
Línea 60: | Línea 67: | ||
( %i9) g(0); | ( %i9) g(0); | ||
+ | |||
( %o9) | ( %o9) | ||
1 | 1 | ||
Línea 71: | Línea 79: | ||
( %i10) limit(h(x),x,0,plus); | ( %i10) limit(h(x),x,0,plus); | ||
+ | |||
( %o10) | ( %o10) | ||
-infinito | -infinito | ||
Línea 80: | Línea 89: | ||
( %i11) limit(g(x),x,minf); | ( %i11) limit(g(x),x,minf); | ||
+ | |||
( %o11) | ( %o11) | ||
0 | 0 | ||
( %i12) limit(h(x),x,inf); | ( %i12) limit(h(x),x,inf); | ||
+ | |||
( %o12) | ( %o12) | ||
infinito | infinito | ||
Línea 98: | Línea 109: | ||
( %i13) limit(g(x),x,1,minus); | ( %i13) limit(g(x),x,1,minus); | ||
+ | |||
( %o13) | ( %o13) | ||
1/2 | 1/2 | ||
( %i14) limit(h(x),x,1,plus); | ( %i14) limit(h(x),x,1,plus); | ||
+ | |||
( %o14) | ( %o14) | ||
1 | 1 | ||
Línea 111: | Línea 124: | ||
( %i15) diff(g(x),x); | ( %i15) diff(g(x),x); | ||
+ | |||
( %o15) | ( %o15) | ||
- 2x/(x2 + 1)2 | - 2x/(x2 + 1)2 | ||
( %i16) diff(h(x),x); | ( %i16) diff(h(x),x); | ||
+ | |||
( %o16) | ( %o16) | ||
1/x | 1/x | ||
Línea 123: | Línea 138: | ||
( %i33) f(x):= if(x<1) then g(x) else h(x); | ( %i33) f(x):= if(x<1) then g(x) else h(x); | ||
+ | |||
( %o33) | ( %o33) | ||
f (x) := if x < 1 then g (x) else h (x) | f (x) := if x < 1 then g (x) else h (x) | ||
Línea 128: | Línea 144: | ||
El problema es que Maxima no está preparado para representar directamente este tipo | El problema es que Maxima no está preparado para representar directamente este tipo | ||
de funciones, siendo necesario encapsular f(x) en una expresión de la forma “’(f(x))”. | de funciones, siendo necesario encapsular f(x) en una expresión de la forma “’(f(x))”. | ||
+ | |||
( %i34) plot2d(f(x),[x,-5,5]); | ( %i34) plot2d(f(x),[x,-5,5]); | ||
+ | |||
Maxima was unable to evaluate the predicate: | Maxima was unable to evaluate the predicate: | ||
** error while printing error message ** | ** error while printing error message ** | ||
Línea 137: | Línea 155: | ||
( %i35) plot2d(’(f(x)),[x,-5,5], [gnuplot_preamble, "set zeroaxis"], | ( %i35) plot2d(’(f(x)),[x,-5,5], [gnuplot_preamble, "set zeroaxis"], | ||
[gnuplot_term, ps], [gnuplot_out_file, "grafica.eps"]); | [gnuplot_term, ps], [gnuplot_out_file, "grafica.eps"]); | ||
+ | |||
( %o35) | ( %o35) | ||
[[Archivo:Ejemplo.jpg]] | [[Archivo:Ejemplo.jpg]] |
Revisión del 19:27 12 may 2010
En esta sección se encuentran ejercicios libremente enunciado por los alumnos y resueltos con los sistemas de software libre.
Autor: Jose David Cruz Margarin Problema:
Dada la función f(x):
1/1+x2 si x <= 1 1 + ln x si x > 1
1. Estudiar su dominio, puntos de corte y asíntotas.
2. Analizar su continuidad y derivabilidad.
Solucion:
1.- Definimos:
( %i1) g(x):=1/(1+x^2);
( %o1)
g (x) :=1/1 + x2
( %i2) h(x):=1+log(x);
( %o2)
h (x) := 1 + log x
El dominio de g es todo R pues, evidentemente, 1 + x2 6= 0 8x 2 R. Pero, por si hubiera alguna duda, el alumno podría utilizar Maxima para comprobar que no existe ninguna solución real (todas sus soluciones son imaginarios puros):
( %i3) solve(1+x^2=0);
( %o3)
[x = -i; x = i]
( %i4) solve(1+x^2=0);
( %o4)
[x = -i; x = i]
Maxima es incluso capaz de asegurarnos que 1+x2 es estrictamente positivo (independientemente del valor de x) si utilizamos la función is:
( %i5) is(1+x^2>0);
( %o5)
true
Para estudiar los puntos de corte con el eje de las abscisas, planteamos
( %i7) solve(g(x)=0,x);
( %o7)
[]
( %i8) solve(h(x)=0,x);
( %o8)
x = e-1
El único punto de corte es x = 1/e . En cuanto a posibles puntos de corte con el eje vertical, cuando x = 0 nuestra función toma el valor f(0) = g(0) = 1:
( %i9) g(0);
( %o9)
1
En definitiva: Los puntos de corte de f(x) son (0; 1) y ( 1/e ; 0).
En nuestro caso, la función g(x) no tiene ninguna asíntota vertical, porque su denominador es siempre distinto de cero. La función h(x) tendría una asíntota vertical en x = 0, debido al logaritmo:
( %i10) limit(h(x),x,0,plus);
( %o10)
-infinito
Pero esto no afecta a f(x) ya que, en los alrededores de x = 0, esta función no toma los valores de h(x), sino de g(x). Por lo tanto, f no tiene ninguna asíntota vertical. Con respecto a asíntotas horizontales, tendremos que estudiar límites de f(x) cuando x -> -infinito (en cuyo caso f = g) y cuando x -> +infinito (en cuyo caso f = h)
( %i11) limit(g(x),x,minf);
( %o11)
0
( %i12) limit(h(x),x,inf);
( %o12)
infinito
Por lo tanto, podemos concluir que: f(x) no tiene ninguna asíntota vertical y tiene una asíntota horizontal (la recta y = 0) cuando x -> -infinito.
2.- Las funciones g(x) y h(x) son continuas dentro de sus respectivos dominios, por
lo tanto f es continua salvo, eventualmente, en x = 1, el punto que divide las regiones
donde f toma los valores de g y de h. Pero los límites laterales de f en este
punto son distintos, pues:
( %i13) limit(g(x),x,1,minus);
( %o13)
1/2
( %i14) limit(h(x),x,1,plus);
( %o14)
1
en consecuencia, f no es continua en x = 1 (tendrá una discontinuidad de salto). Además, f no es derivable en x = 1 (por no ser continua) pero sí en el resto de R (pues tanto g como h lo son para valores de x que estén dentro de sus respectivos dominios). Puesto que:
( %i15) diff(g(x),x);
( %o15)
- 2x/(x2 + 1)2
( %i16) diff(h(x),x);
( %o16)
1/x
Representacion grafica:
Para representar la gráfica de f, podemos definir:
( %i33) f(x):= if(x<1) then g(x) else h(x);
( %o33)
f (x) := if x < 1 then g (x) else h (x)
El problema es que Maxima no está preparado para representar directamente este tipo de funciones, siendo necesario encapsular f(x) en una expresión de la forma “’(f(x))”.
( %i34) plot2d(f(x),[x,-5,5]);
Maxima was unable to evaluate the predicate:
- error while printing error message **
Maxima was unable to evaluate the predicate:~%~M
- 0: f(x=x)
- an error. Quitting. To debug this try debugmode(true);
( %i35) plot2d(’(f(x)),[x,-5,5], [gnuplot_preamble, "set zeroaxis"], [gnuplot_term, ps], [gnuplot_out_file, "grafica.eps"]);
( %o35)