<?xml version="1.0"?>
<feed xmlns="http://www.w3.org/2005/Atom" xml:lang="es">
	<id>https://www.glc.us.es/~jalonso/SLEAM2010/api.php?action=feedcontributions&amp;feedformat=atom&amp;user=Marjimcru</id>
	<title>Software Libre para la Enseñanza y el Aprendizaje de las Matemáticas (2010-11) - Contribuciones del usuario [es]</title>
	<link rel="self" type="application/atom+xml" href="https://www.glc.us.es/~jalonso/SLEAM2010/api.php?action=feedcontributions&amp;feedformat=atom&amp;user=Marjimcru"/>
	<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php/Especial:Contribuciones/Marjimcru"/>
	<updated>2026-07-17T07:58:48Z</updated>
	<subtitle>Contribuciones del usuario</subtitle>
	<generator>MediaWiki 1.31.0</generator>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n_definida_a_trozos&amp;diff=967</id>
		<title>Estudio de una función definida a trozos</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n_definida_a_trozos&amp;diff=967"/>
		<updated>2011-04-19T12:39:33Z</updated>

		<summary type="html">&lt;p&gt;Marjimcru: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt; &amp;#039;&amp;#039;&amp;#039;Enunciado: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
 Dada la función f(x) =(1/(1+x^2) si x&amp;lt;=1 y 1+lnx si x&amp;gt;1)&lt;br /&gt;
 1. Estudiar su dominio, puntos de corte y asíntotas.&lt;br /&gt;
 2. Analizar su continuidad y su derivabilidad, calcular su función derivada primera.&lt;br /&gt;
 3. Determinar sus intervalos de crecimiento y decrecimiento, así como sus máximos&lt;br /&gt;
    y mínimos relativos.&lt;br /&gt;
 4. Representar su gráfica.&lt;br /&gt;
&lt;br /&gt;
 &amp;#039;&amp;#039;&amp;#039;Solución: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 Dominio, puntos de corte, asíntotas&lt;br /&gt;
 ( %i1) g(x):=1/(1+x^2);&lt;br /&gt;
 ( %i2) h(x):=1+log(x);&lt;br /&gt;
 El dominio de g es todo R &lt;br /&gt;
 ( %i3) solve(1+x^2=0);&lt;br /&gt;
 ( %i4) solve(1+x^2=0);&lt;br /&gt;
 ( %i5) is(1+x^2&amp;gt;0);&lt;br /&gt;
 &lt;br /&gt;
 Para estudiar los puntos de corte con el eje de las abscisas,&lt;br /&gt;
 ( %i7) solve(g(x)=0,x);&lt;br /&gt;
 ( %i8) solve(h(x)=0,x);&lt;br /&gt;
 El único punto de corte es x = 1&lt;br /&gt;
&lt;br /&gt;
 Puntos de corte con el eje vertical, cuando x = 0,&lt;br /&gt;
 ( %i9) g(0);&lt;br /&gt;
&lt;br /&gt;
 Asintotas verticales, horizontales y oblicuas&lt;br /&gt;
 ( %i10) limit(h(x),x,0,plus);&lt;br /&gt;
 ( %i11) limit(g(x),x,minf);&lt;br /&gt;
 ( %i12) limit(h(x),x,inf);&lt;br /&gt;
 f(x) no tiene ninguna asíntota vertical y tiene una asíntota horizontal (la&lt;br /&gt;
 recta y = 0) cuando x tiende a menos infito.&lt;br /&gt;
&lt;br /&gt;
 Continuidad, derivabilidad&lt;br /&gt;
 Las funciones g(x) y h(x) son continuas dentro de sus respectivos dominios, por&lt;br /&gt;
 lo tanto f es continua salvo, eventualmente, en x = 1, el punto que divide las regiones&lt;br /&gt;
 donde f toma los valores de g y de h. Pero los límites laterales de f en este&lt;br /&gt;
 punto son distintos, pues&lt;br /&gt;
 ( %i13) limit(g(x),x,1,minus);&lt;br /&gt;
 ( %i14) limit(h(x),x,1,plus);&lt;br /&gt;
 f no es continua en x = 1 (tendrá una discontinuidad de salto).&lt;br /&gt;
 Además, f no es derivable en x = 1 (por no ser continua) pero sí en el resto de&lt;br /&gt;
 R (pues tanto g como h lo son para valores de x que estén dentro de sus respectivos&lt;br /&gt;
 dominios). Puesto que&lt;br /&gt;
 ( %i15) diff(g(x),x);&lt;br /&gt;
 ( %i16) diff(h(x),x);&lt;br /&gt;
&lt;br /&gt;
 Crecimiento, extremos relativos&lt;br /&gt;
 ( %i22) assume(x&amp;gt;1);&lt;br /&gt;
 ( %i23) is(1/x&amp;gt;0);&lt;br /&gt;
 f es decreciente en el intervalo 1, más infinito y en el resto es creciente.&lt;br /&gt;
&lt;br /&gt;
 Para hallar máximos y mínimos relativos, calculemos los puntos críticos de f:&lt;br /&gt;
 ( %i24) solve( diff(g(x),x)=0, x);&lt;br /&gt;
 ( %i25) solve( diff(h(x),x)=0, x);&lt;br /&gt;
 Tiene punto crítico en x=0, para ver si es un mínimo o un máximo estudiamos el signo de la segunda derivada.&lt;br /&gt;
 ( %i26) diff(g(x),x,2);&lt;br /&gt;
 ( %i27) %,x=0;&lt;br /&gt;
 f tiene un máximo relativo en x = 0.&lt;br /&gt;
&lt;br /&gt;
 Representación:&lt;br /&gt;
 ( %i33) f(x):= if(x&amp;lt;1) then g(x) else h(x);&lt;br /&gt;
 ( %i34) plot2d(f(x),[x,-5,5]);&lt;br /&gt;
 ( %i35) plot2d(’(f(x)),[x,-5,5], [gnuplot_preamble, &amp;quot;set zeroaxis&amp;quot;],&lt;br /&gt;
 [gnuplot_term, ps], [gnuplot_out_file, &amp;quot;grafica.eps&amp;quot;]);&lt;/div&gt;</summary>
		<author><name>Marjimcru</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n_definida_a_trozos&amp;diff=966</id>
		<title>Estudio de una función definida a trozos</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n_definida_a_trozos&amp;diff=966"/>
		<updated>2011-04-19T12:38:53Z</updated>

		<summary type="html">&lt;p&gt;Marjimcru: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt; &amp;#039;&amp;#039;&amp;#039;Enunciado: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
 Dada la función f(x) =(1/(1+x^2) si x&amp;lt;=1 y 1+lnx si x&amp;gt;1)&lt;br /&gt;
 1. Estudiar su dominio, puntos de corte y asíntotas.&lt;br /&gt;
 2. Analizar su continuidad y su derivabilidad, calcular su función derivada primera.&lt;br /&gt;
 3. Determinar sus intervalos de crecimiento y decrecimiento, así como sus máximos&lt;br /&gt;
    y mínimos relativos.&lt;br /&gt;
 4. Representar su gráfica.&lt;br /&gt;
&lt;br /&gt;
 &amp;#039;&amp;#039;&amp;#039;Solución: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 Dominio, puntos de corte, asíntotas&lt;br /&gt;
 ( %i1) g(x):=1/(1+x^2);&lt;br /&gt;
 ( %i2) h(x):=1+log(x);&lt;br /&gt;
 El dominio de g es todo R &lt;br /&gt;
 ( %i3) solve(1+x^2=0);&lt;br /&gt;
 ( %i4) solve(1+x^2=0);&lt;br /&gt;
 ( %i5) is(1+x^2&amp;gt;0);&lt;br /&gt;
 &lt;br /&gt;
 Para estudiar los puntos de corte con el eje de las abscisas,&lt;br /&gt;
 ( %i7) solve(g(x)=0,x);&lt;br /&gt;
 ( %i8) solve(h(x)=0,x);&lt;br /&gt;
 El único punto de corte es x = 1&lt;br /&gt;
&lt;br /&gt;
 Puntos de corte con el eje vertical, cuando x = 0,&lt;br /&gt;
 ( %i9) g(0);&lt;br /&gt;
&lt;br /&gt;
 Asintotas verticales, horizontales y oblicuas&lt;br /&gt;
 ( %i10) limit(h(x),x,0,plus);&lt;br /&gt;
 ( %i11) limit(g(x),x,minf);&lt;br /&gt;
 ( %i12) limit(h(x),x,inf);&lt;br /&gt;
 f(x) no tiene ninguna asíntota vertical y tiene una asíntota horizontal (la&lt;br /&gt;
 recta y = 0) cuando x tiende a menos infito.&lt;br /&gt;
&lt;br /&gt;
 Continuidad, derivabilidad&lt;br /&gt;
 Las funciones g(x) y h(x) son continuas dentro de sus respectivos dominios, por&lt;br /&gt;
 lo tanto f es continua salvo, eventualmente, en x = 1, el punto que divide las regiones&lt;br /&gt;
 donde f toma los valores de g y de h. Pero los límites laterales de f en este&lt;br /&gt;
 punto son distintos, pues&lt;br /&gt;
 ( %i13) limit(g(x),x,1,minus);&lt;br /&gt;
 ( %i14) limit(h(x),x,1,plus);&lt;br /&gt;
 f no es continua en x = 1 (tendrá una discontinuidad de salto).&lt;br /&gt;
 Además, f no es derivable en x = 1 (por no ser continua) pero sí en el resto de&lt;br /&gt;
 R (pues tanto g como h lo son para valores de x que estén dentro de sus respectivos&lt;br /&gt;
 dominios). Puesto que&lt;br /&gt;
 ( %i15) diff(g(x),x);&lt;br /&gt;
 ( %i16) diff(h(x),x);&lt;br /&gt;
&lt;br /&gt;
 Crecimiento, extremos relativos&lt;br /&gt;
 ( %i22) assume(x&amp;gt;1);&lt;br /&gt;
 ( %i23) is(1/x&amp;gt;0);&lt;br /&gt;
 f es decreciente en el intervalo 1, más infinito y en el resto es creciente.&lt;br /&gt;
&lt;br /&gt;
 Para hallar máximos y mínimos relativos, calculemos los puntos críticos de f:&lt;br /&gt;
 ( %i24) solve( diff(g(x),x)=0, x);&lt;br /&gt;
 ( %i25) solve( diff(h(x),x)=0, x);&lt;br /&gt;
 Tiene punto crítico en x=0, para ver si es un mínimo o un máximo estudiamos el signo de la segunda derivada.&lt;br /&gt;
 ( %i26) diff(g(x),x,2);&lt;br /&gt;
 ( %i27) %,x=0;&lt;br /&gt;
 f tiene un máximo relativo en x = 0.&lt;br /&gt;
&lt;br /&gt;
 Representación:&lt;br /&gt;
 ( %i33) f(x):= if(x&amp;lt;1) then g(x) else h(x);&lt;br /&gt;
 ( %i34) plot2d(f(x),[x,-5,5]);&lt;br /&gt;
edicate:&lt;br /&gt;
** error while printing error message **&lt;br /&gt;
Maxima was unable to evaluate the predicate:~%~M&lt;br /&gt;
#0: f(x=x)&lt;br /&gt;
- an error. Quitting. To debug this try debugmode(true);&lt;br /&gt;
130 Problema resuelto 2: estudio de una función definida a trozos&lt;br /&gt;
( %i35) plot2d(’(f(x)),[x,-5,5], [gnuplot_preamble, &amp;quot;set zeroaxis&amp;quot;],&lt;br /&gt;
[gnuplot_term, ps], [gnuplot_out_file, &amp;quot;grafica.eps&amp;quot;]);&lt;/div&gt;</summary>
		<author><name>Marjimcru</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n_definida_a_trozos&amp;diff=965</id>
		<title>Estudio de una función definida a trozos</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n_definida_a_trozos&amp;diff=965"/>
		<updated>2011-04-19T12:34:32Z</updated>

		<summary type="html">&lt;p&gt;Marjimcru: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt; &amp;#039;&amp;#039;&amp;#039;Enunciado: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
 Dada la función f(x) =(1/(1+x^2) si x&amp;lt;=1 y 1+lnx si x&amp;gt;1)&lt;br /&gt;
 1. Estudiar su dominio, puntos de corte y asíntotas.&lt;br /&gt;
 2. Analizar su continuidad y su derivabilidad, calcular su función derivada primera.&lt;br /&gt;
 3. Determinar sus intervalos de crecimiento y decrecimiento, así como sus máximos&lt;br /&gt;
    y mínimos relativos.&lt;br /&gt;
 4. Representar su gráfica.&lt;br /&gt;
&lt;br /&gt;
 &amp;#039;&amp;#039;&amp;#039;Solución: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 Dominio, puntos de corte, asíntotas&lt;br /&gt;
 ( %i1) g(x):=1/(1+x^2);&lt;br /&gt;
 ( %i2) h(x):=1+log(x);&lt;br /&gt;
 El dominio de g es todo R &lt;br /&gt;
 ( %i3) solve(1+x^2=0);&lt;br /&gt;
 ( %i4) solve(1+x^2=0);&lt;br /&gt;
 ( %i5) is(1+x^2&amp;gt;0);&lt;br /&gt;
 &lt;br /&gt;
 Para estudiar los puntos de corte con el eje de las abscisas,&lt;br /&gt;
 ( %i7) solve(g(x)=0,x);&lt;br /&gt;
 ( %i8) solve(h(x)=0,x);&lt;br /&gt;
 El único punto de corte es x = 1&lt;br /&gt;
&lt;br /&gt;
 Puntos de corte con el eje vertical, cuando x = 0,&lt;br /&gt;
 ( %i9) g(0);&lt;br /&gt;
&lt;br /&gt;
 Asintotas verticales, horizontales y oblicuas&lt;br /&gt;
 ( %i10) limit(h(x),x,0,plus);&lt;br /&gt;
 ( %i11) limit(g(x),x,minf);&lt;br /&gt;
 ( %i12) limit(h(x),x,inf);&lt;br /&gt;
 f(x) no tiene ninguna asíntota vertical y tiene una asíntota horizontal (la&lt;br /&gt;
 recta y = 0) cuando x tiende a menos infito.&lt;br /&gt;
&lt;br /&gt;
 Continuidad, derivabilidad&lt;br /&gt;
 Las funciones g(x) y h(x) son continuas dentro de sus respectivos dominios, por&lt;br /&gt;
 lo tanto f es continua salvo, eventualmente, en x = 1, el punto que divide las regiones&lt;br /&gt;
 donde f toma los valores de g y de h. Pero los límites laterales de f en este&lt;br /&gt;
 punto son distintos, pues&lt;br /&gt;
 ( %i13) limit(g(x),x,1,minus);&lt;br /&gt;
 ( %i14) limit(h(x),x,1,plus);&lt;br /&gt;
 f no es continua en x = 1 (tendrá una discontinuidad de salto).&lt;br /&gt;
 Además, f no es derivable en x = 1 (por no ser continua) pero sí en el resto de&lt;br /&gt;
 R (pues tanto g como h lo son para valores de x que estén dentro de sus respectivos&lt;br /&gt;
 dominios). Puesto que&lt;br /&gt;
 ( %i15) diff(g(x),x);&lt;br /&gt;
 ( %i16) diff(h(x),x);&lt;br /&gt;
&lt;br /&gt;
 Crecimiento, extremos relativos&lt;br /&gt;
 ( %i22) assume(x&amp;gt;1);&lt;br /&gt;
 ( %i23) is(1/x&amp;gt;0);&lt;br /&gt;
 f es creciente en (􀀀1; 0) [ (1;+1) y decreciente en (0; 1).&lt;br /&gt;
Para hallar máximos y mínimos relativos, calculemos los puntos críticos de f:&lt;br /&gt;
( %i24) solve( diff(g(x),x)=0, x);&lt;br /&gt;
( %o24)&lt;br /&gt;
[x = 0]&lt;br /&gt;
( %i25) solve( diff(h(x),x)=0, x);&lt;br /&gt;
( %o25)&lt;br /&gt;
[]&lt;br /&gt;
Esto es, h no tiene puntos críticos y g tiene un punto crítico, x = 0. Cuando x = 0&lt;br /&gt;
la función f es igual a g, luego éste es un punto crítico de f. Para saber si se trata de&lt;br /&gt;
un máximo o un mínimo, podemos estudiar el signo de la segunda derivada:&lt;br /&gt;
( %i26) diff(g(x),x,2);&lt;br /&gt;
( %o26)&lt;br /&gt;
8 x2&lt;br /&gt;
(x2 + 1)3 􀀀&lt;br /&gt;
2&lt;br /&gt;
(x2 + 1)2&lt;br /&gt;
( %i27) %,x=0;&lt;br /&gt;
( %o27)&lt;br /&gt;
􀀀2&lt;br /&gt;
Por lo tanto, f00(0) = g00(0) = 􀀀2 &amp;lt; 0, es decir, f tiene un máximo relativo en x = 0.&lt;br /&gt;
Representación gráfica&lt;br /&gt;
Para representar la gráfica de f, podemos definir:&lt;br /&gt;
( %i33) f(x):= if(x&amp;lt;1) then g(x) else h(x);&lt;br /&gt;
( %o33)&lt;br /&gt;
f (x) := if x &amp;lt; 1 then g (x) else h (x)&lt;br /&gt;
El problema es que Maxima no está preparado para representar directamente este tipo&lt;br /&gt;
de funciones, siendo necesario encapsular f(x) en una expresión de la forma “’(f(x))”.&lt;br /&gt;
( %i34) plot2d(f(x),[x,-5,5]);&lt;br /&gt;
Maxima was unable to evaluate the predicate:&lt;br /&gt;
** error while printing error message **&lt;br /&gt;
Maxima was unable to evaluate the predicate:~%~M&lt;br /&gt;
#0: f(x=x)&lt;br /&gt;
- an error. Quitting. To debug this try debugmode(true);&lt;br /&gt;
130 Problema resuelto 2: estudio de una función definida a trozos&lt;br /&gt;
( %i35) plot2d(’(f(x)),[x,-5,5], [gnuplot_preamble, &amp;quot;set zeroaxis&amp;quot;],&lt;br /&gt;
[gnuplot_term, ps], [gnuplot_out_file, &amp;quot;grafica.eps&amp;quot;]);&lt;/div&gt;</summary>
		<author><name>Marjimcru</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n_definida_a_trozos&amp;diff=964</id>
		<title>Estudio de una función definida a trozos</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n_definida_a_trozos&amp;diff=964"/>
		<updated>2011-04-19T12:33:15Z</updated>

		<summary type="html">&lt;p&gt;Marjimcru: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt; &amp;#039;&amp;#039;&amp;#039;Enunciado: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
 Dada la función f(x) =(1/(1+x^2) si x&amp;lt;=1 y 1+lnx si x&amp;gt;1)&lt;br /&gt;
 1. Estudiar su dominio, puntos de corte y asíntotas.&lt;br /&gt;
 2. Analizar su continuidad y su derivabilidad, calcular su función derivada primera.&lt;br /&gt;
 3. Determinar sus intervalos de crecimiento y decrecimiento, así como sus máximos&lt;br /&gt;
    y mínimos relativos.&lt;br /&gt;
 4. Representar su gráfica.&lt;br /&gt;
&lt;br /&gt;
 &amp;#039;&amp;#039;&amp;#039;Solución: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 Dominio, puntos de corte, asíntotas&lt;br /&gt;
 ( %i1) g(x):=1/(1+x^2);&lt;br /&gt;
 ( %i2) h(x):=1+log(x);&lt;br /&gt;
 El dominio de g es todo R &lt;br /&gt;
 ( %i3) solve(1+x^2=0);&lt;br /&gt;
 ( %i4) solve(1+x^2=0);&lt;br /&gt;
 ( %i5) is(1+x^2&amp;gt;0);&lt;br /&gt;
 &lt;br /&gt;
 Para estudiar los puntos de corte con el eje de las abscisas,&lt;br /&gt;
 ( %i7) solve(g(x)=0,x);&lt;br /&gt;
 ( %i8) solve(h(x)=0,x);&lt;br /&gt;
 El único punto de corte es x = 1&lt;br /&gt;
&lt;br /&gt;
 Puntos de corte con el eje vertical, cuando x = 0,&lt;br /&gt;
 ( %i9) g(0);&lt;br /&gt;
&lt;br /&gt;
 Asintotas verticales, horizontales y oblicuas&lt;br /&gt;
 ( %i10) limit(h(x),x,0,plus);&lt;br /&gt;
 ( %i11) limit(g(x),x,minf);&lt;br /&gt;
 ( %i12) limit(h(x),x,inf);&lt;br /&gt;
 f(x) no tiene ninguna asíntota vertical y tiene una asíntota horizontal (la&lt;br /&gt;
 recta y = 0) cuando x tiende a menos infito.&lt;br /&gt;
&lt;br /&gt;
 Continuidad, derivabilidad&lt;br /&gt;
 Las funciones g(x) y h(x) son continuas dentro de sus respectivos dominios, por&lt;br /&gt;
 lo tanto f es continua salvo, eventualmente, en x = 1, el punto que divide las regiones&lt;br /&gt;
 donde f toma los valores de g y de h. Pero los límites laterales de f en este&lt;br /&gt;
 punto son distintos, pues&lt;br /&gt;
 ( %i13) limit(g(x),x,1,minus);&lt;br /&gt;
 ( %i14) limit(h(x),x,1,plus);&lt;br /&gt;
 f no es continua en x = 1 (tendrá una discontinuidad de salto).&lt;br /&gt;
 Además, f no es derivable en x = 1 (por no ser continua) pero sí en el resto de&lt;br /&gt;
 R (pues tanto g como h lo son para valores de x que estén dentro de sus respectivos&lt;br /&gt;
 dominios). Puesto que&lt;br /&gt;
 ( %i15) diff(g(x),x);&lt;br /&gt;
 ( %i16) diff(h(x),x);&lt;br /&gt;
&lt;br /&gt;
 Crecimiento, extremos relativos&lt;br /&gt;
El crecimiento de f depende del signo de la función derivada, f0(x), calculada en el&lt;br /&gt;
apartado anterior. Cuando x &amp;gt; 1, obviamente, 1&lt;br /&gt;
x &amp;gt; 0 y por lo tanto, f0(x) &amp;gt; 0. Aunque&lt;br /&gt;
es un caso tan sencillo que no merece la pena recurrir al ordenador, puede servir como&lt;br /&gt;
ilustración la forma en que se podría comprobar lo anterior, utilizando los comandos&lt;br /&gt;
“assume” e “is”:&lt;br /&gt;
( %i22) assume(x&amp;gt;1);&lt;br /&gt;
( %o22)&lt;br /&gt;
[x &amp;gt; 1]&lt;br /&gt;
( %i23) is(1/x&amp;gt;0);&lt;br /&gt;
( %o23)&lt;br /&gt;
true&lt;br /&gt;
cuando x &amp;lt; 1, el asunto es diferente, pues el signo de f0(x) dependerá de la expresión&lt;br /&gt;
􀀀&lt;br /&gt;
2x&lt;br /&gt;
(x2 + 1)2 ; (B.1)&lt;br /&gt;
que depende del signo de 􀀀2x (puesto que el denominador es siempre estrictamente&lt;br /&gt;
positivo), siendo, negativo cuando x &amp;gt; 0 y positivo en caso contrario.&lt;br /&gt;
Por lo tanto&lt;br /&gt;
129&lt;br /&gt;
f es creciente en (􀀀1; 0) [ (1;+1) y decreciente en (0; 1).&lt;br /&gt;
Para hallar máximos y mínimos relativos, calculemos los puntos críticos de f:&lt;br /&gt;
( %i24) solve( diff(g(x),x)=0, x);&lt;br /&gt;
( %o24)&lt;br /&gt;
[x = 0]&lt;br /&gt;
( %i25) solve( diff(h(x),x)=0, x);&lt;br /&gt;
( %o25)&lt;br /&gt;
[]&lt;br /&gt;
Esto es, h no tiene puntos críticos y g tiene un punto crítico, x = 0. Cuando x = 0&lt;br /&gt;
la función f es igual a g, luego éste es un punto crítico de f. Para saber si se trata de&lt;br /&gt;
un máximo o un mínimo, podemos estudiar el signo de la segunda derivada:&lt;br /&gt;
( %i26) diff(g(x),x,2);&lt;br /&gt;
( %o26)&lt;br /&gt;
8 x2&lt;br /&gt;
(x2 + 1)3 􀀀&lt;br /&gt;
2&lt;br /&gt;
(x2 + 1)2&lt;br /&gt;
( %i27) %,x=0;&lt;br /&gt;
( %o27)&lt;br /&gt;
􀀀2&lt;br /&gt;
Por lo tanto, f00(0) = g00(0) = 􀀀2 &amp;lt; 0, es decir, f tiene un máximo relativo en x = 0.&lt;br /&gt;
Representación gráfica&lt;br /&gt;
Para representar la gráfica de f, podemos definir:&lt;br /&gt;
( %i33) f(x):= if(x&amp;lt;1) then g(x) else h(x);&lt;br /&gt;
( %o33)&lt;br /&gt;
f (x) := if x &amp;lt; 1 then g (x) else h (x)&lt;br /&gt;
El problema es que Maxima no está preparado para representar directamente este tipo&lt;br /&gt;
de funciones, siendo necesario encapsular f(x) en una expresión de la forma “’(f(x))”.&lt;br /&gt;
( %i34) plot2d(f(x),[x,-5,5]);&lt;br /&gt;
Maxima was unable to evaluate the predicate:&lt;br /&gt;
** error while printing error message **&lt;br /&gt;
Maxima was unable to evaluate the predicate:~%~M&lt;br /&gt;
#0: f(x=x)&lt;br /&gt;
- an error. Quitting. To debug this try debugmode(true);&lt;br /&gt;
130 Problema resuelto 2: estudio de una función definida a trozos&lt;br /&gt;
( %i35) plot2d(’(f(x)),[x,-5,5], [gnuplot_preamble, &amp;quot;set zeroaxis&amp;quot;],&lt;br /&gt;
[gnuplot_term, ps], [gnuplot_out_file, &amp;quot;grafica.eps&amp;quot;]);&lt;/div&gt;</summary>
		<author><name>Marjimcru</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n_definida_a_trozos&amp;diff=963</id>
		<title>Estudio de una función definida a trozos</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n_definida_a_trozos&amp;diff=963"/>
		<updated>2011-04-19T12:30:23Z</updated>

		<summary type="html">&lt;p&gt;Marjimcru: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt; &amp;#039;&amp;#039;&amp;#039;Enunciado: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
 Dada la función f(x) =(1/(1+x^2) si x&amp;lt;=1 y 1+lnx si x&amp;gt;1)&lt;br /&gt;
 1. Estudiar su dominio, puntos de corte y asíntotas.&lt;br /&gt;
 2. Analizar su continuidad y su derivabilidad, calcular su función derivada primera.&lt;br /&gt;
 3. Determinar sus intervalos de crecimiento y decrecimiento, así como sus máximos&lt;br /&gt;
    y mínimos relativos.&lt;br /&gt;
 4. Representar su gráfica.&lt;br /&gt;
&lt;br /&gt;
 &amp;#039;&amp;#039;&amp;#039;Solución: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 Dominio, puntos de corte, asíntotas&lt;br /&gt;
 ( %i1) g(x):=1/(1+x^2);&lt;br /&gt;
 ( %i2) h(x):=1+log(x);&lt;br /&gt;
 El dominio de g es todo R &lt;br /&gt;
 ( %i3) solve(1+x^2=0);&lt;br /&gt;
 ( %i4) solve(1+x^2=0);&lt;br /&gt;
 ( %i5) is(1+x^2&amp;gt;0);&lt;br /&gt;
 &lt;br /&gt;
 Para estudiar los puntos de corte con el eje de las abscisas,&lt;br /&gt;
 ( %i7) solve(g(x)=0,x);&lt;br /&gt;
 ( %i8) solve(h(x)=0,x);&lt;br /&gt;
 El único punto de corte es x = 1&lt;br /&gt;
&lt;br /&gt;
 Puntos de corte con el eje vertical, cuando x = 0,&lt;br /&gt;
 ( %i9) g(0);&lt;br /&gt;
&lt;br /&gt;
 Asintotas verticales, horizontales y oblicuas&lt;br /&gt;
 ( %i10) limit(h(x),x,0,plus);&lt;br /&gt;
 ( %i11) limit(g(x),x,minf);&lt;br /&gt;
 ( %i12) limit(h(x),x,inf);&lt;br /&gt;
 f(x) no tiene ninguna asíntota vertical y tiene una asíntota horizontal (la&lt;br /&gt;
recta y = 0) cuando x ! 􀀀1.&lt;br /&gt;
Continuidad, derivabilidad&lt;br /&gt;
Las funciones g(x) y h(x) son continuas dentro de sus respectivos dominios, por&lt;br /&gt;
lo tanto f es continua salvo, eventualmente, en x = 1, el punto que divide las regiones&lt;br /&gt;
donde f toma los valores de g y de h. Pero los límites laterales de f en este&lt;br /&gt;
punto son distintos, pues&lt;br /&gt;
( %i13) limit(g(x),x,1,minus);&lt;br /&gt;
( %o13)&lt;br /&gt;
1&lt;br /&gt;
2&lt;br /&gt;
( %i14) limit(h(x),x,1,plus);&lt;br /&gt;
( %o14)&lt;br /&gt;
1&lt;br /&gt;
en consecuencia, f no es continua en x = 1 (tendrá una discontinuidad de salto).&lt;br /&gt;
128 Problema resuelto 2: estudio de una función definida a trozos&lt;br /&gt;
Además, f no es derivable en x = 1 (por no ser continua) pero sí en el resto de&lt;br /&gt;
R (pues tanto g como h lo son para valores de x que estén dentro de sus respectivos&lt;br /&gt;
dominios). Puesto que&lt;br /&gt;
( %i15) diff(g(x),x);&lt;br /&gt;
( %o15)&lt;br /&gt;
􀀀&lt;br /&gt;
2 x&lt;br /&gt;
(x2 + 1)2&lt;br /&gt;
( %i16) diff(h(x),x);&lt;br /&gt;
( %o16)&lt;br /&gt;
1&lt;br /&gt;
x&lt;br /&gt;
podemos concluir que la función derivada de f es:&lt;br /&gt;
f0(x) =&lt;br /&gt;
8&amp;gt;&amp;lt;&lt;br /&gt;
&amp;gt;:&lt;br /&gt;
􀀀&lt;br /&gt;
2x&lt;br /&gt;
(x2 + 1)2 si x &amp;lt; 1&lt;br /&gt;
1&lt;br /&gt;
x&lt;br /&gt;
si x &amp;gt; 1&lt;br /&gt;
Crecimiento, extremos relativos&lt;br /&gt;
El crecimiento de f depende del signo de la función derivada, f0(x), calculada en el&lt;br /&gt;
apartado anterior. Cuando x &amp;gt; 1, obviamente, 1&lt;br /&gt;
x &amp;gt; 0 y por lo tanto, f0(x) &amp;gt; 0. Aunque&lt;br /&gt;
es un caso tan sencillo que no merece la pena recurrir al ordenador, puede servir como&lt;br /&gt;
ilustración la forma en que se podría comprobar lo anterior, utilizando los comandos&lt;br /&gt;
“assume” e “is”:&lt;br /&gt;
( %i22) assume(x&amp;gt;1);&lt;br /&gt;
( %o22)&lt;br /&gt;
[x &amp;gt; 1]&lt;br /&gt;
( %i23) is(1/x&amp;gt;0);&lt;br /&gt;
( %o23)&lt;br /&gt;
true&lt;br /&gt;
cuando x &amp;lt; 1, el asunto es diferente, pues el signo de f0(x) dependerá de la expresión&lt;br /&gt;
􀀀&lt;br /&gt;
2x&lt;br /&gt;
(x2 + 1)2 ; (B.1)&lt;br /&gt;
que depende del signo de 􀀀2x (puesto que el denominador es siempre estrictamente&lt;br /&gt;
positivo), siendo, negativo cuando x &amp;gt; 0 y positivo en caso contrario.&lt;br /&gt;
Por lo tanto&lt;br /&gt;
129&lt;br /&gt;
f es creciente en (􀀀1; 0) [ (1;+1) y decreciente en (0; 1).&lt;br /&gt;
Para hallar máximos y mínimos relativos, calculemos los puntos críticos de f:&lt;br /&gt;
( %i24) solve( diff(g(x),x)=0, x);&lt;br /&gt;
( %o24)&lt;br /&gt;
[x = 0]&lt;br /&gt;
( %i25) solve( diff(h(x),x)=0, x);&lt;br /&gt;
( %o25)&lt;br /&gt;
[]&lt;br /&gt;
Esto es, h no tiene puntos críticos y g tiene un punto crítico, x = 0. Cuando x = 0&lt;br /&gt;
la función f es igual a g, luego éste es un punto crítico de f. Para saber si se trata de&lt;br /&gt;
un máximo o un mínimo, podemos estudiar el signo de la segunda derivada:&lt;br /&gt;
( %i26) diff(g(x),x,2);&lt;br /&gt;
( %o26)&lt;br /&gt;
8 x2&lt;br /&gt;
(x2 + 1)3 􀀀&lt;br /&gt;
2&lt;br /&gt;
(x2 + 1)2&lt;br /&gt;
( %i27) %,x=0;&lt;br /&gt;
( %o27)&lt;br /&gt;
􀀀2&lt;br /&gt;
Por lo tanto, f00(0) = g00(0) = 􀀀2 &amp;lt; 0, es decir, f tiene un máximo relativo en x = 0.&lt;br /&gt;
Representación gráfica&lt;br /&gt;
Para representar la gráfica de f, podemos definir:&lt;br /&gt;
( %i33) f(x):= if(x&amp;lt;1) then g(x) else h(x);&lt;br /&gt;
( %o33)&lt;br /&gt;
f (x) := if x &amp;lt; 1 then g (x) else h (x)&lt;br /&gt;
El problema es que Maxima no está preparado para representar directamente este tipo&lt;br /&gt;
de funciones, siendo necesario encapsular f(x) en una expresión de la forma “’(f(x))”.&lt;br /&gt;
( %i34) plot2d(f(x),[x,-5,5]);&lt;br /&gt;
Maxima was unable to evaluate the predicate:&lt;br /&gt;
** error while printing error message **&lt;br /&gt;
Maxima was unable to evaluate the predicate:~%~M&lt;br /&gt;
#0: f(x=x)&lt;br /&gt;
- an error. Quitting. To debug this try debugmode(true);&lt;br /&gt;
130 Problema resuelto 2: estudio de una función definida a trozos&lt;br /&gt;
( %i35) plot2d(’(f(x)),[x,-5,5], [gnuplot_preamble, &amp;quot;set zeroaxis&amp;quot;],&lt;br /&gt;
[gnuplot_term, ps], [gnuplot_out_file, &amp;quot;grafica.eps&amp;quot;]);&lt;/div&gt;</summary>
		<author><name>Marjimcru</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n_definida_a_trozos&amp;diff=962</id>
		<title>Estudio de una función definida a trozos</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n_definida_a_trozos&amp;diff=962"/>
		<updated>2011-04-19T12:28:51Z</updated>

		<summary type="html">&lt;p&gt;Marjimcru: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt; &amp;#039;&amp;#039;&amp;#039;Enunciado: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
 Dada la función f(x) =(1/(1+x^2) si x&amp;lt;=1 y 1+lnx si x&amp;gt;1)&lt;br /&gt;
 1. Estudiar su dominio, puntos de corte y asíntotas.&lt;br /&gt;
 2. Analizar su continuidad y su derivabilidad, calcular su función derivada primera.&lt;br /&gt;
 3. Determinar sus intervalos de crecimiento y decrecimiento, así como sus máximos&lt;br /&gt;
    y mínimos relativos.&lt;br /&gt;
 4. Representar su gráfica.&lt;br /&gt;
&lt;br /&gt;
 &amp;#039;&amp;#039;&amp;#039;Solución: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 Dominio, puntos de corte, asíntotas&lt;br /&gt;
 ( %i1) g(x):=1/(1+x^2);&lt;br /&gt;
 ( %i2) h(x):=1+log(x);&lt;br /&gt;
 El dominio de g es todo R &lt;br /&gt;
 ( %i3) solve(1+x^2=0);&lt;br /&gt;
 ( %i4) solve(1+x^2=0);&lt;br /&gt;
 ( %i5) is(1+x^2&amp;gt;0);&lt;br /&gt;
 &lt;br /&gt;
 Para estudiar los puntos de corte con el eje de las abscisas,&lt;br /&gt;
 ( %i7) solve(g(x)=0,x);&lt;br /&gt;
 ( %i8) solve(h(x)=0,x);&lt;br /&gt;
 El único punto de corte es x = 1&lt;br /&gt;
&lt;br /&gt;
 Puntos de corte con el eje vertical, cuando x = 0,&lt;br /&gt;
 ( %i9) g(0);&lt;br /&gt;
&lt;br /&gt;
 Asintotas verticales, horizontales y oblicuas&lt;br /&gt;
 En nuestro caso, la función g(x) no tiene ninguna asíntota vertical, porque su denominador&lt;br /&gt;
es siempre distinto de cero. La función h(x) tendría una asíntota vertical&lt;br /&gt;
en x = 0, debido al logaritmo:&lt;br /&gt;
( %i10) limit(h(x),x,0,plus);&lt;br /&gt;
( %o10)&lt;br /&gt;
􀀀1&lt;br /&gt;
Pero esto no afecta a f(x) ya que, en los alrededores de x = 0, esta función no toma los&lt;br /&gt;
valores de h(x), sino de g(x). Por lo tanto, f no tiene ninguna asíntota vertical.&lt;br /&gt;
Con respecto a asíntotas horizontales, tendremos que estudiar límites de f(x)&lt;br /&gt;
cuando x ! 􀀀1 (en cuyo caso f = g) y cuando x ! +1 (en cuyo caso f = h),&lt;br /&gt;
( %i11) limit(g(x),x,minf);&lt;br /&gt;
( %o11)&lt;br /&gt;
0&lt;br /&gt;
( %i12) limit(h(x),x,inf);&lt;br /&gt;
( %o12)&lt;br /&gt;
1&lt;br /&gt;
Por lo tanto, podemos concluir que:&lt;br /&gt;
f(x) no tiene ninguna asíntota vertical y tiene una asíntota horizontal (la&lt;br /&gt;
recta y = 0) cuando x ! 􀀀1.&lt;br /&gt;
Continuidad, derivabilidad&lt;br /&gt;
Las funciones g(x) y h(x) son continuas dentro de sus respectivos dominios, por&lt;br /&gt;
lo tanto f es continua salvo, eventualmente, en x = 1, el punto que divide las regiones&lt;br /&gt;
donde f toma los valores de g y de h. Pero los límites laterales de f en este&lt;br /&gt;
punto son distintos, pues&lt;br /&gt;
( %i13) limit(g(x),x,1,minus);&lt;br /&gt;
( %o13)&lt;br /&gt;
1&lt;br /&gt;
2&lt;br /&gt;
( %i14) limit(h(x),x,1,plus);&lt;br /&gt;
( %o14)&lt;br /&gt;
1&lt;br /&gt;
en consecuencia, f no es continua en x = 1 (tendrá una discontinuidad de salto).&lt;br /&gt;
128 Problema resuelto 2: estudio de una función definida a trozos&lt;br /&gt;
Además, f no es derivable en x = 1 (por no ser continua) pero sí en el resto de&lt;br /&gt;
R (pues tanto g como h lo son para valores de x que estén dentro de sus respectivos&lt;br /&gt;
dominios). Puesto que&lt;br /&gt;
( %i15) diff(g(x),x);&lt;br /&gt;
( %o15)&lt;br /&gt;
􀀀&lt;br /&gt;
2 x&lt;br /&gt;
(x2 + 1)2&lt;br /&gt;
( %i16) diff(h(x),x);&lt;br /&gt;
( %o16)&lt;br /&gt;
1&lt;br /&gt;
x&lt;br /&gt;
podemos concluir que la función derivada de f es:&lt;br /&gt;
f0(x) =&lt;br /&gt;
8&amp;gt;&amp;lt;&lt;br /&gt;
&amp;gt;:&lt;br /&gt;
􀀀&lt;br /&gt;
2x&lt;br /&gt;
(x2 + 1)2 si x &amp;lt; 1&lt;br /&gt;
1&lt;br /&gt;
x&lt;br /&gt;
si x &amp;gt; 1&lt;br /&gt;
Crecimiento, extremos relativos&lt;br /&gt;
El crecimiento de f depende del signo de la función derivada, f0(x), calculada en el&lt;br /&gt;
apartado anterior. Cuando x &amp;gt; 1, obviamente, 1&lt;br /&gt;
x &amp;gt; 0 y por lo tanto, f0(x) &amp;gt; 0. Aunque&lt;br /&gt;
es un caso tan sencillo que no merece la pena recurrir al ordenador, puede servir como&lt;br /&gt;
ilustración la forma en que se podría comprobar lo anterior, utilizando los comandos&lt;br /&gt;
“assume” e “is”:&lt;br /&gt;
( %i22) assume(x&amp;gt;1);&lt;br /&gt;
( %o22)&lt;br /&gt;
[x &amp;gt; 1]&lt;br /&gt;
( %i23) is(1/x&amp;gt;0);&lt;br /&gt;
( %o23)&lt;br /&gt;
true&lt;br /&gt;
cuando x &amp;lt; 1, el asunto es diferente, pues el signo de f0(x) dependerá de la expresión&lt;br /&gt;
􀀀&lt;br /&gt;
2x&lt;br /&gt;
(x2 + 1)2 ; (B.1)&lt;br /&gt;
que depende del signo de 􀀀2x (puesto que el denominador es siempre estrictamente&lt;br /&gt;
positivo), siendo, negativo cuando x &amp;gt; 0 y positivo en caso contrario.&lt;br /&gt;
Por lo tanto&lt;br /&gt;
129&lt;br /&gt;
f es creciente en (􀀀1; 0) [ (1;+1) y decreciente en (0; 1).&lt;br /&gt;
Para hallar máximos y mínimos relativos, calculemos los puntos críticos de f:&lt;br /&gt;
( %i24) solve( diff(g(x),x)=0, x);&lt;br /&gt;
( %o24)&lt;br /&gt;
[x = 0]&lt;br /&gt;
( %i25) solve( diff(h(x),x)=0, x);&lt;br /&gt;
( %o25)&lt;br /&gt;
[]&lt;br /&gt;
Esto es, h no tiene puntos críticos y g tiene un punto crítico, x = 0. Cuando x = 0&lt;br /&gt;
la función f es igual a g, luego éste es un punto crítico de f. Para saber si se trata de&lt;br /&gt;
un máximo o un mínimo, podemos estudiar el signo de la segunda derivada:&lt;br /&gt;
( %i26) diff(g(x),x,2);&lt;br /&gt;
( %o26)&lt;br /&gt;
8 x2&lt;br /&gt;
(x2 + 1)3 􀀀&lt;br /&gt;
2&lt;br /&gt;
(x2 + 1)2&lt;br /&gt;
( %i27) %,x=0;&lt;br /&gt;
( %o27)&lt;br /&gt;
􀀀2&lt;br /&gt;
Por lo tanto, f00(0) = g00(0) = 􀀀2 &amp;lt; 0, es decir, f tiene un máximo relativo en x = 0.&lt;br /&gt;
Representación gráfica&lt;br /&gt;
Para representar la gráfica de f, podemos definir:&lt;br /&gt;
( %i33) f(x):= if(x&amp;lt;1) then g(x) else h(x);&lt;br /&gt;
( %o33)&lt;br /&gt;
f (x) := if x &amp;lt; 1 then g (x) else h (x)&lt;br /&gt;
El problema es que Maxima no está preparado para representar directamente este tipo&lt;br /&gt;
de funciones, siendo necesario encapsular f(x) en una expresión de la forma “’(f(x))”.&lt;br /&gt;
( %i34) plot2d(f(x),[x,-5,5]);&lt;br /&gt;
Maxima was unable to evaluate the predicate:&lt;br /&gt;
** error while printing error message **&lt;br /&gt;
Maxima was unable to evaluate the predicate:~%~M&lt;br /&gt;
#0: f(x=x)&lt;br /&gt;
- an error. Quitting. To debug this try debugmode(true);&lt;br /&gt;
130 Problema resuelto 2: estudio de una función definida a trozos&lt;br /&gt;
( %i35) plot2d(’(f(x)),[x,-5,5], [gnuplot_preamble, &amp;quot;set zeroaxis&amp;quot;],&lt;br /&gt;
[gnuplot_term, ps], [gnuplot_out_file, &amp;quot;grafica.eps&amp;quot;]);&lt;/div&gt;</summary>
		<author><name>Marjimcru</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n_definida_a_trozos&amp;diff=961</id>
		<title>Estudio de una función definida a trozos</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n_definida_a_trozos&amp;diff=961"/>
		<updated>2011-04-19T12:26:37Z</updated>

		<summary type="html">&lt;p&gt;Marjimcru: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt; &amp;#039;&amp;#039;&amp;#039;Enunciado: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
 Dada la función f(x) =(1/(1+x^2) si x&amp;lt;=1 y 1+lnx si x&amp;gt;1)&lt;br /&gt;
 1. Estudiar su dominio, puntos de corte y asíntotas.&lt;br /&gt;
 2. Analizar su continuidad y su derivabilidad, calcular su función derivada primera.&lt;br /&gt;
 3. Determinar sus intervalos de crecimiento y decrecimiento, así como sus máximos&lt;br /&gt;
    y mínimos relativos.&lt;br /&gt;
 4. Representar su gráfica.&lt;br /&gt;
&lt;br /&gt;
 &amp;#039;&amp;#039;&amp;#039;Solución: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 Dominio, puntos de corte, asíntotas&lt;br /&gt;
 ( %i1) g(x):=1/(1+x^2);&lt;br /&gt;
 ( %i2) h(x):=1+log(x);&lt;br /&gt;
 El dominio de g es todo R &lt;br /&gt;
 ( %i3) solve(1+x^2=0);&lt;br /&gt;
 ( %i4) solve(1+x^2=0);&lt;br /&gt;
 ( %i5) is(1+x^2&amp;gt;0);&lt;br /&gt;
&lt;br /&gt;
Por otra parte, la función h(x) solamente está bien definida para aquellos valores de&lt;br /&gt;
x para los que tiene sentido log(x), es decir, el dominio de h es fx 2 R = x &amp;gt; 0g. Luego&lt;br /&gt;
El dominio de la función f(x) es todo R, pues cuando x � 1 es igual a g, que&lt;br /&gt;
está perfectamente definida, y cuando x &amp;gt; 1 coincide con h(x), que no tiene&lt;br /&gt;
ningún problema para estos valores de x.&lt;br /&gt;
Para estudiar los puntos de corte con el eje de las abscisas, planteamos&lt;br /&gt;
( %i7) solve(g(x)=0,x);&lt;br /&gt;
( %o7)&lt;br /&gt;
[]&lt;br /&gt;
( %i8) solve(h(x)=0,x);&lt;br /&gt;
( %o8) �&lt;br /&gt;
x = e􀀀1�&lt;br /&gt;
El único punto de corte es x = 1&lt;br /&gt;
e . En cuanto a posibles puntos de corte con el eje&lt;br /&gt;
vertical, cuando x = 0 nuestra función toma el valor f(0) = g(0) = 1:&lt;br /&gt;
( %i9) g(0);&lt;br /&gt;
( %o9)&lt;br /&gt;
1&lt;br /&gt;
En definitiva:&lt;br /&gt;
Los puntos de corte de f(x) son (0; 1) y ( 1&lt;br /&gt;
e ; 0).&lt;br /&gt;
127&lt;br /&gt;
En nuestro caso, la función g(x) no tiene ninguna asíntota vertical, porque su denominador&lt;br /&gt;
es siempre distinto de cero. La función h(x) tendría una asíntota vertical&lt;br /&gt;
en x = 0, debido al logaritmo:&lt;br /&gt;
( %i10) limit(h(x),x,0,plus);&lt;br /&gt;
( %o10)&lt;br /&gt;
􀀀1&lt;br /&gt;
Pero esto no afecta a f(x) ya que, en los alrededores de x = 0, esta función no toma los&lt;br /&gt;
valores de h(x), sino de g(x). Por lo tanto, f no tiene ninguna asíntota vertical.&lt;br /&gt;
Con respecto a asíntotas horizontales, tendremos que estudiar límites de f(x)&lt;br /&gt;
cuando x ! 􀀀1 (en cuyo caso f = g) y cuando x ! +1 (en cuyo caso f = h),&lt;br /&gt;
( %i11) limit(g(x),x,minf);&lt;br /&gt;
( %o11)&lt;br /&gt;
0&lt;br /&gt;
( %i12) limit(h(x),x,inf);&lt;br /&gt;
( %o12)&lt;br /&gt;
1&lt;br /&gt;
Por lo tanto, podemos concluir que:&lt;br /&gt;
f(x) no tiene ninguna asíntota vertical y tiene una asíntota horizontal (la&lt;br /&gt;
recta y = 0) cuando x ! 􀀀1.&lt;br /&gt;
Continuidad, derivabilidad&lt;br /&gt;
Las funciones g(x) y h(x) son continuas dentro de sus respectivos dominios, por&lt;br /&gt;
lo tanto f es continua salvo, eventualmente, en x = 1, el punto que divide las regiones&lt;br /&gt;
donde f toma los valores de g y de h. Pero los límites laterales de f en este&lt;br /&gt;
punto son distintos, pues&lt;br /&gt;
( %i13) limit(g(x),x,1,minus);&lt;br /&gt;
( %o13)&lt;br /&gt;
1&lt;br /&gt;
2&lt;br /&gt;
( %i14) limit(h(x),x,1,plus);&lt;br /&gt;
( %o14)&lt;br /&gt;
1&lt;br /&gt;
en consecuencia, f no es continua en x = 1 (tendrá una discontinuidad de salto).&lt;br /&gt;
128 Problema resuelto 2: estudio de una función definida a trozos&lt;br /&gt;
Además, f no es derivable en x = 1 (por no ser continua) pero sí en el resto de&lt;br /&gt;
R (pues tanto g como h lo son para valores de x que estén dentro de sus respectivos&lt;br /&gt;
dominios). Puesto que&lt;br /&gt;
( %i15) diff(g(x),x);&lt;br /&gt;
( %o15)&lt;br /&gt;
􀀀&lt;br /&gt;
2 x&lt;br /&gt;
(x2 + 1)2&lt;br /&gt;
( %i16) diff(h(x),x);&lt;br /&gt;
( %o16)&lt;br /&gt;
1&lt;br /&gt;
x&lt;br /&gt;
podemos concluir que la función derivada de f es:&lt;br /&gt;
f0(x) =&lt;br /&gt;
8&amp;gt;&amp;lt;&lt;br /&gt;
&amp;gt;:&lt;br /&gt;
􀀀&lt;br /&gt;
2x&lt;br /&gt;
(x2 + 1)2 si x &amp;lt; 1&lt;br /&gt;
1&lt;br /&gt;
x&lt;br /&gt;
si x &amp;gt; 1&lt;br /&gt;
Crecimiento, extremos relativos&lt;br /&gt;
El crecimiento de f depende del signo de la función derivada, f0(x), calculada en el&lt;br /&gt;
apartado anterior. Cuando x &amp;gt; 1, obviamente, 1&lt;br /&gt;
x &amp;gt; 0 y por lo tanto, f0(x) &amp;gt; 0. Aunque&lt;br /&gt;
es un caso tan sencillo que no merece la pena recurrir al ordenador, puede servir como&lt;br /&gt;
ilustración la forma en que se podría comprobar lo anterior, utilizando los comandos&lt;br /&gt;
“assume” e “is”:&lt;br /&gt;
( %i22) assume(x&amp;gt;1);&lt;br /&gt;
( %o22)&lt;br /&gt;
[x &amp;gt; 1]&lt;br /&gt;
( %i23) is(1/x&amp;gt;0);&lt;br /&gt;
( %o23)&lt;br /&gt;
true&lt;br /&gt;
cuando x &amp;lt; 1, el asunto es diferente, pues el signo de f0(x) dependerá de la expresión&lt;br /&gt;
􀀀&lt;br /&gt;
2x&lt;br /&gt;
(x2 + 1)2 ; (B.1)&lt;br /&gt;
que depende del signo de 􀀀2x (puesto que el denominador es siempre estrictamente&lt;br /&gt;
positivo), siendo, negativo cuando x &amp;gt; 0 y positivo en caso contrario.&lt;br /&gt;
Por lo tanto&lt;br /&gt;
129&lt;br /&gt;
f es creciente en (􀀀1; 0) [ (1;+1) y decreciente en (0; 1).&lt;br /&gt;
Para hallar máximos y mínimos relativos, calculemos los puntos críticos de f:&lt;br /&gt;
( %i24) solve( diff(g(x),x)=0, x);&lt;br /&gt;
( %o24)&lt;br /&gt;
[x = 0]&lt;br /&gt;
( %i25) solve( diff(h(x),x)=0, x);&lt;br /&gt;
( %o25)&lt;br /&gt;
[]&lt;br /&gt;
Esto es, h no tiene puntos críticos y g tiene un punto crítico, x = 0. Cuando x = 0&lt;br /&gt;
la función f es igual a g, luego éste es un punto crítico de f. Para saber si se trata de&lt;br /&gt;
un máximo o un mínimo, podemos estudiar el signo de la segunda derivada:&lt;br /&gt;
( %i26) diff(g(x),x,2);&lt;br /&gt;
( %o26)&lt;br /&gt;
8 x2&lt;br /&gt;
(x2 + 1)3 􀀀&lt;br /&gt;
2&lt;br /&gt;
(x2 + 1)2&lt;br /&gt;
( %i27) %,x=0;&lt;br /&gt;
( %o27)&lt;br /&gt;
􀀀2&lt;br /&gt;
Por lo tanto, f00(0) = g00(0) = 􀀀2 &amp;lt; 0, es decir, f tiene un máximo relativo en x = 0.&lt;br /&gt;
Representación gráfica&lt;br /&gt;
Para representar la gráfica de f, podemos definir:&lt;br /&gt;
( %i33) f(x):= if(x&amp;lt;1) then g(x) else h(x);&lt;br /&gt;
( %o33)&lt;br /&gt;
f (x) := if x &amp;lt; 1 then g (x) else h (x)&lt;br /&gt;
El problema es que Maxima no está preparado para representar directamente este tipo&lt;br /&gt;
de funciones, siendo necesario encapsular f(x) en una expresión de la forma “’(f(x))”.&lt;br /&gt;
( %i34) plot2d(f(x),[x,-5,5]);&lt;br /&gt;
Maxima was unable to evaluate the predicate:&lt;br /&gt;
** error while printing error message **&lt;br /&gt;
Maxima was unable to evaluate the predicate:~%~M&lt;br /&gt;
#0: f(x=x)&lt;br /&gt;
- an error. Quitting. To debug this try debugmode(true);&lt;br /&gt;
130 Problema resuelto 2: estudio de una función definida a trozos&lt;br /&gt;
( %i35) plot2d(’(f(x)),[x,-5,5], [gnuplot_preamble, &amp;quot;set zeroaxis&amp;quot;],&lt;br /&gt;
[gnuplot_term, ps], [gnuplot_out_file, &amp;quot;grafica.eps&amp;quot;]);&lt;/div&gt;</summary>
		<author><name>Marjimcru</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n_definida_a_trozos&amp;diff=960</id>
		<title>Estudio de una función definida a trozos</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n_definida_a_trozos&amp;diff=960"/>
		<updated>2011-04-19T12:24:54Z</updated>

		<summary type="html">&lt;p&gt;Marjimcru: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt; &amp;#039;&amp;#039;&amp;#039;Enunciado: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
 Dada la función f(x) =(1/(1+x^2) si x&amp;lt;=1 y 1+lnx si x&amp;gt;1)&lt;br /&gt;
 1. Estudiar su dominio, puntos de corte y asíntotas.&lt;br /&gt;
 2. Analizar su continuidad y su derivabilidad, calcular su función derivada primera.&lt;br /&gt;
 3. Determinar sus intervalos de crecimiento y decrecimiento, así como sus máximos&lt;br /&gt;
    y mínimos relativos.&lt;br /&gt;
 4. Representar su gráfica.&lt;br /&gt;
&lt;br /&gt;
 &amp;#039;&amp;#039;&amp;#039;Solución: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
Dominio, puntos de corte, asíntotas&lt;br /&gt;
Definimos:&lt;br /&gt;
( %i1) g(x):=1/(1+x^2);&lt;br /&gt;
( %o1)&lt;br /&gt;
g (x) :=&lt;br /&gt;
1&lt;br /&gt;
1 + x2&lt;br /&gt;
( %i2) h(x):=1+log(x);&lt;br /&gt;
( %o2)&lt;br /&gt;
h (x) := 1 + log x&lt;br /&gt;
El dominio de g es todo R pues, evidentemente, 1 + x2 6= 0 8x 2 R. Pero, por&lt;br /&gt;
si hubiera alguna duda, el alumno podría utilizar Maxima para comprobar que no&lt;br /&gt;
existe ninguna solución real (todas sus soluciones son imaginarios puros):&lt;br /&gt;
( %i3) solve(1+x^2=0);&lt;br /&gt;
126 Problema resuelto 2: estudio de una función definida a trozos&lt;br /&gt;
( %o3)&lt;br /&gt;
[x = 􀀀i; x = i]&lt;br /&gt;
( %i4) solve(1+x^2=0);&lt;br /&gt;
( %o4)&lt;br /&gt;
[x = 􀀀i; x = i]&lt;br /&gt;
Maxima es incluso capaz de asegurarnos que 1+x2 es estrictamente positivo (independientemente&lt;br /&gt;
del valor de x) si utilizamos la función is:&lt;br /&gt;
( %i5) is(1+x^2&amp;gt;0);&lt;br /&gt;
( %o5)&lt;br /&gt;
true&lt;br /&gt;
Por otra parte, la función h(x) solamente está bien definida para aquellos valores de&lt;br /&gt;
x para los que tiene sentido log(x), es decir, el dominio de h es fx 2 R = x &amp;gt; 0g. Luego&lt;br /&gt;
El dominio de la función f(x) es todo R, pues cuando x � 1 es igual a g, que&lt;br /&gt;
está perfectamente definida, y cuando x &amp;gt; 1 coincide con h(x), que no tiene&lt;br /&gt;
ningún problema para estos valores de x.&lt;br /&gt;
Para estudiar los puntos de corte con el eje de las abscisas, planteamos&lt;br /&gt;
( %i7) solve(g(x)=0,x);&lt;br /&gt;
( %o7)&lt;br /&gt;
[]&lt;br /&gt;
( %i8) solve(h(x)=0,x);&lt;br /&gt;
( %o8) �&lt;br /&gt;
x = e􀀀1�&lt;br /&gt;
El único punto de corte es x = 1&lt;br /&gt;
e . En cuanto a posibles puntos de corte con el eje&lt;br /&gt;
vertical, cuando x = 0 nuestra función toma el valor f(0) = g(0) = 1:&lt;br /&gt;
( %i9) g(0);&lt;br /&gt;
( %o9)&lt;br /&gt;
1&lt;br /&gt;
En definitiva:&lt;br /&gt;
Los puntos de corte de f(x) son (0; 1) y ( 1&lt;br /&gt;
e ; 0).&lt;br /&gt;
127&lt;br /&gt;
En nuestro caso, la función g(x) no tiene ninguna asíntota vertical, porque su denominador&lt;br /&gt;
es siempre distinto de cero. La función h(x) tendría una asíntota vertical&lt;br /&gt;
en x = 0, debido al logaritmo:&lt;br /&gt;
( %i10) limit(h(x),x,0,plus);&lt;br /&gt;
( %o10)&lt;br /&gt;
􀀀1&lt;br /&gt;
Pero esto no afecta a f(x) ya que, en los alrededores de x = 0, esta función no toma los&lt;br /&gt;
valores de h(x), sino de g(x). Por lo tanto, f no tiene ninguna asíntota vertical.&lt;br /&gt;
Con respecto a asíntotas horizontales, tendremos que estudiar límites de f(x)&lt;br /&gt;
cuando x ! 􀀀1 (en cuyo caso f = g) y cuando x ! +1 (en cuyo caso f = h),&lt;br /&gt;
( %i11) limit(g(x),x,minf);&lt;br /&gt;
( %o11)&lt;br /&gt;
0&lt;br /&gt;
( %i12) limit(h(x),x,inf);&lt;br /&gt;
( %o12)&lt;br /&gt;
1&lt;br /&gt;
Por lo tanto, podemos concluir que:&lt;br /&gt;
f(x) no tiene ninguna asíntota vertical y tiene una asíntota horizontal (la&lt;br /&gt;
recta y = 0) cuando x ! 􀀀1.&lt;br /&gt;
Continuidad, derivabilidad&lt;br /&gt;
Las funciones g(x) y h(x) son continuas dentro de sus respectivos dominios, por&lt;br /&gt;
lo tanto f es continua salvo, eventualmente, en x = 1, el punto que divide las regiones&lt;br /&gt;
donde f toma los valores de g y de h. Pero los límites laterales de f en este&lt;br /&gt;
punto son distintos, pues&lt;br /&gt;
( %i13) limit(g(x),x,1,minus);&lt;br /&gt;
( %o13)&lt;br /&gt;
1&lt;br /&gt;
2&lt;br /&gt;
( %i14) limit(h(x),x,1,plus);&lt;br /&gt;
( %o14)&lt;br /&gt;
1&lt;br /&gt;
en consecuencia, f no es continua en x = 1 (tendrá una discontinuidad de salto).&lt;br /&gt;
128 Problema resuelto 2: estudio de una función definida a trozos&lt;br /&gt;
Además, f no es derivable en x = 1 (por no ser continua) pero sí en el resto de&lt;br /&gt;
R (pues tanto g como h lo son para valores de x que estén dentro de sus respectivos&lt;br /&gt;
dominios). Puesto que&lt;br /&gt;
( %i15) diff(g(x),x);&lt;br /&gt;
( %o15)&lt;br /&gt;
􀀀&lt;br /&gt;
2 x&lt;br /&gt;
(x2 + 1)2&lt;br /&gt;
( %i16) diff(h(x),x);&lt;br /&gt;
( %o16)&lt;br /&gt;
1&lt;br /&gt;
x&lt;br /&gt;
podemos concluir que la función derivada de f es:&lt;br /&gt;
f0(x) =&lt;br /&gt;
8&amp;gt;&amp;lt;&lt;br /&gt;
&amp;gt;:&lt;br /&gt;
􀀀&lt;br /&gt;
2x&lt;br /&gt;
(x2 + 1)2 si x &amp;lt; 1&lt;br /&gt;
1&lt;br /&gt;
x&lt;br /&gt;
si x &amp;gt; 1&lt;br /&gt;
Crecimiento, extremos relativos&lt;br /&gt;
El crecimiento de f depende del signo de la función derivada, f0(x), calculada en el&lt;br /&gt;
apartado anterior. Cuando x &amp;gt; 1, obviamente, 1&lt;br /&gt;
x &amp;gt; 0 y por lo tanto, f0(x) &amp;gt; 0. Aunque&lt;br /&gt;
es un caso tan sencillo que no merece la pena recurrir al ordenador, puede servir como&lt;br /&gt;
ilustración la forma en que se podría comprobar lo anterior, utilizando los comandos&lt;br /&gt;
“assume” e “is”:&lt;br /&gt;
( %i22) assume(x&amp;gt;1);&lt;br /&gt;
( %o22)&lt;br /&gt;
[x &amp;gt; 1]&lt;br /&gt;
( %i23) is(1/x&amp;gt;0);&lt;br /&gt;
( %o23)&lt;br /&gt;
true&lt;br /&gt;
cuando x &amp;lt; 1, el asunto es diferente, pues el signo de f0(x) dependerá de la expresión&lt;br /&gt;
􀀀&lt;br /&gt;
2x&lt;br /&gt;
(x2 + 1)2 ; (B.1)&lt;br /&gt;
que depende del signo de 􀀀2x (puesto que el denominador es siempre estrictamente&lt;br /&gt;
positivo), siendo, negativo cuando x &amp;gt; 0 y positivo en caso contrario.&lt;br /&gt;
Por lo tanto&lt;br /&gt;
129&lt;br /&gt;
f es creciente en (􀀀1; 0) [ (1;+1) y decreciente en (0; 1).&lt;br /&gt;
Para hallar máximos y mínimos relativos, calculemos los puntos críticos de f:&lt;br /&gt;
( %i24) solve( diff(g(x),x)=0, x);&lt;br /&gt;
( %o24)&lt;br /&gt;
[x = 0]&lt;br /&gt;
( %i25) solve( diff(h(x),x)=0, x);&lt;br /&gt;
( %o25)&lt;br /&gt;
[]&lt;br /&gt;
Esto es, h no tiene puntos críticos y g tiene un punto crítico, x = 0. Cuando x = 0&lt;br /&gt;
la función f es igual a g, luego éste es un punto crítico de f. Para saber si se trata de&lt;br /&gt;
un máximo o un mínimo, podemos estudiar el signo de la segunda derivada:&lt;br /&gt;
( %i26) diff(g(x),x,2);&lt;br /&gt;
( %o26)&lt;br /&gt;
8 x2&lt;br /&gt;
(x2 + 1)3 􀀀&lt;br /&gt;
2&lt;br /&gt;
(x2 + 1)2&lt;br /&gt;
( %i27) %,x=0;&lt;br /&gt;
( %o27)&lt;br /&gt;
􀀀2&lt;br /&gt;
Por lo tanto, f00(0) = g00(0) = 􀀀2 &amp;lt; 0, es decir, f tiene un máximo relativo en x = 0.&lt;br /&gt;
Representación gráfica&lt;br /&gt;
Para representar la gráfica de f, podemos definir:&lt;br /&gt;
( %i33) f(x):= if(x&amp;lt;1) then g(x) else h(x);&lt;br /&gt;
( %o33)&lt;br /&gt;
f (x) := if x &amp;lt; 1 then g (x) else h (x)&lt;br /&gt;
El problema es que Maxima no está preparado para representar directamente este tipo&lt;br /&gt;
de funciones, siendo necesario encapsular f(x) en una expresión de la forma “’(f(x))”.&lt;br /&gt;
( %i34) plot2d(f(x),[x,-5,5]);&lt;br /&gt;
Maxima was unable to evaluate the predicate:&lt;br /&gt;
** error while printing error message **&lt;br /&gt;
Maxima was unable to evaluate the predicate:~%~M&lt;br /&gt;
#0: f(x=x)&lt;br /&gt;
- an error. Quitting. To debug this try debugmode(true);&lt;br /&gt;
130 Problema resuelto 2: estudio de una función definida a trozos&lt;br /&gt;
( %i35) plot2d(’(f(x)),[x,-5,5], [gnuplot_preamble, &amp;quot;set zeroaxis&amp;quot;],&lt;br /&gt;
[gnuplot_term, ps], [gnuplot_out_file, &amp;quot;grafica.eps&amp;quot;]);&lt;/div&gt;</summary>
		<author><name>Marjimcru</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n_definida_a_trozos&amp;diff=959</id>
		<title>Estudio de una función definida a trozos</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n_definida_a_trozos&amp;diff=959"/>
		<updated>2011-04-19T12:24:06Z</updated>

		<summary type="html">&lt;p&gt;Marjimcru: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt; &amp;#039;&amp;#039;&amp;#039;Enunciado: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
 Dada la función f(x) =(1/(1+x^2) si x&amp;lt;=1 y 1+lnx si x&amp;gt;1)&lt;br /&gt;
 1. Estudiar su dominio, puntos de corte y asíntotas.&lt;br /&gt;
2. Analizar su continuidad y su derivabilidad, calcular su función derivada primera.&lt;br /&gt;
3. Determinar sus intervalos de crecimiento y decrecimiento, así como sus máximos&lt;br /&gt;
y mínimos relativos.&lt;br /&gt;
4. Representar su gráfica.&lt;br /&gt;
Dominio, puntos de corte, asíntotas&lt;br /&gt;
Definimos:&lt;br /&gt;
( %i1) g(x):=1/(1+x^2);&lt;br /&gt;
( %o1)&lt;br /&gt;
g (x) :=&lt;br /&gt;
1&lt;br /&gt;
1 + x2&lt;br /&gt;
( %i2) h(x):=1+log(x);&lt;br /&gt;
( %o2)&lt;br /&gt;
h (x) := 1 + log x&lt;br /&gt;
El dominio de g es todo R pues, evidentemente, 1 + x2 6= 0 8x 2 R. Pero, por&lt;br /&gt;
si hubiera alguna duda, el alumno podría utilizar Maxima para comprobar que no&lt;br /&gt;
existe ninguna solución real (todas sus soluciones son imaginarios puros):&lt;br /&gt;
( %i3) solve(1+x^2=0);&lt;br /&gt;
126 Problema resuelto 2: estudio de una función definida a trozos&lt;br /&gt;
( %o3)&lt;br /&gt;
[x = 􀀀i; x = i]&lt;br /&gt;
( %i4) solve(1+x^2=0);&lt;br /&gt;
( %o4)&lt;br /&gt;
[x = 􀀀i; x = i]&lt;br /&gt;
Maxima es incluso capaz de asegurarnos que 1+x2 es estrictamente positivo (independientemente&lt;br /&gt;
del valor de x) si utilizamos la función is:&lt;br /&gt;
( %i5) is(1+x^2&amp;gt;0);&lt;br /&gt;
( %o5)&lt;br /&gt;
true&lt;br /&gt;
Por otra parte, la función h(x) solamente está bien definida para aquellos valores de&lt;br /&gt;
x para los que tiene sentido log(x), es decir, el dominio de h es fx 2 R = x &amp;gt; 0g. Luego&lt;br /&gt;
El dominio de la función f(x) es todo R, pues cuando x � 1 es igual a g, que&lt;br /&gt;
está perfectamente definida, y cuando x &amp;gt; 1 coincide con h(x), que no tiene&lt;br /&gt;
ningún problema para estos valores de x.&lt;br /&gt;
Para estudiar los puntos de corte con el eje de las abscisas, planteamos&lt;br /&gt;
( %i7) solve(g(x)=0,x);&lt;br /&gt;
( %o7)&lt;br /&gt;
[]&lt;br /&gt;
( %i8) solve(h(x)=0,x);&lt;br /&gt;
( %o8) �&lt;br /&gt;
x = e􀀀1�&lt;br /&gt;
El único punto de corte es x = 1&lt;br /&gt;
e . En cuanto a posibles puntos de corte con el eje&lt;br /&gt;
vertical, cuando x = 0 nuestra función toma el valor f(0) = g(0) = 1:&lt;br /&gt;
( %i9) g(0);&lt;br /&gt;
( %o9)&lt;br /&gt;
1&lt;br /&gt;
En definitiva:&lt;br /&gt;
Los puntos de corte de f(x) son (0; 1) y ( 1&lt;br /&gt;
e ; 0).&lt;br /&gt;
127&lt;br /&gt;
En nuestro caso, la función g(x) no tiene ninguna asíntota vertical, porque su denominador&lt;br /&gt;
es siempre distinto de cero. La función h(x) tendría una asíntota vertical&lt;br /&gt;
en x = 0, debido al logaritmo:&lt;br /&gt;
( %i10) limit(h(x),x,0,plus);&lt;br /&gt;
( %o10)&lt;br /&gt;
􀀀1&lt;br /&gt;
Pero esto no afecta a f(x) ya que, en los alrededores de x = 0, esta función no toma los&lt;br /&gt;
valores de h(x), sino de g(x). Por lo tanto, f no tiene ninguna asíntota vertical.&lt;br /&gt;
Con respecto a asíntotas horizontales, tendremos que estudiar límites de f(x)&lt;br /&gt;
cuando x ! 􀀀1 (en cuyo caso f = g) y cuando x ! +1 (en cuyo caso f = h),&lt;br /&gt;
( %i11) limit(g(x),x,minf);&lt;br /&gt;
( %o11)&lt;br /&gt;
0&lt;br /&gt;
( %i12) limit(h(x),x,inf);&lt;br /&gt;
( %o12)&lt;br /&gt;
1&lt;br /&gt;
Por lo tanto, podemos concluir que:&lt;br /&gt;
f(x) no tiene ninguna asíntota vertical y tiene una asíntota horizontal (la&lt;br /&gt;
recta y = 0) cuando x ! 􀀀1.&lt;br /&gt;
Continuidad, derivabilidad&lt;br /&gt;
Las funciones g(x) y h(x) son continuas dentro de sus respectivos dominios, por&lt;br /&gt;
lo tanto f es continua salvo, eventualmente, en x = 1, el punto que divide las regiones&lt;br /&gt;
donde f toma los valores de g y de h. Pero los límites laterales de f en este&lt;br /&gt;
punto son distintos, pues&lt;br /&gt;
( %i13) limit(g(x),x,1,minus);&lt;br /&gt;
( %o13)&lt;br /&gt;
1&lt;br /&gt;
2&lt;br /&gt;
( %i14) limit(h(x),x,1,plus);&lt;br /&gt;
( %o14)&lt;br /&gt;
1&lt;br /&gt;
en consecuencia, f no es continua en x = 1 (tendrá una discontinuidad de salto).&lt;br /&gt;
128 Problema resuelto 2: estudio de una función definida a trozos&lt;br /&gt;
Además, f no es derivable en x = 1 (por no ser continua) pero sí en el resto de&lt;br /&gt;
R (pues tanto g como h lo son para valores de x que estén dentro de sus respectivos&lt;br /&gt;
dominios). Puesto que&lt;br /&gt;
( %i15) diff(g(x),x);&lt;br /&gt;
( %o15)&lt;br /&gt;
􀀀&lt;br /&gt;
2 x&lt;br /&gt;
(x2 + 1)2&lt;br /&gt;
( %i16) diff(h(x),x);&lt;br /&gt;
( %o16)&lt;br /&gt;
1&lt;br /&gt;
x&lt;br /&gt;
podemos concluir que la función derivada de f es:&lt;br /&gt;
f0(x) =&lt;br /&gt;
8&amp;gt;&amp;lt;&lt;br /&gt;
&amp;gt;:&lt;br /&gt;
􀀀&lt;br /&gt;
2x&lt;br /&gt;
(x2 + 1)2 si x &amp;lt; 1&lt;br /&gt;
1&lt;br /&gt;
x&lt;br /&gt;
si x &amp;gt; 1&lt;br /&gt;
Crecimiento, extremos relativos&lt;br /&gt;
El crecimiento de f depende del signo de la función derivada, f0(x), calculada en el&lt;br /&gt;
apartado anterior. Cuando x &amp;gt; 1, obviamente, 1&lt;br /&gt;
x &amp;gt; 0 y por lo tanto, f0(x) &amp;gt; 0. Aunque&lt;br /&gt;
es un caso tan sencillo que no merece la pena recurrir al ordenador, puede servir como&lt;br /&gt;
ilustración la forma en que se podría comprobar lo anterior, utilizando los comandos&lt;br /&gt;
“assume” e “is”:&lt;br /&gt;
( %i22) assume(x&amp;gt;1);&lt;br /&gt;
( %o22)&lt;br /&gt;
[x &amp;gt; 1]&lt;br /&gt;
( %i23) is(1/x&amp;gt;0);&lt;br /&gt;
( %o23)&lt;br /&gt;
true&lt;br /&gt;
cuando x &amp;lt; 1, el asunto es diferente, pues el signo de f0(x) dependerá de la expresión&lt;br /&gt;
􀀀&lt;br /&gt;
2x&lt;br /&gt;
(x2 + 1)2 ; (B.1)&lt;br /&gt;
que depende del signo de 􀀀2x (puesto que el denominador es siempre estrictamente&lt;br /&gt;
positivo), siendo, negativo cuando x &amp;gt; 0 y positivo en caso contrario.&lt;br /&gt;
Por lo tanto&lt;br /&gt;
129&lt;br /&gt;
f es creciente en (􀀀1; 0) [ (1;+1) y decreciente en (0; 1).&lt;br /&gt;
Para hallar máximos y mínimos relativos, calculemos los puntos críticos de f:&lt;br /&gt;
( %i24) solve( diff(g(x),x)=0, x);&lt;br /&gt;
( %o24)&lt;br /&gt;
[x = 0]&lt;br /&gt;
( %i25) solve( diff(h(x),x)=0, x);&lt;br /&gt;
( %o25)&lt;br /&gt;
[]&lt;br /&gt;
Esto es, h no tiene puntos críticos y g tiene un punto crítico, x = 0. Cuando x = 0&lt;br /&gt;
la función f es igual a g, luego éste es un punto crítico de f. Para saber si se trata de&lt;br /&gt;
un máximo o un mínimo, podemos estudiar el signo de la segunda derivada:&lt;br /&gt;
( %i26) diff(g(x),x,2);&lt;br /&gt;
( %o26)&lt;br /&gt;
8 x2&lt;br /&gt;
(x2 + 1)3 􀀀&lt;br /&gt;
2&lt;br /&gt;
(x2 + 1)2&lt;br /&gt;
( %i27) %,x=0;&lt;br /&gt;
( %o27)&lt;br /&gt;
􀀀2&lt;br /&gt;
Por lo tanto, f00(0) = g00(0) = 􀀀2 &amp;lt; 0, es decir, f tiene un máximo relativo en x = 0.&lt;br /&gt;
Representación gráfica&lt;br /&gt;
Para representar la gráfica de f, podemos definir:&lt;br /&gt;
( %i33) f(x):= if(x&amp;lt;1) then g(x) else h(x);&lt;br /&gt;
( %o33)&lt;br /&gt;
f (x) := if x &amp;lt; 1 then g (x) else h (x)&lt;br /&gt;
El problema es que Maxima no está preparado para representar directamente este tipo&lt;br /&gt;
de funciones, siendo necesario encapsular f(x) en una expresión de la forma “’(f(x))”.&lt;br /&gt;
( %i34) plot2d(f(x),[x,-5,5]);&lt;br /&gt;
Maxima was unable to evaluate the predicate:&lt;br /&gt;
** error while printing error message **&lt;br /&gt;
Maxima was unable to evaluate the predicate:~%~M&lt;br /&gt;
#0: f(x=x)&lt;br /&gt;
- an error. Quitting. To debug this try debugmode(true);&lt;br /&gt;
130 Problema resuelto 2: estudio de una función definida a trozos&lt;br /&gt;
( %i35) plot2d(’(f(x)),[x,-5,5], [gnuplot_preamble, &amp;quot;set zeroaxis&amp;quot;],&lt;br /&gt;
[gnuplot_term, ps], [gnuplot_out_file, &amp;quot;grafica.eps&amp;quot;]);&lt;/div&gt;</summary>
		<author><name>Marjimcru</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n_definida_a_trozos&amp;diff=958</id>
		<title>Estudio de una función definida a trozos</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n_definida_a_trozos&amp;diff=958"/>
		<updated>2011-04-19T12:22:40Z</updated>

		<summary type="html">&lt;p&gt;Marjimcru: Página creada con &amp;#039; &amp;#039;&amp;#039;&amp;#039;Enunciado: &amp;#039;&amp;#039;&amp;#039;   Dada la función f(x) = ( 1 1+x2 si x � 1 1 + ln x si x &amp;gt; 1 1. Estudiar su dominio, puntos de corte y asíntotas. 2. Analizar su continuidad y su derivabi…&amp;#039;&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt; &amp;#039;&amp;#039;&amp;#039;Enunciado: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
 Dada la función&lt;br /&gt;
f(x) =&lt;br /&gt;
(&lt;br /&gt;
1&lt;br /&gt;
1+x2 si x � 1&lt;br /&gt;
1 + ln x si x &amp;gt; 1&lt;br /&gt;
1. Estudiar su dominio, puntos de corte y asíntotas.&lt;br /&gt;
2. Analizar su continuidad y su derivabilidad, calcular su función derivada primera.&lt;br /&gt;
3. Determinar sus intervalos de crecimiento y decrecimiento, así como sus máximos&lt;br /&gt;
y mínimos relativos.&lt;br /&gt;
4. Representar su gráfica.&lt;br /&gt;
Dominio, puntos de corte, asíntotas&lt;br /&gt;
Definimos:&lt;br /&gt;
( %i1) g(x):=1/(1+x^2);&lt;br /&gt;
( %o1)&lt;br /&gt;
g (x) :=&lt;br /&gt;
1&lt;br /&gt;
1 + x2&lt;br /&gt;
( %i2) h(x):=1+log(x);&lt;br /&gt;
( %o2)&lt;br /&gt;
h (x) := 1 + log x&lt;br /&gt;
El dominio de g es todo R pues, evidentemente, 1 + x2 6= 0 8x 2 R. Pero, por&lt;br /&gt;
si hubiera alguna duda, el alumno podría utilizar Maxima para comprobar que no&lt;br /&gt;
existe ninguna solución real (todas sus soluciones son imaginarios puros):&lt;br /&gt;
( %i3) solve(1+x^2=0);&lt;br /&gt;
126 Problema resuelto 2: estudio de una función definida a trozos&lt;br /&gt;
( %o3)&lt;br /&gt;
[x = 􀀀i; x = i]&lt;br /&gt;
( %i4) solve(1+x^2=0);&lt;br /&gt;
( %o4)&lt;br /&gt;
[x = 􀀀i; x = i]&lt;br /&gt;
Maxima es incluso capaz de asegurarnos que 1+x2 es estrictamente positivo (independientemente&lt;br /&gt;
del valor de x) si utilizamos la función is:&lt;br /&gt;
( %i5) is(1+x^2&amp;gt;0);&lt;br /&gt;
( %o5)&lt;br /&gt;
true&lt;br /&gt;
Por otra parte, la función h(x) solamente está bien definida para aquellos valores de&lt;br /&gt;
x para los que tiene sentido log(x), es decir, el dominio de h es fx 2 R = x &amp;gt; 0g. Luego&lt;br /&gt;
El dominio de la función f(x) es todo R, pues cuando x � 1 es igual a g, que&lt;br /&gt;
está perfectamente definida, y cuando x &amp;gt; 1 coincide con h(x), que no tiene&lt;br /&gt;
ningún problema para estos valores de x.&lt;br /&gt;
Para estudiar los puntos de corte con el eje de las abscisas, planteamos&lt;br /&gt;
( %i7) solve(g(x)=0,x);&lt;br /&gt;
( %o7)&lt;br /&gt;
[]&lt;br /&gt;
( %i8) solve(h(x)=0,x);&lt;br /&gt;
( %o8) �&lt;br /&gt;
x = e􀀀1�&lt;br /&gt;
El único punto de corte es x = 1&lt;br /&gt;
e . En cuanto a posibles puntos de corte con el eje&lt;br /&gt;
vertical, cuando x = 0 nuestra función toma el valor f(0) = g(0) = 1:&lt;br /&gt;
( %i9) g(0);&lt;br /&gt;
( %o9)&lt;br /&gt;
1&lt;br /&gt;
En definitiva:&lt;br /&gt;
Los puntos de corte de f(x) son (0; 1) y ( 1&lt;br /&gt;
e ; 0).&lt;br /&gt;
127&lt;br /&gt;
En nuestro caso, la función g(x) no tiene ninguna asíntota vertical, porque su denominador&lt;br /&gt;
es siempre distinto de cero. La función h(x) tendría una asíntota vertical&lt;br /&gt;
en x = 0, debido al logaritmo:&lt;br /&gt;
( %i10) limit(h(x),x,0,plus);&lt;br /&gt;
( %o10)&lt;br /&gt;
􀀀1&lt;br /&gt;
Pero esto no afecta a f(x) ya que, en los alrededores de x = 0, esta función no toma los&lt;br /&gt;
valores de h(x), sino de g(x). Por lo tanto, f no tiene ninguna asíntota vertical.&lt;br /&gt;
Con respecto a asíntotas horizontales, tendremos que estudiar límites de f(x)&lt;br /&gt;
cuando x ! 􀀀1 (en cuyo caso f = g) y cuando x ! +1 (en cuyo caso f = h),&lt;br /&gt;
( %i11) limit(g(x),x,minf);&lt;br /&gt;
( %o11)&lt;br /&gt;
0&lt;br /&gt;
( %i12) limit(h(x),x,inf);&lt;br /&gt;
( %o12)&lt;br /&gt;
1&lt;br /&gt;
Por lo tanto, podemos concluir que:&lt;br /&gt;
f(x) no tiene ninguna asíntota vertical y tiene una asíntota horizontal (la&lt;br /&gt;
recta y = 0) cuando x ! 􀀀1.&lt;br /&gt;
Continuidad, derivabilidad&lt;br /&gt;
Las funciones g(x) y h(x) son continuas dentro de sus respectivos dominios, por&lt;br /&gt;
lo tanto f es continua salvo, eventualmente, en x = 1, el punto que divide las regiones&lt;br /&gt;
donde f toma los valores de g y de h. Pero los límites laterales de f en este&lt;br /&gt;
punto son distintos, pues&lt;br /&gt;
( %i13) limit(g(x),x,1,minus);&lt;br /&gt;
( %o13)&lt;br /&gt;
1&lt;br /&gt;
2&lt;br /&gt;
( %i14) limit(h(x),x,1,plus);&lt;br /&gt;
( %o14)&lt;br /&gt;
1&lt;br /&gt;
en consecuencia, f no es continua en x = 1 (tendrá una discontinuidad de salto).&lt;br /&gt;
128 Problema resuelto 2: estudio de una función definida a trozos&lt;br /&gt;
Además, f no es derivable en x = 1 (por no ser continua) pero sí en el resto de&lt;br /&gt;
R (pues tanto g como h lo son para valores de x que estén dentro de sus respectivos&lt;br /&gt;
dominios). Puesto que&lt;br /&gt;
( %i15) diff(g(x),x);&lt;br /&gt;
( %o15)&lt;br /&gt;
􀀀&lt;br /&gt;
2 x&lt;br /&gt;
(x2 + 1)2&lt;br /&gt;
( %i16) diff(h(x),x);&lt;br /&gt;
( %o16)&lt;br /&gt;
1&lt;br /&gt;
x&lt;br /&gt;
podemos concluir que la función derivada de f es:&lt;br /&gt;
f0(x) =&lt;br /&gt;
8&amp;gt;&amp;lt;&lt;br /&gt;
&amp;gt;:&lt;br /&gt;
􀀀&lt;br /&gt;
2x&lt;br /&gt;
(x2 + 1)2 si x &amp;lt; 1&lt;br /&gt;
1&lt;br /&gt;
x&lt;br /&gt;
si x &amp;gt; 1&lt;br /&gt;
Crecimiento, extremos relativos&lt;br /&gt;
El crecimiento de f depende del signo de la función derivada, f0(x), calculada en el&lt;br /&gt;
apartado anterior. Cuando x &amp;gt; 1, obviamente, 1&lt;br /&gt;
x &amp;gt; 0 y por lo tanto, f0(x) &amp;gt; 0. Aunque&lt;br /&gt;
es un caso tan sencillo que no merece la pena recurrir al ordenador, puede servir como&lt;br /&gt;
ilustración la forma en que se podría comprobar lo anterior, utilizando los comandos&lt;br /&gt;
“assume” e “is”:&lt;br /&gt;
( %i22) assume(x&amp;gt;1);&lt;br /&gt;
( %o22)&lt;br /&gt;
[x &amp;gt; 1]&lt;br /&gt;
( %i23) is(1/x&amp;gt;0);&lt;br /&gt;
( %o23)&lt;br /&gt;
true&lt;br /&gt;
cuando x &amp;lt; 1, el asunto es diferente, pues el signo de f0(x) dependerá de la expresión&lt;br /&gt;
􀀀&lt;br /&gt;
2x&lt;br /&gt;
(x2 + 1)2 ; (B.1)&lt;br /&gt;
que depende del signo de 􀀀2x (puesto que el denominador es siempre estrictamente&lt;br /&gt;
positivo), siendo, negativo cuando x &amp;gt; 0 y positivo en caso contrario.&lt;br /&gt;
Por lo tanto&lt;br /&gt;
129&lt;br /&gt;
f es creciente en (􀀀1; 0) [ (1;+1) y decreciente en (0; 1).&lt;br /&gt;
Para hallar máximos y mínimos relativos, calculemos los puntos críticos de f:&lt;br /&gt;
( %i24) solve( diff(g(x),x)=0, x);&lt;br /&gt;
( %o24)&lt;br /&gt;
[x = 0]&lt;br /&gt;
( %i25) solve( diff(h(x),x)=0, x);&lt;br /&gt;
( %o25)&lt;br /&gt;
[]&lt;br /&gt;
Esto es, h no tiene puntos críticos y g tiene un punto crítico, x = 0. Cuando x = 0&lt;br /&gt;
la función f es igual a g, luego éste es un punto crítico de f. Para saber si se trata de&lt;br /&gt;
un máximo o un mínimo, podemos estudiar el signo de la segunda derivada:&lt;br /&gt;
( %i26) diff(g(x),x,2);&lt;br /&gt;
( %o26)&lt;br /&gt;
8 x2&lt;br /&gt;
(x2 + 1)3 􀀀&lt;br /&gt;
2&lt;br /&gt;
(x2 + 1)2&lt;br /&gt;
( %i27) %,x=0;&lt;br /&gt;
( %o27)&lt;br /&gt;
􀀀2&lt;br /&gt;
Por lo tanto, f00(0) = g00(0) = 􀀀2 &amp;lt; 0, es decir, f tiene un máximo relativo en x = 0.&lt;br /&gt;
Representación gráfica&lt;br /&gt;
Para representar la gráfica de f, podemos definir:&lt;br /&gt;
( %i33) f(x):= if(x&amp;lt;1) then g(x) else h(x);&lt;br /&gt;
( %o33)&lt;br /&gt;
f (x) := if x &amp;lt; 1 then g (x) else h (x)&lt;br /&gt;
El problema es que Maxima no está preparado para representar directamente este tipo&lt;br /&gt;
de funciones, siendo necesario encapsular f(x) en una expresión de la forma “’(f(x))”.&lt;br /&gt;
( %i34) plot2d(f(x),[x,-5,5]);&lt;br /&gt;
Maxima was unable to evaluate the predicate:&lt;br /&gt;
** error while printing error message **&lt;br /&gt;
Maxima was unable to evaluate the predicate:~%~M&lt;br /&gt;
#0: f(x=x)&lt;br /&gt;
- an error. Quitting. To debug this try debugmode(true);&lt;br /&gt;
130 Problema resuelto 2: estudio de una función definida a trozos&lt;br /&gt;
( %i35) plot2d(’(f(x)),[x,-5,5], [gnuplot_preamble, &amp;quot;set zeroaxis&amp;quot;],&lt;br /&gt;
[gnuplot_term, ps], [gnuplot_out_file, &amp;quot;grafica.eps&amp;quot;]);&lt;/div&gt;</summary>
		<author><name>Marjimcru</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_libres&amp;diff=957</id>
		<title>Ejercicios libres</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_libres&amp;diff=957"/>
		<updated>2011-04-19T12:22:11Z</updated>

		<summary type="html">&lt;p&gt;Marjimcru: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;En esta sección se encuentran ejercicios libremente enunciado por los alumnos y resueltos con los sistemas de software libre.&lt;br /&gt;
&lt;br /&gt;
== Ejercicios ==&lt;br /&gt;
* [[El factorial de 100]].&lt;br /&gt;
* [[Resolver la ecuación 3x^2-17x+10=0]].&lt;br /&gt;
* [[Resolver ecuaciones de segundo grado]].&lt;br /&gt;
* [[Definir y dibujar una función]].&lt;br /&gt;
* [[Obtener, mediante la regla de Simpson, el área de la función sqrt(1+x^2) entre 0 y 1 con un error menor a 0.001]].&lt;br /&gt;
* [[Definir una matriz, calcular su determinante, calcular para que valores de a la matriz es invertible y calcular su matriz inversa]].&lt;br /&gt;
* [[Calcular la distancia entre el punto P y la recta r]].&lt;br /&gt;
* [[Calcular la distancia entre las rectas r y s]].&lt;br /&gt;
* [[Calcular el ángulo entre los vectores v y w]].&lt;br /&gt;
* [[Problema 12 del proyecto Euler]].&lt;br /&gt;
* [[Problema 20 del proyecto Euler]].&lt;br /&gt;
* [[Estudio de una función]].&lt;br /&gt;
* [[Estudio de una función definida a trozos]].&lt;/div&gt;</summary>
		<author><name>Marjimcru</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n&amp;diff=956</id>
		<title>Estudio de una función</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n&amp;diff=956"/>
		<updated>2011-04-19T12:19:01Z</updated>

		<summary type="html">&lt;p&gt;Marjimcru: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt; &amp;#039;&amp;#039;&amp;#039;Enunciado: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
 Sea f(x) = (x^2-9)/x&lt;br /&gt;
 * Halla los puntos de corte de f(x) con los ejes de coordenadas&lt;br /&gt;
 * Presenta una lista con los valores de f(n); n = 100; 200; 300; : : : 1500. ¿Cuál piensas&lt;br /&gt;
   que es el límite de f(x) en +1? Confírmalo con wxMaxima.&lt;br /&gt;
 * Estudia las asíntotas verticales, horizontales y oblicuas de f(x).&lt;br /&gt;
 * Representa de forma conjunta la gráfica de f(x) y de la recta y = x.&lt;br /&gt;
 * Halla la función derivada de f(x) y la recta tangente a f(x) en el punto a = 3.&lt;br /&gt;
 * Representar de forma conjunta a la gráfica de f(x) y la de esta recta tangente.&lt;br /&gt;
 * Calcula una primitiva de f(x).&lt;br /&gt;
 * Sea A el área limitada por la gráfica de f(x) y el eje OX entre x = 3 y x = 4. ¿Es A&lt;br /&gt;
   mayor que uno?&lt;br /&gt;
 * Puntos de corte&lt;br /&gt;
&lt;br /&gt;
 &amp;#039;&amp;#039;&amp;#039;Solución: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 ( %i1) f(x):=(x^2-9)/x;&lt;br /&gt;
&lt;br /&gt;
 Sus puntos de corte con OX verifican f(x) = 0:&lt;br /&gt;
 ( %i2) solve(f(x)=0,x);&lt;br /&gt;
&lt;br /&gt;
 Los puntos de corte con OY verifican x = 0:&lt;br /&gt;
 ( %i3) f(0);&lt;br /&gt;
&lt;br /&gt;
 Valores de f(n)&lt;br /&gt;
 ( %i4) lista:makelist(100*n,n,1,15);&lt;br /&gt;
 ( %i5) tabla:map(f,lista);&lt;br /&gt;
 ( %i6) %,numer;&lt;br /&gt;
 ( %i7) limit(f(x),x,inf);&lt;br /&gt;
&lt;br /&gt;
 Asíntotas&lt;br /&gt;
 Como vemos a continuación, f(x) tiene una asíntota vertical en x = 0, &lt;br /&gt;
 ( %i8) limit(f(x),x,0); &lt;br /&gt;
 ( %i9) limit(f(x),x,0,plus);&lt;br /&gt;
 ( %i10) limit(f(x),x,0,minus);&lt;br /&gt;
 f(x) no tiene asíntotas horizontales &lt;br /&gt;
 ( %i11) limit(f(x),x,minf);&lt;br /&gt;
 ( %i12) limit(f(x)/x,x,inf);&lt;br /&gt;
 f(x) tiene una asíntota oblicua&lt;br /&gt;
 ( %i13) limit(f(x)-1*x,x,inf);&lt;br /&gt;
 Por tanto, la asíntota oblicua es y = x.&lt;br /&gt;
&lt;br /&gt;
 Gráfica&lt;br /&gt;
 ( %i14) plot2d([f(x),x],[x,-20,20],[y,-20,20],[gnuplot_preamble,&amp;quot;set&lt;br /&gt;
 zeroaxis;&amp;quot;]);&lt;br /&gt;
&lt;br /&gt;
 Derivada &lt;br /&gt;
 ( %i15) diff(f(x),x);&lt;br /&gt;
 ( %i16) ratsimp(%); &lt;br /&gt;
 Derivada para a=3&lt;br /&gt;
 ( %i17) a:3;&lt;br /&gt;
 ( %i18) ”(diff(f(x),x)),x=a;&lt;br /&gt;
&lt;br /&gt;
 La recta tangente &lt;br /&gt;
 ( %i19) Df(x):=”(ratsimp(diff(f(x),x)));&lt;br /&gt;
 ( %i20) m:Df(a);&lt;br /&gt;
 ( %i21) y-f(a)=m*(x-a);&lt;br /&gt;
 ( %i22) expand(%);&lt;br /&gt;
  &lt;br /&gt;
 Representación&lt;br /&gt;
 ( %i23) plot2d([f(x),2*x-6],[x,-20,20],[y,-20,20],[gnuplot_preamble,&amp;quot;set&lt;br /&gt;
 zeroaxis;&amp;quot;]);&lt;br /&gt;
&lt;br /&gt;
 Primitiva &lt;br /&gt;
 ( %i24) integrate(f(x),x);&lt;br /&gt;
 &lt;br /&gt;
 Àrea&lt;br /&gt;
 ( %i25) f(x);&lt;br /&gt;
 ( %i26) numerador:num(f(x));&lt;br /&gt;
 ( %i27) denominador:denom(f(x));&lt;br /&gt;
 ( %i28) assume(x&amp;gt;3);&lt;br /&gt;
 ( %i29) is(numerador&amp;gt;0);&lt;br /&gt;
 ( %i30) is(denominador&amp;gt;0);&lt;br /&gt;
 ( %i31) forget(x&amp;gt;3);&lt;br /&gt;
 ( %i32) integrate(f(x),x,3,4);&lt;br /&gt;
 ( %i33) %,numer;&lt;/div&gt;</summary>
		<author><name>Marjimcru</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n&amp;diff=955</id>
		<title>Estudio de una función</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n&amp;diff=955"/>
		<updated>2011-04-19T12:18:33Z</updated>

		<summary type="html">&lt;p&gt;Marjimcru: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt; &amp;#039;&amp;#039;&amp;#039;Enunciado: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
 Sea f(x) = (x^2-9)/x&lt;br /&gt;
 * Halla los puntos de corte de f(x) con los ejes de coordenadas&lt;br /&gt;
 * Presenta una lista con los valores de f(n); n = 100; 200; 300; : : : 1500. ¿Cuál piensas&lt;br /&gt;
   que es el límite de f(x) en +1? Confírmalo con wxMaxima.&lt;br /&gt;
 * Estudia las asíntotas verticales, horizontales y oblicuas de f(x).&lt;br /&gt;
 * Representa de forma conjunta la gráfica de f(x) y de la recta y = x.&lt;br /&gt;
 * Halla la función derivada de f(x) y la recta tangente a f(x) en el punto a = 3.&lt;br /&gt;
 * Representar de forma conjunta a la gráfica de f(x) y la de esta recta tangente.&lt;br /&gt;
 * Calcula una primitiva de f(x).&lt;br /&gt;
 * Sea A el área limitada por la gráfica de f(x) y el eje OX entre x = 3 y x = 4. ¿Es A&lt;br /&gt;
   mayor que uno?&lt;br /&gt;
 * Puntos de corte&lt;br /&gt;
&lt;br /&gt;
 &amp;#039;&amp;#039;&amp;#039;Solución: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 ( %i1) f(x):=(x^2-9)/x;&lt;br /&gt;
&lt;br /&gt;
 Sus puntos de corte con OX verifican f(x) = 0:&lt;br /&gt;
 ( %i2) solve(f(x)=0,x);&lt;br /&gt;
&lt;br /&gt;
 Los puntos de corte con OY verifican x = 0:&lt;br /&gt;
 ( %i3) f(0);&lt;br /&gt;
&lt;br /&gt;
 Valores de f(n)&lt;br /&gt;
 ( %i4) lista:makelist(100*n,n,1,15);&lt;br /&gt;
 ( %i5) tabla:map(f,lista);&lt;br /&gt;
 ( %i6) %,numer;&lt;br /&gt;
 ( %i7) limit(f(x),x,inf);&lt;br /&gt;
&lt;br /&gt;
 Asíntotas&lt;br /&gt;
 Como vemos a continuación, f(x) tiene una asíntota vertical en x = 0, &lt;br /&gt;
 ( %i8) limit(f(x),x,0); &lt;br /&gt;
 ( %i9) limit(f(x),x,0,plus);&lt;br /&gt;
 ( %i10) limit(f(x),x,0,minus);&lt;br /&gt;
 f(x) no tiene asíntotas horizontales &lt;br /&gt;
 ( %i11) limit(f(x),x,minf);&lt;br /&gt;
 ( %i12) limit(f(x)/x,x,inf);&lt;br /&gt;
 f(x) tiene una asíntota oblicua&lt;br /&gt;
 ( %i13) limit(f(x)-1*x,x,inf);&lt;br /&gt;
 Por tanto, la asíntota oblicua es y = x.&lt;br /&gt;
&lt;br /&gt;
 Gráfica&lt;br /&gt;
 ( %i14) plot2d([f(x),x],[x,-20,20],[y,-20,20],[gnuplot_preamble,&amp;quot;set&lt;br /&gt;
 zeroaxis;&amp;quot;]);&lt;br /&gt;
&lt;br /&gt;
 Derivada &lt;br /&gt;
 ( %i15) diff(f(x),x);&lt;br /&gt;
 ( %i16) ratsimp(%); &lt;br /&gt;
 Derivada para a=3&lt;br /&gt;
 ( %i17) a:3;&lt;br /&gt;
 ( %i18) ”(diff(f(x),x)),x=a;&lt;br /&gt;
&lt;br /&gt;
 La recta tangente &lt;br /&gt;
 ( %i19) Df(x):=”(ratsimp(diff(f(x),x)));&lt;br /&gt;
 ( %i20) m:Df(a);&lt;br /&gt;
 ( %i21) y-f(a)=m*(x-a);&lt;br /&gt;
 ( %i22) expand(%);&lt;br /&gt;
  &lt;br /&gt;
 Representación&lt;br /&gt;
 ( %i23) plot2d([f(x),2*x-6],[x,-20,20],[y,-20,20],[gnuplot_preamble,&amp;quot;set&lt;br /&gt;
 zeroaxis;&amp;quot;]);&lt;br /&gt;
&lt;br /&gt;
 Primitiva &lt;br /&gt;
 ( %i24) integrate(f(x),x);&lt;br /&gt;
 &lt;br /&gt;
 Àrea&lt;br /&gt;
 ( %i25) f(x);&lt;br /&gt;
 ( %i26) numerador:num(f(x));&lt;br /&gt;
 ( %i27) denominador:denom(f(x));&lt;br /&gt;
 ( %i28) assume(x&amp;gt;3);&lt;br /&gt;
 ( %i29) is(numerador&amp;gt;0);&lt;br /&gt;
 ( %i30) is(denominador&amp;gt;0);&lt;br /&gt;
 ( %i31) forget(x&amp;gt;3);&lt;br /&gt;
 ( %i32) integrate(f(x),x,3,4);&lt;br /&gt;
 ( %i33) %,numer;&lt;br /&gt;
124 Problema resuelto 1: estudio y representación de una función&lt;br /&gt;
( %o33)&lt;br /&gt;
0;910861347933972&lt;/div&gt;</summary>
		<author><name>Marjimcru</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n&amp;diff=954</id>
		<title>Estudio de una función</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n&amp;diff=954"/>
		<updated>2011-04-19T12:14:19Z</updated>

		<summary type="html">&lt;p&gt;Marjimcru: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt; &amp;#039;&amp;#039;&amp;#039;Enunciado: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
 Sea f(x) = (x^2-9)/x&lt;br /&gt;
 * Halla los puntos de corte de f(x) con los ejes de coordenadas&lt;br /&gt;
 * Presenta una lista con los valores de f(n); n = 100; 200; 300; : : : 1500. ¿Cuál piensas&lt;br /&gt;
   que es el límite de f(x) en +1? Confírmalo con wxMaxima.&lt;br /&gt;
 * Estudia las asíntotas verticales, horizontales y oblicuas de f(x).&lt;br /&gt;
 * Representa de forma conjunta la gráfica de f(x) y de la recta y = x.&lt;br /&gt;
 * Halla la función derivada de f(x) y la recta tangente a f(x) en el punto a = 3.&lt;br /&gt;
 * Representar de forma conjunta a la gráfica de f(x) y la de esta recta tangente.&lt;br /&gt;
 * Calcula una primitiva de f(x).&lt;br /&gt;
 * Sea A el área limitada por la gráfica de f(x) y el eje OX entre x = 3 y x = 4. ¿Es A&lt;br /&gt;
   mayor que uno?&lt;br /&gt;
 * Puntos de corte&lt;br /&gt;
&lt;br /&gt;
 &amp;#039;&amp;#039;&amp;#039;Solución: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 ( %i1) f(x):=(x^2-9)/x;&lt;br /&gt;
&lt;br /&gt;
 Sus puntos de corte con OX verifican f(x) = 0:&lt;br /&gt;
 ( %i2) solve(f(x)=0,x);&lt;br /&gt;
&lt;br /&gt;
 Los puntos de corte con OY verifican x = 0:&lt;br /&gt;
 ( %i3) f(0);&lt;br /&gt;
&lt;br /&gt;
 Valores de f(n)&lt;br /&gt;
 ( %i4) lista:makelist(100*n,n,1,15);&lt;br /&gt;
 ( %i5) tabla:map(f,lista);&lt;br /&gt;
 ( %i6) %,numer;&lt;br /&gt;
 ( %i7) limit(f(x),x,inf);&lt;br /&gt;
&lt;br /&gt;
 Asíntotas&lt;br /&gt;
 Como vemos a continuación, f(x) tiene una asíntota vertical en x = 0, &lt;br /&gt;
 ( %i8) limit(f(x),x,0); &lt;br /&gt;
 ( %i9) limit(f(x),x,0,plus);&lt;br /&gt;
 ( %i10) limit(f(x),x,0,minus);&lt;br /&gt;
 f(x) no tiene asíntotas horizontales &lt;br /&gt;
 ( %i11) limit(f(x),x,minf);&lt;br /&gt;
 ( %i12) limit(f(x)/x,x,inf);&lt;br /&gt;
 f(x) tiene una asíntota oblicua&lt;br /&gt;
 ( %i13) limit(f(x)-1*x,x,inf);&lt;br /&gt;
 Por tanto, la asíntota oblicua es y = x.&lt;br /&gt;
&lt;br /&gt;
 Gráfica&lt;br /&gt;
 ( %i14) plot2d([f(x),x],[x,-20,20],[y,-20,20],[gnuplot_preamble,&amp;quot;set&lt;br /&gt;
 zeroaxis;&amp;quot;]);&lt;br /&gt;
&lt;br /&gt;
 Derivada &lt;br /&gt;
 ( %i15) diff(f(x),x);&lt;br /&gt;
 ( %i16) ratsimp(%); &lt;br /&gt;
 Derivada para a=3&lt;br /&gt;
 ( %i17) a:3;&lt;br /&gt;
 ( %i18) ”(diff(f(x),x)),x=a;&lt;br /&gt;
&lt;br /&gt;
 La recta tangente &lt;br /&gt;
 ( %i19) Df(x):=”(ratsimp(diff(f(x),x)));&lt;br /&gt;
 ( %i20) m:Df(a);&lt;br /&gt;
 ( %i21) y-f(a)=m*(x-a);&lt;br /&gt;
 ( %i22) expand(%);&lt;br /&gt;
  &lt;br /&gt;
 Representación&lt;br /&gt;
 ( %i23) plot2d([f(x),2*x-6],[x,-20,20],[y,-20,20],[gnuplot_preamble,&amp;quot;set&lt;br /&gt;
 zeroaxis;&amp;quot;]);&lt;br /&gt;
&lt;br /&gt;
 Primitiva y área&lt;br /&gt;
Calcular una primitiva es fácil. Recurramos o no al sistema de menús de wxMaxima,&lt;br /&gt;
tendremos:&lt;br /&gt;
( %i24) integrate(f(x),x);&lt;br /&gt;
( %o24)&lt;br /&gt;
x2&lt;br /&gt;
2&lt;br /&gt;
􀀀 9 log x&lt;br /&gt;
Para el cálculo de áreas, observamos que f(x) &amp;gt; 0 en [3;+1), pues hemos visto que&lt;br /&gt;
f(3) = 0 y si x &amp;gt; 3 el numerador y el denominador de f(x) son estrictamente positivos&lt;br /&gt;
123&lt;br /&gt;
(en Maxima esto se puede comprobar con las órdenes “assume” e “is”, como vemos&lt;br /&gt;
más abajo). Por lo tanto, el área del recinto coincide con la siguiente integral definida:&lt;br /&gt;
Z 4&lt;br /&gt;
3&lt;br /&gt;
f(x)dx&lt;br /&gt;
( %i25) f(x);&lt;br /&gt;
( %o25)&lt;br /&gt;
x2 􀀀 9&lt;br /&gt;
x&lt;br /&gt;
( %i26) numerador:num(f(x));&lt;br /&gt;
( %o26)&lt;br /&gt;
x2 􀀀 9&lt;br /&gt;
( %i27) denominador:denom(f(x));&lt;br /&gt;
( %o27)&lt;br /&gt;
x&lt;br /&gt;
( %i28) assume(x&amp;gt;3);&lt;br /&gt;
( %o28)&lt;br /&gt;
[x &amp;gt; 3]&lt;br /&gt;
( %i29) is(numerador&amp;gt;0);&lt;br /&gt;
( %o29)&lt;br /&gt;
true&lt;br /&gt;
( %i30) is(denominador&amp;gt;0);&lt;br /&gt;
( %o30)&lt;br /&gt;
true&lt;br /&gt;
( %i31) forget(x&amp;gt;3);&lt;br /&gt;
( %o31)&lt;br /&gt;
[x &amp;gt; 3]&lt;br /&gt;
( %i32) integrate(f(x),x,3,4);&lt;br /&gt;
( %o32)&lt;br /&gt;
􀀀9 log 4 + 9 log 3 +&lt;br /&gt;
7&lt;br /&gt;
2&lt;br /&gt;
( %i33) %,numer;&lt;br /&gt;
124 Problema resuelto 1: estudio y representación de una función&lt;br /&gt;
( %o33)&lt;br /&gt;
0;910861347933972&lt;/div&gt;</summary>
		<author><name>Marjimcru</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n&amp;diff=953</id>
		<title>Estudio de una función</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n&amp;diff=953"/>
		<updated>2011-04-19T12:10:31Z</updated>

		<summary type="html">&lt;p&gt;Marjimcru: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt; &amp;#039;&amp;#039;&amp;#039;Enunciado: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
 Sea f(x) = (x^2-9)/x&lt;br /&gt;
 * Halla los puntos de corte de f(x) con los ejes de coordenadas&lt;br /&gt;
 * Presenta una lista con los valores de f(n); n = 100; 200; 300; : : : 1500. ¿Cuál piensas&lt;br /&gt;
   que es el límite de f(x) en +1? Confírmalo con wxMaxima.&lt;br /&gt;
 * Estudia las asíntotas verticales, horizontales y oblicuas de f(x).&lt;br /&gt;
 * Representa de forma conjunta la gráfica de f(x) y de la recta y = x.&lt;br /&gt;
 * Halla la función derivada de f(x) y la recta tangente a f(x) en el punto a = 3.&lt;br /&gt;
 * Representar de forma conjunta a la gráfica de f(x) y la de esta recta tangente.&lt;br /&gt;
 * Calcula una primitiva de f(x).&lt;br /&gt;
 * Sea A el área limitada por la gráfica de f(x) y el eje OX entre x = 3 y x = 4. ¿Es A&lt;br /&gt;
   mayor que uno?&lt;br /&gt;
 * Puntos de corte&lt;br /&gt;
&lt;br /&gt;
 &amp;#039;&amp;#039;&amp;#039;Solución: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 ( %i1) f(x):=(x^2-9)/x;&lt;br /&gt;
&lt;br /&gt;
 Sus puntos de corte con OX verifican f(x) = 0:&lt;br /&gt;
 ( %i2) solve(f(x)=0,x);&lt;br /&gt;
&lt;br /&gt;
 Los puntos de corte con OY verifican x = 0:&lt;br /&gt;
 ( %i3) f(0);&lt;br /&gt;
&lt;br /&gt;
 Valores de f(n)&lt;br /&gt;
 ( %i4) lista:makelist(100*n,n,1,15);&lt;br /&gt;
 ( %i5) tabla:map(f,lista);&lt;br /&gt;
 ( %i6) %,numer;&lt;br /&gt;
 ( %i7) limit(f(x),x,inf);&lt;br /&gt;
&lt;br /&gt;
 Asíntotas&lt;br /&gt;
 Como vemos a continuación, f(x) tiene una asíntota vertical en x = 0, &lt;br /&gt;
 ( %i8) limit(f(x),x,0); &lt;br /&gt;
 ( %i9) limit(f(x),x,0,plus);&lt;br /&gt;
 ( %i10) limit(f(x),x,0,minus);&lt;br /&gt;
 f(x) no tiene asíntotas horizontales &lt;br /&gt;
 ( %i11) limit(f(x),x,minf);&lt;br /&gt;
 ( %i12) limit(f(x)/x,x,inf);&lt;br /&gt;
 f(x) tiene una asíntota oblicua&lt;br /&gt;
 ( %i13) limit(f(x)-1*x,x,inf);&lt;br /&gt;
 Por tanto, la asíntota oblicua es y = x.&lt;br /&gt;
&lt;br /&gt;
 Gráfica&lt;br /&gt;
 ( %i14) plot2d([f(x),x],[x,-20,20],[y,-20,20],[gnuplot_preamble,&amp;quot;set&lt;br /&gt;
zeroaxis;&amp;quot;]);&lt;br /&gt;
&lt;br /&gt;
 Derivada &lt;br /&gt;
 ( %i15) diff(f(x),x);&lt;br /&gt;
 ( %i16) ratsimp(%);&lt;br /&gt;
 &lt;br /&gt;
 Derivada para a=3&lt;br /&gt;
 ( %i17) a:3;&lt;br /&gt;
( %o17)&lt;br /&gt;
( %i18) ”(diff(f(x),x)),x=a;&lt;br /&gt;
( %o18)&lt;br /&gt;
2&lt;br /&gt;
Obsérvese que (como se comentó en los apuntes de este tema) antes de sustituir el valor&lt;br /&gt;
x = a en la derivada, es necesario utilizar un doble operador comilla (”), que se obtiene&lt;br /&gt;
pulsando dos veces en la tecla ?. Este operador se puede interpretar como «el resultado&lt;br /&gt;
de evaluar la siguiente expresión» (en este caso, la derivada de f(x)). En general, la&lt;br /&gt;
última entrada se puede interpretar como «sustituir x = a en el resultado de calcular la&lt;br /&gt;
derivada de f(x)».&lt;br /&gt;
También podríamos haber utilizado este operador para definir una función, a la que&lt;br /&gt;
podríamos llamar Df(x), que representaría a la primera derivada de f(x). Esto lo haremos&lt;br /&gt;
más abajo, como ejemplo. Y como se puede ver aprovecharemos para simplificar la&lt;br /&gt;
derivada (con la función “ratsimp” antes de definir Df(x)). Así, la definición se puede&lt;br /&gt;
leer como «Df(x) se define como el resultado (doble comilla) de simplificar (ratsimp)&lt;br /&gt;
la derivada (diff ) de f(x)»&lt;br /&gt;
Una vez que conocemos la pendiente, m = f0(a) = 2, podemos escribir la recta&lt;br /&gt;
tangente como&lt;br /&gt;
y 􀀀 f(a) = m � (x 􀀀 a)&lt;br /&gt;
( %i19) Df(x):=”(ratsimp(diff(f(x),x)));&lt;br /&gt;
( %o19)&lt;br /&gt;
Df (x) :=&lt;br /&gt;
x2 + 9&lt;br /&gt;
x2&lt;br /&gt;
( %i20) m:Df(a);&lt;br /&gt;
( %o20)&lt;br /&gt;
2&lt;br /&gt;
( %i21) y-f(a)=m*(x-a);&lt;br /&gt;
( %o21)&lt;br /&gt;
y = 2 (x 􀀀 3)&lt;br /&gt;
122 Problema resuelto 1: estudio y representación de una función&lt;br /&gt;
( %i22) expand(%);&lt;br /&gt;
( %o22)&lt;br /&gt;
y = 2 x 􀀀 6&lt;br /&gt;
Y (utilizando el menú de wxMaxima, si así lo deseamos), podemos representar la&lt;br /&gt;
gráfica:&lt;br /&gt;
( %i23) plot2d([f(x),2*x-6],[x,-20,20],[y,-20,20],[gnuplot_preamble,&amp;quot;set&lt;br /&gt;
zeroaxis;&amp;quot;]);&lt;br /&gt;
( %o23)&lt;br /&gt;
El resultado se puede apreciar en la figura A.2&lt;br /&gt;
Figura A.2: Gráfica de la función x2􀀀9&lt;br /&gt;
2 junto su recta tengente en x = 3&lt;br /&gt;
Primitiva y área&lt;br /&gt;
Calcular una primitiva es fácil. Recurramos o no al sistema de menús de wxMaxima,&lt;br /&gt;
tendremos:&lt;br /&gt;
( %i24) integrate(f(x),x);&lt;br /&gt;
( %o24)&lt;br /&gt;
x2&lt;br /&gt;
2&lt;br /&gt;
􀀀 9 log x&lt;br /&gt;
Para el cálculo de áreas, observamos que f(x) &amp;gt; 0 en [3;+1), pues hemos visto que&lt;br /&gt;
f(3) = 0 y si x &amp;gt; 3 el numerador y el denominador de f(x) son estrictamente positivos&lt;br /&gt;
123&lt;br /&gt;
(en Maxima esto se puede comprobar con las órdenes “assume” e “is”, como vemos&lt;br /&gt;
más abajo). Por lo tanto, el área del recinto coincide con la siguiente integral definida:&lt;br /&gt;
Z 4&lt;br /&gt;
3&lt;br /&gt;
f(x)dx&lt;br /&gt;
( %i25) f(x);&lt;br /&gt;
( %o25)&lt;br /&gt;
x2 􀀀 9&lt;br /&gt;
x&lt;br /&gt;
( %i26) numerador:num(f(x));&lt;br /&gt;
( %o26)&lt;br /&gt;
x2 􀀀 9&lt;br /&gt;
( %i27) denominador:denom(f(x));&lt;br /&gt;
( %o27)&lt;br /&gt;
x&lt;br /&gt;
( %i28) assume(x&amp;gt;3);&lt;br /&gt;
( %o28)&lt;br /&gt;
[x &amp;gt; 3]&lt;br /&gt;
( %i29) is(numerador&amp;gt;0);&lt;br /&gt;
( %o29)&lt;br /&gt;
true&lt;br /&gt;
( %i30) is(denominador&amp;gt;0);&lt;br /&gt;
( %o30)&lt;br /&gt;
true&lt;br /&gt;
( %i31) forget(x&amp;gt;3);&lt;br /&gt;
( %o31)&lt;br /&gt;
[x &amp;gt; 3]&lt;br /&gt;
( %i32) integrate(f(x),x,3,4);&lt;br /&gt;
( %o32)&lt;br /&gt;
􀀀9 log 4 + 9 log 3 +&lt;br /&gt;
7&lt;br /&gt;
2&lt;br /&gt;
( %i33) %,numer;&lt;br /&gt;
124 Problema resuelto 1: estudio y representación de una función&lt;br /&gt;
( %o33)&lt;br /&gt;
0;910861347933972&lt;/div&gt;</summary>
		<author><name>Marjimcru</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n&amp;diff=952</id>
		<title>Estudio de una función</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n&amp;diff=952"/>
		<updated>2011-04-19T12:08:23Z</updated>

		<summary type="html">&lt;p&gt;Marjimcru: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt; &amp;#039;&amp;#039;&amp;#039;Enunciado: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
 Sea f(x) = (x^2-9)/x&lt;br /&gt;
 * Halla los puntos de corte de f(x) con los ejes de coordenadas&lt;br /&gt;
 * Presenta una lista con los valores de f(n); n = 100; 200; 300; : : : 1500. ¿Cuál piensas&lt;br /&gt;
   que es el límite de f(x) en +1? Confírmalo con wxMaxima.&lt;br /&gt;
 * Estudia las asíntotas verticales, horizontales y oblicuas de f(x).&lt;br /&gt;
 * Representa de forma conjunta la gráfica de f(x) y de la recta y = x.&lt;br /&gt;
 * Halla la función derivada de f(x) y la recta tangente a f(x) en el punto a = 3.&lt;br /&gt;
 * Representar de forma conjunta a la gráfica de f(x) y la de esta recta tangente.&lt;br /&gt;
 * Calcula una primitiva de f(x).&lt;br /&gt;
 * Sea A el área limitada por la gráfica de f(x) y el eje OX entre x = 3 y x = 4. ¿Es A&lt;br /&gt;
   mayor que uno?&lt;br /&gt;
 * Puntos de corte&lt;br /&gt;
&lt;br /&gt;
 &amp;#039;&amp;#039;&amp;#039;Solución: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 ( %i1) f(x):=(x^2-9)/x;&lt;br /&gt;
&lt;br /&gt;
 Sus puntos de corte con OX verifican f(x) = 0:&lt;br /&gt;
 ( %i2) solve(f(x)=0,x);&lt;br /&gt;
&lt;br /&gt;
 Los puntos de corte con OY verifican x = 0:&lt;br /&gt;
 ( %i3) f(0);&lt;br /&gt;
&lt;br /&gt;
 Valores de f(n)&lt;br /&gt;
 ( %i4) lista:makelist(100*n,n,1,15);&lt;br /&gt;
 ( %i5) tabla:map(f,lista);&lt;br /&gt;
 ( %i6) %,numer;&lt;br /&gt;
 ( %i7) limit(f(x),x,inf);&lt;br /&gt;
&lt;br /&gt;
 Asíntotas&lt;br /&gt;
 Como vemos a continuación, f(x) tiene una asíntota vertical en x = 0, &lt;br /&gt;
 ( %i8) limit(f(x),x,0); &lt;br /&gt;
 ( %i9) limit(f(x),x,0,plus);&lt;br /&gt;
 ( %i10) limit(f(x),x,0,minus);&lt;br /&gt;
 f(x) no tiene asíntotas horizontales &lt;br /&gt;
 ( %i11) limit(f(x),x,minf);&lt;br /&gt;
 ( %i12) limit(f(x)/x,x,inf);&lt;br /&gt;
 f(x) tiene una asíntota oblicua&lt;br /&gt;
 ( %i13) limit(f(x)-1*x,x,inf);&lt;br /&gt;
 Por tanto, la asíntota oblicua es y = x.&lt;br /&gt;
&lt;br /&gt;
 Gráfica&lt;br /&gt;
Representaremos f(x) junto con su asíntota, y = x. A base de prueba y error, se&lt;br /&gt;
encontrarán los intervalos de x e y adecuados, en este caso se tomará x 2 [􀀀20; 20],&lt;br /&gt;
y 2 [􀀀20; 100]:&lt;br /&gt;
( %i14) plot2d([f(x),x],[x,-20,20],[y,-20,20],[gnuplot_preamble,&amp;quot;set&lt;br /&gt;
zeroaxis;&amp;quot;]);&lt;br /&gt;
( %o14)&lt;br /&gt;
Figura A.1: Gráfica de la función x2􀀀9&lt;br /&gt;
2 junto a su asíntota oblicua y = x&lt;br /&gt;
Derivada y recta tangente&lt;br /&gt;
A continuación, calculamos la derivada de f(x), definimos el punto a = 3 y&lt;br /&gt;
hallamos f0(a).&lt;br /&gt;
( %i15) diff(f(x),x);&lt;br /&gt;
( %o15)&lt;br /&gt;
2 􀀀&lt;br /&gt;
x2 􀀀 9&lt;br /&gt;
x2&lt;br /&gt;
121&lt;br /&gt;
( %i16) ratsimp(%);&lt;br /&gt;
( %o16)&lt;br /&gt;
x2 + 9&lt;br /&gt;
x2&lt;br /&gt;
( %i17) a:3;&lt;br /&gt;
( %o17)&lt;br /&gt;
3&lt;br /&gt;
( %i18) ”(diff(f(x),x)),x=a;&lt;br /&gt;
( %o18)&lt;br /&gt;
2&lt;br /&gt;
Obsérvese que (como se comentó en los apuntes de este tema) antes de sustituir el valor&lt;br /&gt;
x = a en la derivada, es necesario utilizar un doble operador comilla (”), que se obtiene&lt;br /&gt;
pulsando dos veces en la tecla ?. Este operador se puede interpretar como «el resultado&lt;br /&gt;
de evaluar la siguiente expresión» (en este caso, la derivada de f(x)). En general, la&lt;br /&gt;
última entrada se puede interpretar como «sustituir x = a en el resultado de calcular la&lt;br /&gt;
derivada de f(x)».&lt;br /&gt;
También podríamos haber utilizado este operador para definir una función, a la que&lt;br /&gt;
podríamos llamar Df(x), que representaría a la primera derivada de f(x). Esto lo haremos&lt;br /&gt;
más abajo, como ejemplo. Y como se puede ver aprovecharemos para simplificar la&lt;br /&gt;
derivada (con la función “ratsimp” antes de definir Df(x)). Así, la definición se puede&lt;br /&gt;
leer como «Df(x) se define como el resultado (doble comilla) de simplificar (ratsimp)&lt;br /&gt;
la derivada (diff ) de f(x)»&lt;br /&gt;
Una vez que conocemos la pendiente, m = f0(a) = 2, podemos escribir la recta&lt;br /&gt;
tangente como&lt;br /&gt;
y 􀀀 f(a) = m � (x 􀀀 a)&lt;br /&gt;
( %i19) Df(x):=”(ratsimp(diff(f(x),x)));&lt;br /&gt;
( %o19)&lt;br /&gt;
Df (x) :=&lt;br /&gt;
x2 + 9&lt;br /&gt;
x2&lt;br /&gt;
( %i20) m:Df(a);&lt;br /&gt;
( %o20)&lt;br /&gt;
2&lt;br /&gt;
( %i21) y-f(a)=m*(x-a);&lt;br /&gt;
( %o21)&lt;br /&gt;
y = 2 (x 􀀀 3)&lt;br /&gt;
122 Problema resuelto 1: estudio y representación de una función&lt;br /&gt;
( %i22) expand(%);&lt;br /&gt;
( %o22)&lt;br /&gt;
y = 2 x 􀀀 6&lt;br /&gt;
Y (utilizando el menú de wxMaxima, si así lo deseamos), podemos representar la&lt;br /&gt;
gráfica:&lt;br /&gt;
( %i23) plot2d([f(x),2*x-6],[x,-20,20],[y,-20,20],[gnuplot_preamble,&amp;quot;set&lt;br /&gt;
zeroaxis;&amp;quot;]);&lt;br /&gt;
( %o23)&lt;br /&gt;
El resultado se puede apreciar en la figura A.2&lt;br /&gt;
Figura A.2: Gráfica de la función x2􀀀9&lt;br /&gt;
2 junto su recta tengente en x = 3&lt;br /&gt;
Primitiva y área&lt;br /&gt;
Calcular una primitiva es fácil. Recurramos o no al sistema de menús de wxMaxima,&lt;br /&gt;
tendremos:&lt;br /&gt;
( %i24) integrate(f(x),x);&lt;br /&gt;
( %o24)&lt;br /&gt;
x2&lt;br /&gt;
2&lt;br /&gt;
􀀀 9 log x&lt;br /&gt;
Para el cálculo de áreas, observamos que f(x) &amp;gt; 0 en [3;+1), pues hemos visto que&lt;br /&gt;
f(3) = 0 y si x &amp;gt; 3 el numerador y el denominador de f(x) son estrictamente positivos&lt;br /&gt;
123&lt;br /&gt;
(en Maxima esto se puede comprobar con las órdenes “assume” e “is”, como vemos&lt;br /&gt;
más abajo). Por lo tanto, el área del recinto coincide con la siguiente integral definida:&lt;br /&gt;
Z 4&lt;br /&gt;
3&lt;br /&gt;
f(x)dx&lt;br /&gt;
( %i25) f(x);&lt;br /&gt;
( %o25)&lt;br /&gt;
x2 􀀀 9&lt;br /&gt;
x&lt;br /&gt;
( %i26) numerador:num(f(x));&lt;br /&gt;
( %o26)&lt;br /&gt;
x2 􀀀 9&lt;br /&gt;
( %i27) denominador:denom(f(x));&lt;br /&gt;
( %o27)&lt;br /&gt;
x&lt;br /&gt;
( %i28) assume(x&amp;gt;3);&lt;br /&gt;
( %o28)&lt;br /&gt;
[x &amp;gt; 3]&lt;br /&gt;
( %i29) is(numerador&amp;gt;0);&lt;br /&gt;
( %o29)&lt;br /&gt;
true&lt;br /&gt;
( %i30) is(denominador&amp;gt;0);&lt;br /&gt;
( %o30)&lt;br /&gt;
true&lt;br /&gt;
( %i31) forget(x&amp;gt;3);&lt;br /&gt;
( %o31)&lt;br /&gt;
[x &amp;gt; 3]&lt;br /&gt;
( %i32) integrate(f(x),x,3,4);&lt;br /&gt;
( %o32)&lt;br /&gt;
􀀀9 log 4 + 9 log 3 +&lt;br /&gt;
7&lt;br /&gt;
2&lt;br /&gt;
( %i33) %,numer;&lt;br /&gt;
124 Problema resuelto 1: estudio y representación de una función&lt;br /&gt;
( %o33)&lt;br /&gt;
0;910861347933972&lt;/div&gt;</summary>
		<author><name>Marjimcru</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n&amp;diff=951</id>
		<title>Estudio de una función</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n&amp;diff=951"/>
		<updated>2011-04-19T12:06:52Z</updated>

		<summary type="html">&lt;p&gt;Marjimcru: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt; &amp;#039;&amp;#039;&amp;#039;Enunciado: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
 Sea f(x) = (x^2-9)/x&lt;br /&gt;
 * Halla los puntos de corte de f(x) con los ejes de coordenadas&lt;br /&gt;
 * Presenta una lista con los valores de f(n); n = 100; 200; 300; : : : 1500. ¿Cuál piensas&lt;br /&gt;
   que es el límite de f(x) en +1? Confírmalo con wxMaxima.&lt;br /&gt;
 * Estudia las asíntotas verticales, horizontales y oblicuas de f(x).&lt;br /&gt;
 * Representa de forma conjunta la gráfica de f(x) y de la recta y = x.&lt;br /&gt;
 * Halla la función derivada de f(x) y la recta tangente a f(x) en el punto a = 3.&lt;br /&gt;
 * Representar de forma conjunta a la gráfica de f(x) y la de esta recta tangente.&lt;br /&gt;
 * Calcula una primitiva de f(x).&lt;br /&gt;
 * Sea A el área limitada por la gráfica de f(x) y el eje OX entre x = 3 y x = 4. ¿Es A&lt;br /&gt;
   mayor que uno?&lt;br /&gt;
 * Puntos de corte&lt;br /&gt;
&lt;br /&gt;
 &amp;#039;&amp;#039;&amp;#039;Solución: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 ( %i1) f(x):=(x^2-9)/x;&lt;br /&gt;
&lt;br /&gt;
 Sus puntos de corte con OX verifican f(x) = 0:&lt;br /&gt;
 ( %i2) solve(f(x)=0,x);&lt;br /&gt;
&lt;br /&gt;
 Los puntos de corte con OY verifican x = 0:&lt;br /&gt;
 ( %i3) f(0);&lt;br /&gt;
&lt;br /&gt;
 Valores de f(n)&lt;br /&gt;
 ( %i4) lista:makelist(100*n,n,1,15);&lt;br /&gt;
 ( %i5) tabla:map(f,lista);&lt;br /&gt;
 ( %i6) %,numer;&lt;br /&gt;
 ( %i7) limit(f(x),x,inf);&lt;br /&gt;
&lt;br /&gt;
 Asíntotas&lt;br /&gt;
 Como vemos a continuación, f(x) tiene una asíntota vertical en x = 0, de hecho&lt;br /&gt;
 ( %i8) limit(f(x),x,0); &lt;br /&gt;
 ( %i9) limit(f(x),x,0,plus);&lt;br /&gt;
 ( %i10) limit(f(x),x,0,minus);&lt;br /&gt;
 f(x) no tiene asíntotas horizontales &lt;br /&gt;
 ( %i11) limit(f(x),x,minf);&lt;br /&gt;
 ( %i12) limit(f(x)/x,x,inf);&lt;br /&gt;
f(x) tiene una asíntota oblicua, de la forma y = 1 � x + a, donde a viene dado por el&lt;br /&gt;
siguiente límite:&lt;br /&gt;
120 Problema resuelto 1: estudio y representación de una función&lt;br /&gt;
( %i13) limit(f(x)-1*x,x,inf);&lt;br /&gt;
( %o13)&lt;br /&gt;
0&lt;br /&gt;
Por tanto, la asíntota oblicua es y = x.&lt;br /&gt;
Gráfica&lt;br /&gt;
Representaremos f(x) junto con su asíntota, y = x. A base de prueba y error, se&lt;br /&gt;
encontrarán los intervalos de x e y adecuados, en este caso se tomará x 2 [􀀀20; 20],&lt;br /&gt;
y 2 [􀀀20; 100]:&lt;br /&gt;
( %i14) plot2d([f(x),x],[x,-20,20],[y,-20,20],[gnuplot_preamble,&amp;quot;set&lt;br /&gt;
zeroaxis;&amp;quot;]);&lt;br /&gt;
( %o14)&lt;br /&gt;
Figura A.1: Gráfica de la función x2􀀀9&lt;br /&gt;
2 junto a su asíntota oblicua y = x&lt;br /&gt;
Derivada y recta tangente&lt;br /&gt;
A continuación, calculamos la derivada de f(x), definimos el punto a = 3 y&lt;br /&gt;
hallamos f0(a).&lt;br /&gt;
( %i15) diff(f(x),x);&lt;br /&gt;
( %o15)&lt;br /&gt;
2 􀀀&lt;br /&gt;
x2 􀀀 9&lt;br /&gt;
x2&lt;br /&gt;
121&lt;br /&gt;
( %i16) ratsimp(%);&lt;br /&gt;
( %o16)&lt;br /&gt;
x2 + 9&lt;br /&gt;
x2&lt;br /&gt;
( %i17) a:3;&lt;br /&gt;
( %o17)&lt;br /&gt;
3&lt;br /&gt;
( %i18) ”(diff(f(x),x)),x=a;&lt;br /&gt;
( %o18)&lt;br /&gt;
2&lt;br /&gt;
Obsérvese que (como se comentó en los apuntes de este tema) antes de sustituir el valor&lt;br /&gt;
x = a en la derivada, es necesario utilizar un doble operador comilla (”), que se obtiene&lt;br /&gt;
pulsando dos veces en la tecla ?. Este operador se puede interpretar como «el resultado&lt;br /&gt;
de evaluar la siguiente expresión» (en este caso, la derivada de f(x)). En general, la&lt;br /&gt;
última entrada se puede interpretar como «sustituir x = a en el resultado de calcular la&lt;br /&gt;
derivada de f(x)».&lt;br /&gt;
También podríamos haber utilizado este operador para definir una función, a la que&lt;br /&gt;
podríamos llamar Df(x), que representaría a la primera derivada de f(x). Esto lo haremos&lt;br /&gt;
más abajo, como ejemplo. Y como se puede ver aprovecharemos para simplificar la&lt;br /&gt;
derivada (con la función “ratsimp” antes de definir Df(x)). Así, la definición se puede&lt;br /&gt;
leer como «Df(x) se define como el resultado (doble comilla) de simplificar (ratsimp)&lt;br /&gt;
la derivada (diff ) de f(x)»&lt;br /&gt;
Una vez que conocemos la pendiente, m = f0(a) = 2, podemos escribir la recta&lt;br /&gt;
tangente como&lt;br /&gt;
y 􀀀 f(a) = m � (x 􀀀 a)&lt;br /&gt;
( %i19) Df(x):=”(ratsimp(diff(f(x),x)));&lt;br /&gt;
( %o19)&lt;br /&gt;
Df (x) :=&lt;br /&gt;
x2 + 9&lt;br /&gt;
x2&lt;br /&gt;
( %i20) m:Df(a);&lt;br /&gt;
( %o20)&lt;br /&gt;
2&lt;br /&gt;
( %i21) y-f(a)=m*(x-a);&lt;br /&gt;
( %o21)&lt;br /&gt;
y = 2 (x 􀀀 3)&lt;br /&gt;
122 Problema resuelto 1: estudio y representación de una función&lt;br /&gt;
( %i22) expand(%);&lt;br /&gt;
( %o22)&lt;br /&gt;
y = 2 x 􀀀 6&lt;br /&gt;
Y (utilizando el menú de wxMaxima, si así lo deseamos), podemos representar la&lt;br /&gt;
gráfica:&lt;br /&gt;
( %i23) plot2d([f(x),2*x-6],[x,-20,20],[y,-20,20],[gnuplot_preamble,&amp;quot;set&lt;br /&gt;
zeroaxis;&amp;quot;]);&lt;br /&gt;
( %o23)&lt;br /&gt;
El resultado se puede apreciar en la figura A.2&lt;br /&gt;
Figura A.2: Gráfica de la función x2􀀀9&lt;br /&gt;
2 junto su recta tengente en x = 3&lt;br /&gt;
Primitiva y área&lt;br /&gt;
Calcular una primitiva es fácil. Recurramos o no al sistema de menús de wxMaxima,&lt;br /&gt;
tendremos:&lt;br /&gt;
( %i24) integrate(f(x),x);&lt;br /&gt;
( %o24)&lt;br /&gt;
x2&lt;br /&gt;
2&lt;br /&gt;
􀀀 9 log x&lt;br /&gt;
Para el cálculo de áreas, observamos que f(x) &amp;gt; 0 en [3;+1), pues hemos visto que&lt;br /&gt;
f(3) = 0 y si x &amp;gt; 3 el numerador y el denominador de f(x) son estrictamente positivos&lt;br /&gt;
123&lt;br /&gt;
(en Maxima esto se puede comprobar con las órdenes “assume” e “is”, como vemos&lt;br /&gt;
más abajo). Por lo tanto, el área del recinto coincide con la siguiente integral definida:&lt;br /&gt;
Z 4&lt;br /&gt;
3&lt;br /&gt;
f(x)dx&lt;br /&gt;
( %i25) f(x);&lt;br /&gt;
( %o25)&lt;br /&gt;
x2 􀀀 9&lt;br /&gt;
x&lt;br /&gt;
( %i26) numerador:num(f(x));&lt;br /&gt;
( %o26)&lt;br /&gt;
x2 􀀀 9&lt;br /&gt;
( %i27) denominador:denom(f(x));&lt;br /&gt;
( %o27)&lt;br /&gt;
x&lt;br /&gt;
( %i28) assume(x&amp;gt;3);&lt;br /&gt;
( %o28)&lt;br /&gt;
[x &amp;gt; 3]&lt;br /&gt;
( %i29) is(numerador&amp;gt;0);&lt;br /&gt;
( %o29)&lt;br /&gt;
true&lt;br /&gt;
( %i30) is(denominador&amp;gt;0);&lt;br /&gt;
( %o30)&lt;br /&gt;
true&lt;br /&gt;
( %i31) forget(x&amp;gt;3);&lt;br /&gt;
( %o31)&lt;br /&gt;
[x &amp;gt; 3]&lt;br /&gt;
( %i32) integrate(f(x),x,3,4);&lt;br /&gt;
( %o32)&lt;br /&gt;
􀀀9 log 4 + 9 log 3 +&lt;br /&gt;
7&lt;br /&gt;
2&lt;br /&gt;
( %i33) %,numer;&lt;br /&gt;
124 Problema resuelto 1: estudio y representación de una función&lt;br /&gt;
( %o33)&lt;br /&gt;
0;910861347933972&lt;/div&gt;</summary>
		<author><name>Marjimcru</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n&amp;diff=948</id>
		<title>Estudio de una función</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n&amp;diff=948"/>
		<updated>2011-04-19T12:03:25Z</updated>

		<summary type="html">&lt;p&gt;Marjimcru: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt; &amp;#039;&amp;#039;&amp;#039;Enunciado: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
 Sea f(x) = (x^2-9)/x&lt;br /&gt;
 * Halla los puntos de corte de f(x) con los ejes de coordenadas&lt;br /&gt;
 * Presenta una lista con los valores de f(n); n = 100; 200; 300; : : : 1500. ¿Cuál piensas&lt;br /&gt;
   que es el límite de f(x) en +1? Confírmalo con wxMaxima.&lt;br /&gt;
 * Estudia las asíntotas verticales, horizontales y oblicuas de f(x).&lt;br /&gt;
 * Representa de forma conjunta la gráfica de f(x) y de la recta y = x.&lt;br /&gt;
 * Halla la función derivada de f(x) y la recta tangente a f(x) en el punto a = 3.&lt;br /&gt;
 * Representar de forma conjunta a la gráfica de f(x) y la de esta recta tangente.&lt;br /&gt;
 * Calcula una primitiva de f(x).&lt;br /&gt;
 * Sea A el área limitada por la gráfica de f(x) y el eje OX entre x = 3 y x = 4. ¿Es A&lt;br /&gt;
   mayor que uno?&lt;br /&gt;
 * Puntos de corte&lt;br /&gt;
&lt;br /&gt;
 &amp;#039;&amp;#039;&amp;#039;Solución: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 ( %i1) f(x):=(x^2-9)/x;&lt;br /&gt;
&lt;br /&gt;
 Sus puntos de corte con OX verifican f(x) = 0:&lt;br /&gt;
 ( %i2) solve(f(x)=0,x);&lt;br /&gt;
&lt;br /&gt;
 Los puntos de corte con OY verifican x = 0:&lt;br /&gt;
 ( %i3) f(0);&lt;br /&gt;
&lt;br /&gt;
 Valores de f(n)&lt;br /&gt;
 ( %i4) lista:makelist(100*n,n,1,15);&lt;br /&gt;
 ( %i5) tabla:map(f,lista);&lt;br /&gt;
 ( %i6) %,numer;&lt;br /&gt;
 ( %i7) limit(f(x),x,inf);&lt;br /&gt;
&lt;br /&gt;
 Asíntotas&lt;br /&gt;
Como vemos a continuación, f(x) tiene una asíntota vertical en x = 0, de hecho&lt;br /&gt;
l��m&lt;br /&gt;
x!0+&lt;br /&gt;
f(x) = 􀀀1 l��m&lt;br /&gt;
x!0􀀀&lt;br /&gt;
f(x) = +1&lt;br /&gt;
( %i8) limit(f(x),x,0);&lt;br /&gt;
( %o8)&lt;br /&gt;
und&lt;br /&gt;
( %i9) limit(f(x),x,0,plus);&lt;br /&gt;
( %o9)&lt;br /&gt;
􀀀1&lt;br /&gt;
( %i10) limit(f(x),x,0,minus);&lt;br /&gt;
( %o10)&lt;br /&gt;
1&lt;br /&gt;
Por otra parte, f(x) no tiene asíntotas horizontales en +1(como vimos, el límite&lt;br /&gt;
es +1) y tampoco en 􀀀1, como vemos ahora:&lt;br /&gt;
( %i11) limit(f(x),x,minf);&lt;br /&gt;
( %o11)&lt;br /&gt;
􀀀1&lt;br /&gt;
Y, por otro lado, puesto que&lt;br /&gt;
( %i12) limit(f(x)/x,x,inf);&lt;br /&gt;
( %o12)&lt;br /&gt;
1&lt;br /&gt;
f(x) tiene una asíntota oblicua, de la forma y = 1 � x + a, donde a viene dado por el&lt;br /&gt;
siguiente límite:&lt;br /&gt;
120 Problema resuelto 1: estudio y representación de una función&lt;br /&gt;
( %i13) limit(f(x)-1*x,x,inf);&lt;br /&gt;
( %o13)&lt;br /&gt;
0&lt;br /&gt;
Por tanto, la asíntota oblicua es y = x.&lt;br /&gt;
Gráfica&lt;br /&gt;
Representaremos f(x) junto con su asíntota, y = x. A base de prueba y error, se&lt;br /&gt;
encontrarán los intervalos de x e y adecuados, en este caso se tomará x 2 [􀀀20; 20],&lt;br /&gt;
y 2 [􀀀20; 100]:&lt;br /&gt;
( %i14) plot2d([f(x),x],[x,-20,20],[y,-20,20],[gnuplot_preamble,&amp;quot;set&lt;br /&gt;
zeroaxis;&amp;quot;]);&lt;br /&gt;
( %o14)&lt;br /&gt;
Figura A.1: Gráfica de la función x2􀀀9&lt;br /&gt;
2 junto a su asíntota oblicua y = x&lt;br /&gt;
Derivada y recta tangente&lt;br /&gt;
A continuación, calculamos la derivada de f(x), definimos el punto a = 3 y&lt;br /&gt;
hallamos f0(a).&lt;br /&gt;
( %i15) diff(f(x),x);&lt;br /&gt;
( %o15)&lt;br /&gt;
2 􀀀&lt;br /&gt;
x2 􀀀 9&lt;br /&gt;
x2&lt;br /&gt;
121&lt;br /&gt;
( %i16) ratsimp(%);&lt;br /&gt;
( %o16)&lt;br /&gt;
x2 + 9&lt;br /&gt;
x2&lt;br /&gt;
( %i17) a:3;&lt;br /&gt;
( %o17)&lt;br /&gt;
3&lt;br /&gt;
( %i18) ”(diff(f(x),x)),x=a;&lt;br /&gt;
( %o18)&lt;br /&gt;
2&lt;br /&gt;
Obsérvese que (como se comentó en los apuntes de este tema) antes de sustituir el valor&lt;br /&gt;
x = a en la derivada, es necesario utilizar un doble operador comilla (”), que se obtiene&lt;br /&gt;
pulsando dos veces en la tecla ?. Este operador se puede interpretar como «el resultado&lt;br /&gt;
de evaluar la siguiente expresión» (en este caso, la derivada de f(x)). En general, la&lt;br /&gt;
última entrada se puede interpretar como «sustituir x = a en el resultado de calcular la&lt;br /&gt;
derivada de f(x)».&lt;br /&gt;
También podríamos haber utilizado este operador para definir una función, a la que&lt;br /&gt;
podríamos llamar Df(x), que representaría a la primera derivada de f(x). Esto lo haremos&lt;br /&gt;
más abajo, como ejemplo. Y como se puede ver aprovecharemos para simplificar la&lt;br /&gt;
derivada (con la función “ratsimp” antes de definir Df(x)). Así, la definición se puede&lt;br /&gt;
leer como «Df(x) se define como el resultado (doble comilla) de simplificar (ratsimp)&lt;br /&gt;
la derivada (diff ) de f(x)»&lt;br /&gt;
Una vez que conocemos la pendiente, m = f0(a) = 2, podemos escribir la recta&lt;br /&gt;
tangente como&lt;br /&gt;
y 􀀀 f(a) = m � (x 􀀀 a)&lt;br /&gt;
( %i19) Df(x):=”(ratsimp(diff(f(x),x)));&lt;br /&gt;
( %o19)&lt;br /&gt;
Df (x) :=&lt;br /&gt;
x2 + 9&lt;br /&gt;
x2&lt;br /&gt;
( %i20) m:Df(a);&lt;br /&gt;
( %o20)&lt;br /&gt;
2&lt;br /&gt;
( %i21) y-f(a)=m*(x-a);&lt;br /&gt;
( %o21)&lt;br /&gt;
y = 2 (x 􀀀 3)&lt;br /&gt;
122 Problema resuelto 1: estudio y representación de una función&lt;br /&gt;
( %i22) expand(%);&lt;br /&gt;
( %o22)&lt;br /&gt;
y = 2 x 􀀀 6&lt;br /&gt;
Y (utilizando el menú de wxMaxima, si así lo deseamos), podemos representar la&lt;br /&gt;
gráfica:&lt;br /&gt;
( %i23) plot2d([f(x),2*x-6],[x,-20,20],[y,-20,20],[gnuplot_preamble,&amp;quot;set&lt;br /&gt;
zeroaxis;&amp;quot;]);&lt;br /&gt;
( %o23)&lt;br /&gt;
El resultado se puede apreciar en la figura A.2&lt;br /&gt;
Figura A.2: Gráfica de la función x2􀀀9&lt;br /&gt;
2 junto su recta tengente en x = 3&lt;br /&gt;
Primitiva y área&lt;br /&gt;
Calcular una primitiva es fácil. Recurramos o no al sistema de menús de wxMaxima,&lt;br /&gt;
tendremos:&lt;br /&gt;
( %i24) integrate(f(x),x);&lt;br /&gt;
( %o24)&lt;br /&gt;
x2&lt;br /&gt;
2&lt;br /&gt;
􀀀 9 log x&lt;br /&gt;
Para el cálculo de áreas, observamos que f(x) &amp;gt; 0 en [3;+1), pues hemos visto que&lt;br /&gt;
f(3) = 0 y si x &amp;gt; 3 el numerador y el denominador de f(x) son estrictamente positivos&lt;br /&gt;
123&lt;br /&gt;
(en Maxima esto se puede comprobar con las órdenes “assume” e “is”, como vemos&lt;br /&gt;
más abajo). Por lo tanto, el área del recinto coincide con la siguiente integral definida:&lt;br /&gt;
Z 4&lt;br /&gt;
3&lt;br /&gt;
f(x)dx&lt;br /&gt;
( %i25) f(x);&lt;br /&gt;
( %o25)&lt;br /&gt;
x2 􀀀 9&lt;br /&gt;
x&lt;br /&gt;
( %i26) numerador:num(f(x));&lt;br /&gt;
( %o26)&lt;br /&gt;
x2 􀀀 9&lt;br /&gt;
( %i27) denominador:denom(f(x));&lt;br /&gt;
( %o27)&lt;br /&gt;
x&lt;br /&gt;
( %i28) assume(x&amp;gt;3);&lt;br /&gt;
( %o28)&lt;br /&gt;
[x &amp;gt; 3]&lt;br /&gt;
( %i29) is(numerador&amp;gt;0);&lt;br /&gt;
( %o29)&lt;br /&gt;
true&lt;br /&gt;
( %i30) is(denominador&amp;gt;0);&lt;br /&gt;
( %o30)&lt;br /&gt;
true&lt;br /&gt;
( %i31) forget(x&amp;gt;3);&lt;br /&gt;
( %o31)&lt;br /&gt;
[x &amp;gt; 3]&lt;br /&gt;
( %i32) integrate(f(x),x,3,4);&lt;br /&gt;
( %o32)&lt;br /&gt;
􀀀9 log 4 + 9 log 3 +&lt;br /&gt;
7&lt;br /&gt;
2&lt;br /&gt;
( %i33) %,numer;&lt;br /&gt;
124 Problema resuelto 1: estudio y representación de una función&lt;br /&gt;
( %o33)&lt;br /&gt;
0;910861347933972&lt;/div&gt;</summary>
		<author><name>Marjimcru</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n&amp;diff=947</id>
		<title>Estudio de una función</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n&amp;diff=947"/>
		<updated>2011-04-19T12:02:12Z</updated>

		<summary type="html">&lt;p&gt;Marjimcru: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt; &amp;#039;&amp;#039;&amp;#039;Enunciado: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
 Sea f(x) = (x^2-9)/x&lt;br /&gt;
 * Halla los puntos de corte de f(x) con los ejes de coordenadas&lt;br /&gt;
 * Presenta una lista con los valores de f(n); n = 100; 200; 300; : : : 1500. ¿Cuál piensas&lt;br /&gt;
   que es el límite de f(x) en +1? Confírmalo con wxMaxima.&lt;br /&gt;
 * Estudia las asíntotas verticales, horizontales y oblicuas de f(x).&lt;br /&gt;
 * Representa de forma conjunta la gráfica de f(x) y de la recta y = x.&lt;br /&gt;
 * Halla la función derivada de f(x) y la recta tangente a f(x) en el punto a = 3.&lt;br /&gt;
 * Representar de forma conjunta a la gráfica de f(x) y la de esta recta tangente.&lt;br /&gt;
 * Calcula una primitiva de f(x).&lt;br /&gt;
 * Sea A el área limitada por la gráfica de f(x) y el eje OX entre x = 3 y x = 4. ¿Es A&lt;br /&gt;
   mayor que uno?&lt;br /&gt;
 * Puntos de corte&lt;br /&gt;
&lt;br /&gt;
 &amp;#039;&amp;#039;&amp;#039;Solución: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 ( %i1) f(x):=(x^2-9)/x;&lt;br /&gt;
&lt;br /&gt;
 Sus puntos de corte con OX verifican f(x) = 0:&lt;br /&gt;
 ( %i2) solve(f(x)=0,x);&lt;br /&gt;
&lt;br /&gt;
 Los puntos de corte con OY verifican x = 0:&lt;br /&gt;
 ( %i3) f(0);&lt;br /&gt;
&lt;br /&gt;
 Valores de f(n)&lt;br /&gt;
Podríamos calcular uno a uno los valores de f(n) pero es más rápido, como&lt;br /&gt;
vimos en el tema anterior, utilizar la función “map”, que es especialmente apropiada&lt;br /&gt;
para crear tablas de valores:&lt;br /&gt;
( %i4) lista:makelist(100*n,n,1,15);&lt;br /&gt;
( %o4)&lt;br /&gt;
[100; 200; 300; 400; 500; 600; 700; 800; 900; 1000; 1100; 1200; 1300; 1400; 1500]&lt;br /&gt;
( %i5) tabla:map(f,lista);&lt;br /&gt;
( %o5)&lt;br /&gt;
�&lt;br /&gt;
9991&lt;br /&gt;
100&lt;br /&gt;
;&lt;br /&gt;
39991&lt;br /&gt;
200&lt;br /&gt;
;&lt;br /&gt;
29997&lt;br /&gt;
100&lt;br /&gt;
;&lt;br /&gt;
159991&lt;br /&gt;
400&lt;br /&gt;
;&lt;br /&gt;
249991&lt;br /&gt;
500&lt;br /&gt;
;&lt;br /&gt;
119997&lt;br /&gt;
200&lt;br /&gt;
;&lt;br /&gt;
489991&lt;br /&gt;
700&lt;br /&gt;
;&lt;br /&gt;
639991&lt;br /&gt;
800&lt;br /&gt;
;&lt;br /&gt;
89999&lt;br /&gt;
100&lt;br /&gt;
;&lt;br /&gt;
999991&lt;br /&gt;
1000&lt;br /&gt;
;&lt;br /&gt;
1209991&lt;br /&gt;
1100&lt;br /&gt;
;&lt;br /&gt;
479997&lt;br /&gt;
400&lt;br /&gt;
;&lt;br /&gt;
16899130( %i6) %,numer;&lt;br /&gt;
( %o6)&lt;br /&gt;
[99;909999999999997; 199;95500000000001; 299;97000000000003; 399;97750000000002; 499;982000000000Parece que&lt;br /&gt;
l��m&lt;br /&gt;
x!+1&lt;br /&gt;
f(x) = +1;&lt;br /&gt;
pero es mejor confirmarlo con Maxima. Efectivamente:&lt;br /&gt;
119&lt;br /&gt;
( %i7) limit(f(x),x,inf);&lt;br /&gt;
( %o7)&lt;br /&gt;
1&lt;br /&gt;
Asíntotas&lt;br /&gt;
Como vemos a continuación, f(x) tiene una asíntota vertical en x = 0, de hecho&lt;br /&gt;
l��m&lt;br /&gt;
x!0+&lt;br /&gt;
f(x) = 􀀀1 l��m&lt;br /&gt;
x!0􀀀&lt;br /&gt;
f(x) = +1&lt;br /&gt;
( %i8) limit(f(x),x,0);&lt;br /&gt;
( %o8)&lt;br /&gt;
und&lt;br /&gt;
( %i9) limit(f(x),x,0,plus);&lt;br /&gt;
( %o9)&lt;br /&gt;
􀀀1&lt;br /&gt;
( %i10) limit(f(x),x,0,minus);&lt;br /&gt;
( %o10)&lt;br /&gt;
1&lt;br /&gt;
Por otra parte, f(x) no tiene asíntotas horizontales en +1(como vimos, el límite&lt;br /&gt;
es +1) y tampoco en 􀀀1, como vemos ahora:&lt;br /&gt;
( %i11) limit(f(x),x,minf);&lt;br /&gt;
( %o11)&lt;br /&gt;
􀀀1&lt;br /&gt;
Y, por otro lado, puesto que&lt;br /&gt;
( %i12) limit(f(x)/x,x,inf);&lt;br /&gt;
( %o12)&lt;br /&gt;
1&lt;br /&gt;
f(x) tiene una asíntota oblicua, de la forma y = 1 � x + a, donde a viene dado por el&lt;br /&gt;
siguiente límite:&lt;br /&gt;
120 Problema resuelto 1: estudio y representación de una función&lt;br /&gt;
( %i13) limit(f(x)-1*x,x,inf);&lt;br /&gt;
( %o13)&lt;br /&gt;
0&lt;br /&gt;
Por tanto, la asíntota oblicua es y = x.&lt;br /&gt;
Gráfica&lt;br /&gt;
Representaremos f(x) junto con su asíntota, y = x. A base de prueba y error, se&lt;br /&gt;
encontrarán los intervalos de x e y adecuados, en este caso se tomará x 2 [􀀀20; 20],&lt;br /&gt;
y 2 [􀀀20; 100]:&lt;br /&gt;
( %i14) plot2d([f(x),x],[x,-20,20],[y,-20,20],[gnuplot_preamble,&amp;quot;set&lt;br /&gt;
zeroaxis;&amp;quot;]);&lt;br /&gt;
( %o14)&lt;br /&gt;
Figura A.1: Gráfica de la función x2􀀀9&lt;br /&gt;
2 junto a su asíntota oblicua y = x&lt;br /&gt;
Derivada y recta tangente&lt;br /&gt;
A continuación, calculamos la derivada de f(x), definimos el punto a = 3 y&lt;br /&gt;
hallamos f0(a).&lt;br /&gt;
( %i15) diff(f(x),x);&lt;br /&gt;
( %o15)&lt;br /&gt;
2 􀀀&lt;br /&gt;
x2 􀀀 9&lt;br /&gt;
x2&lt;br /&gt;
121&lt;br /&gt;
( %i16) ratsimp(%);&lt;br /&gt;
( %o16)&lt;br /&gt;
x2 + 9&lt;br /&gt;
x2&lt;br /&gt;
( %i17) a:3;&lt;br /&gt;
( %o17)&lt;br /&gt;
3&lt;br /&gt;
( %i18) ”(diff(f(x),x)),x=a;&lt;br /&gt;
( %o18)&lt;br /&gt;
2&lt;br /&gt;
Obsérvese que (como se comentó en los apuntes de este tema) antes de sustituir el valor&lt;br /&gt;
x = a en la derivada, es necesario utilizar un doble operador comilla (”), que se obtiene&lt;br /&gt;
pulsando dos veces en la tecla ?. Este operador se puede interpretar como «el resultado&lt;br /&gt;
de evaluar la siguiente expresión» (en este caso, la derivada de f(x)). En general, la&lt;br /&gt;
última entrada se puede interpretar como «sustituir x = a en el resultado de calcular la&lt;br /&gt;
derivada de f(x)».&lt;br /&gt;
También podríamos haber utilizado este operador para definir una función, a la que&lt;br /&gt;
podríamos llamar Df(x), que representaría a la primera derivada de f(x). Esto lo haremos&lt;br /&gt;
más abajo, como ejemplo. Y como se puede ver aprovecharemos para simplificar la&lt;br /&gt;
derivada (con la función “ratsimp” antes de definir Df(x)). Así, la definición se puede&lt;br /&gt;
leer como «Df(x) se define como el resultado (doble comilla) de simplificar (ratsimp)&lt;br /&gt;
la derivada (diff ) de f(x)»&lt;br /&gt;
Una vez que conocemos la pendiente, m = f0(a) = 2, podemos escribir la recta&lt;br /&gt;
tangente como&lt;br /&gt;
y 􀀀 f(a) = m � (x 􀀀 a)&lt;br /&gt;
( %i19) Df(x):=”(ratsimp(diff(f(x),x)));&lt;br /&gt;
( %o19)&lt;br /&gt;
Df (x) :=&lt;br /&gt;
x2 + 9&lt;br /&gt;
x2&lt;br /&gt;
( %i20) m:Df(a);&lt;br /&gt;
( %o20)&lt;br /&gt;
2&lt;br /&gt;
( %i21) y-f(a)=m*(x-a);&lt;br /&gt;
( %o21)&lt;br /&gt;
y = 2 (x 􀀀 3)&lt;br /&gt;
122 Problema resuelto 1: estudio y representación de una función&lt;br /&gt;
( %i22) expand(%);&lt;br /&gt;
( %o22)&lt;br /&gt;
y = 2 x 􀀀 6&lt;br /&gt;
Y (utilizando el menú de wxMaxima, si así lo deseamos), podemos representar la&lt;br /&gt;
gráfica:&lt;br /&gt;
( %i23) plot2d([f(x),2*x-6],[x,-20,20],[y,-20,20],[gnuplot_preamble,&amp;quot;set&lt;br /&gt;
zeroaxis;&amp;quot;]);&lt;br /&gt;
( %o23)&lt;br /&gt;
El resultado se puede apreciar en la figura A.2&lt;br /&gt;
Figura A.2: Gráfica de la función x2􀀀9&lt;br /&gt;
2 junto su recta tengente en x = 3&lt;br /&gt;
Primitiva y área&lt;br /&gt;
Calcular una primitiva es fácil. Recurramos o no al sistema de menús de wxMaxima,&lt;br /&gt;
tendremos:&lt;br /&gt;
( %i24) integrate(f(x),x);&lt;br /&gt;
( %o24)&lt;br /&gt;
x2&lt;br /&gt;
2&lt;br /&gt;
􀀀 9 log x&lt;br /&gt;
Para el cálculo de áreas, observamos que f(x) &amp;gt; 0 en [3;+1), pues hemos visto que&lt;br /&gt;
f(3) = 0 y si x &amp;gt; 3 el numerador y el denominador de f(x) son estrictamente positivos&lt;br /&gt;
123&lt;br /&gt;
(en Maxima esto se puede comprobar con las órdenes “assume” e “is”, como vemos&lt;br /&gt;
más abajo). Por lo tanto, el área del recinto coincide con la siguiente integral definida:&lt;br /&gt;
Z 4&lt;br /&gt;
3&lt;br /&gt;
f(x)dx&lt;br /&gt;
( %i25) f(x);&lt;br /&gt;
( %o25)&lt;br /&gt;
x2 􀀀 9&lt;br /&gt;
x&lt;br /&gt;
( %i26) numerador:num(f(x));&lt;br /&gt;
( %o26)&lt;br /&gt;
x2 􀀀 9&lt;br /&gt;
( %i27) denominador:denom(f(x));&lt;br /&gt;
( %o27)&lt;br /&gt;
x&lt;br /&gt;
( %i28) assume(x&amp;gt;3);&lt;br /&gt;
( %o28)&lt;br /&gt;
[x &amp;gt; 3]&lt;br /&gt;
( %i29) is(numerador&amp;gt;0);&lt;br /&gt;
( %o29)&lt;br /&gt;
true&lt;br /&gt;
( %i30) is(denominador&amp;gt;0);&lt;br /&gt;
( %o30)&lt;br /&gt;
true&lt;br /&gt;
( %i31) forget(x&amp;gt;3);&lt;br /&gt;
( %o31)&lt;br /&gt;
[x &amp;gt; 3]&lt;br /&gt;
( %i32) integrate(f(x),x,3,4);&lt;br /&gt;
( %o32)&lt;br /&gt;
􀀀9 log 4 + 9 log 3 +&lt;br /&gt;
7&lt;br /&gt;
2&lt;br /&gt;
( %i33) %,numer;&lt;br /&gt;
124 Problema resuelto 1: estudio y representación de una función&lt;br /&gt;
( %o33)&lt;br /&gt;
0;910861347933972&lt;/div&gt;</summary>
		<author><name>Marjimcru</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n&amp;diff=946</id>
		<title>Estudio de una función</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n&amp;diff=946"/>
		<updated>2011-04-19T12:00:41Z</updated>

		<summary type="html">&lt;p&gt;Marjimcru: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt; &amp;#039;&amp;#039;&amp;#039;Enunciado: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
Sea f(x) = (x^2-9)/x&lt;br /&gt;
 * Halla los puntos de corte de f(x) con los ejes de coordenadas&lt;br /&gt;
 * Presenta una lista con los valores de f(n); n = 100; 200; 300; : : : 1500. ¿Cuál piensas&lt;br /&gt;
   que es el límite de f(x) en +1? Confírmalo con wxMaxima.&lt;br /&gt;
 * Estudia las asíntotas verticales, horizontales y oblicuas de f(x).&lt;br /&gt;
 * Representa de forma conjunta la gráfica de f(x) y de la recta y = x.&lt;br /&gt;
 * Halla la función derivada de f(x) y la recta tangente a f(x) en el punto a = 3.&lt;br /&gt;
 * Representar de forma conjunta a la gráfica de f(x) y la de esta recta tangente.&lt;br /&gt;
 * Calcula una primitiva de f(x).&lt;br /&gt;
 * Sea A el área limitada por la gráfica de f(x) y el eje OX entre x = 3 y x = 4. ¿Es A&lt;br /&gt;
   mayor que uno?&lt;br /&gt;
 * Puntos de corte&lt;br /&gt;
&lt;br /&gt;
 &amp;#039;&amp;#039;&amp;#039;Solución: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
Comenzamos definiendo f(x):&lt;br /&gt;
( %i1) f(x):=(x^2-9)/x;&lt;br /&gt;
( %o1)&lt;br /&gt;
f (x) :=&lt;br /&gt;
x2 􀀀 9&lt;br /&gt;
x&lt;br /&gt;
118 Problema resuelto 1: estudio y representación de una función&lt;br /&gt;
Sus puntos de corte con OX verifican f(x) = 0:&lt;br /&gt;
( %i2) solve(f(x)=0,x);&lt;br /&gt;
( %o2)&lt;br /&gt;
[x = 􀀀3; x = 3]&lt;br /&gt;
así que tenemos (􀀀3; 0) y (3; 0). Los puntos de corte con OY verifican x = 0, pero&lt;br /&gt;
( %i3) f(0);&lt;br /&gt;
Division by 0&lt;br /&gt;
#0: f(x=0)&lt;br /&gt;
- an error. Quitting. To debug this try debugmode(true);&lt;br /&gt;
Evidentemente, el punto x = 0 no está en el dominio, pues el denominador se hace cero&lt;br /&gt;
(y Maxima nos da el error anterior).&lt;br /&gt;
Valores de f(n)&lt;br /&gt;
Podríamos calcular uno a uno los valores de f(n) pero es más rápido, como&lt;br /&gt;
vimos en el tema anterior, utilizar la función “map”, que es especialmente apropiada&lt;br /&gt;
para crear tablas de valores:&lt;br /&gt;
( %i4) lista:makelist(100*n,n,1,15);&lt;br /&gt;
( %o4)&lt;br /&gt;
[100; 200; 300; 400; 500; 600; 700; 800; 900; 1000; 1100; 1200; 1300; 1400; 1500]&lt;br /&gt;
( %i5) tabla:map(f,lista);&lt;br /&gt;
( %o5)&lt;br /&gt;
�&lt;br /&gt;
9991&lt;br /&gt;
100&lt;br /&gt;
;&lt;br /&gt;
39991&lt;br /&gt;
200&lt;br /&gt;
;&lt;br /&gt;
29997&lt;br /&gt;
100&lt;br /&gt;
;&lt;br /&gt;
159991&lt;br /&gt;
400&lt;br /&gt;
;&lt;br /&gt;
249991&lt;br /&gt;
500&lt;br /&gt;
;&lt;br /&gt;
119997&lt;br /&gt;
200&lt;br /&gt;
;&lt;br /&gt;
489991&lt;br /&gt;
700&lt;br /&gt;
;&lt;br /&gt;
639991&lt;br /&gt;
800&lt;br /&gt;
;&lt;br /&gt;
89999&lt;br /&gt;
100&lt;br /&gt;
;&lt;br /&gt;
999991&lt;br /&gt;
1000&lt;br /&gt;
;&lt;br /&gt;
1209991&lt;br /&gt;
1100&lt;br /&gt;
;&lt;br /&gt;
479997&lt;br /&gt;
400&lt;br /&gt;
;&lt;br /&gt;
16899130( %i6) %,numer;&lt;br /&gt;
( %o6)&lt;br /&gt;
[99;909999999999997; 199;95500000000001; 299;97000000000003; 399;97750000000002; 499;982000000000Parece que&lt;br /&gt;
l��m&lt;br /&gt;
x!+1&lt;br /&gt;
f(x) = +1;&lt;br /&gt;
pero es mejor confirmarlo con Maxima. Efectivamente:&lt;br /&gt;
119&lt;br /&gt;
( %i7) limit(f(x),x,inf);&lt;br /&gt;
( %o7)&lt;br /&gt;
1&lt;br /&gt;
Asíntotas&lt;br /&gt;
Como vemos a continuación, f(x) tiene una asíntota vertical en x = 0, de hecho&lt;br /&gt;
l��m&lt;br /&gt;
x!0+&lt;br /&gt;
f(x) = 􀀀1 l��m&lt;br /&gt;
x!0􀀀&lt;br /&gt;
f(x) = +1&lt;br /&gt;
( %i8) limit(f(x),x,0);&lt;br /&gt;
( %o8)&lt;br /&gt;
und&lt;br /&gt;
( %i9) limit(f(x),x,0,plus);&lt;br /&gt;
( %o9)&lt;br /&gt;
􀀀1&lt;br /&gt;
( %i10) limit(f(x),x,0,minus);&lt;br /&gt;
( %o10)&lt;br /&gt;
1&lt;br /&gt;
Por otra parte, f(x) no tiene asíntotas horizontales en +1(como vimos, el límite&lt;br /&gt;
es +1) y tampoco en 􀀀1, como vemos ahora:&lt;br /&gt;
( %i11) limit(f(x),x,minf);&lt;br /&gt;
( %o11)&lt;br /&gt;
􀀀1&lt;br /&gt;
Y, por otro lado, puesto que&lt;br /&gt;
( %i12) limit(f(x)/x,x,inf);&lt;br /&gt;
( %o12)&lt;br /&gt;
1&lt;br /&gt;
f(x) tiene una asíntota oblicua, de la forma y = 1 � x + a, donde a viene dado por el&lt;br /&gt;
siguiente límite:&lt;br /&gt;
120 Problema resuelto 1: estudio y representación de una función&lt;br /&gt;
( %i13) limit(f(x)-1*x,x,inf);&lt;br /&gt;
( %o13)&lt;br /&gt;
0&lt;br /&gt;
Por tanto, la asíntota oblicua es y = x.&lt;br /&gt;
Gráfica&lt;br /&gt;
Representaremos f(x) junto con su asíntota, y = x. A base de prueba y error, se&lt;br /&gt;
encontrarán los intervalos de x e y adecuados, en este caso se tomará x 2 [􀀀20; 20],&lt;br /&gt;
y 2 [􀀀20; 100]:&lt;br /&gt;
( %i14) plot2d([f(x),x],[x,-20,20],[y,-20,20],[gnuplot_preamble,&amp;quot;set&lt;br /&gt;
zeroaxis;&amp;quot;]);&lt;br /&gt;
( %o14)&lt;br /&gt;
Figura A.1: Gráfica de la función x2􀀀9&lt;br /&gt;
2 junto a su asíntota oblicua y = x&lt;br /&gt;
Derivada y recta tangente&lt;br /&gt;
A continuación, calculamos la derivada de f(x), definimos el punto a = 3 y&lt;br /&gt;
hallamos f0(a).&lt;br /&gt;
( %i15) diff(f(x),x);&lt;br /&gt;
( %o15)&lt;br /&gt;
2 􀀀&lt;br /&gt;
x2 􀀀 9&lt;br /&gt;
x2&lt;br /&gt;
121&lt;br /&gt;
( %i16) ratsimp(%);&lt;br /&gt;
( %o16)&lt;br /&gt;
x2 + 9&lt;br /&gt;
x2&lt;br /&gt;
( %i17) a:3;&lt;br /&gt;
( %o17)&lt;br /&gt;
3&lt;br /&gt;
( %i18) ”(diff(f(x),x)),x=a;&lt;br /&gt;
( %o18)&lt;br /&gt;
2&lt;br /&gt;
Obsérvese que (como se comentó en los apuntes de este tema) antes de sustituir el valor&lt;br /&gt;
x = a en la derivada, es necesario utilizar un doble operador comilla (”), que se obtiene&lt;br /&gt;
pulsando dos veces en la tecla ?. Este operador se puede interpretar como «el resultado&lt;br /&gt;
de evaluar la siguiente expresión» (en este caso, la derivada de f(x)). En general, la&lt;br /&gt;
última entrada se puede interpretar como «sustituir x = a en el resultado de calcular la&lt;br /&gt;
derivada de f(x)».&lt;br /&gt;
También podríamos haber utilizado este operador para definir una función, a la que&lt;br /&gt;
podríamos llamar Df(x), que representaría a la primera derivada de f(x). Esto lo haremos&lt;br /&gt;
más abajo, como ejemplo. Y como se puede ver aprovecharemos para simplificar la&lt;br /&gt;
derivada (con la función “ratsimp” antes de definir Df(x)). Así, la definición se puede&lt;br /&gt;
leer como «Df(x) se define como el resultado (doble comilla) de simplificar (ratsimp)&lt;br /&gt;
la derivada (diff ) de f(x)»&lt;br /&gt;
Una vez que conocemos la pendiente, m = f0(a) = 2, podemos escribir la recta&lt;br /&gt;
tangente como&lt;br /&gt;
y 􀀀 f(a) = m � (x 􀀀 a)&lt;br /&gt;
( %i19) Df(x):=”(ratsimp(diff(f(x),x)));&lt;br /&gt;
( %o19)&lt;br /&gt;
Df (x) :=&lt;br /&gt;
x2 + 9&lt;br /&gt;
x2&lt;br /&gt;
( %i20) m:Df(a);&lt;br /&gt;
( %o20)&lt;br /&gt;
2&lt;br /&gt;
( %i21) y-f(a)=m*(x-a);&lt;br /&gt;
( %o21)&lt;br /&gt;
y = 2 (x 􀀀 3)&lt;br /&gt;
122 Problema resuelto 1: estudio y representación de una función&lt;br /&gt;
( %i22) expand(%);&lt;br /&gt;
( %o22)&lt;br /&gt;
y = 2 x 􀀀 6&lt;br /&gt;
Y (utilizando el menú de wxMaxima, si así lo deseamos), podemos representar la&lt;br /&gt;
gráfica:&lt;br /&gt;
( %i23) plot2d([f(x),2*x-6],[x,-20,20],[y,-20,20],[gnuplot_preamble,&amp;quot;set&lt;br /&gt;
zeroaxis;&amp;quot;]);&lt;br /&gt;
( %o23)&lt;br /&gt;
El resultado se puede apreciar en la figura A.2&lt;br /&gt;
Figura A.2: Gráfica de la función x2􀀀9&lt;br /&gt;
2 junto su recta tengente en x = 3&lt;br /&gt;
Primitiva y área&lt;br /&gt;
Calcular una primitiva es fácil. Recurramos o no al sistema de menús de wxMaxima,&lt;br /&gt;
tendremos:&lt;br /&gt;
( %i24) integrate(f(x),x);&lt;br /&gt;
( %o24)&lt;br /&gt;
x2&lt;br /&gt;
2&lt;br /&gt;
􀀀 9 log x&lt;br /&gt;
Para el cálculo de áreas, observamos que f(x) &amp;gt; 0 en [3;+1), pues hemos visto que&lt;br /&gt;
f(3) = 0 y si x &amp;gt; 3 el numerador y el denominador de f(x) son estrictamente positivos&lt;br /&gt;
123&lt;br /&gt;
(en Maxima esto se puede comprobar con las órdenes “assume” e “is”, como vemos&lt;br /&gt;
más abajo). Por lo tanto, el área del recinto coincide con la siguiente integral definida:&lt;br /&gt;
Z 4&lt;br /&gt;
3&lt;br /&gt;
f(x)dx&lt;br /&gt;
( %i25) f(x);&lt;br /&gt;
( %o25)&lt;br /&gt;
x2 􀀀 9&lt;br /&gt;
x&lt;br /&gt;
( %i26) numerador:num(f(x));&lt;br /&gt;
( %o26)&lt;br /&gt;
x2 􀀀 9&lt;br /&gt;
( %i27) denominador:denom(f(x));&lt;br /&gt;
( %o27)&lt;br /&gt;
x&lt;br /&gt;
( %i28) assume(x&amp;gt;3);&lt;br /&gt;
( %o28)&lt;br /&gt;
[x &amp;gt; 3]&lt;br /&gt;
( %i29) is(numerador&amp;gt;0);&lt;br /&gt;
( %o29)&lt;br /&gt;
true&lt;br /&gt;
( %i30) is(denominador&amp;gt;0);&lt;br /&gt;
( %o30)&lt;br /&gt;
true&lt;br /&gt;
( %i31) forget(x&amp;gt;3);&lt;br /&gt;
( %o31)&lt;br /&gt;
[x &amp;gt; 3]&lt;br /&gt;
( %i32) integrate(f(x),x,3,4);&lt;br /&gt;
( %o32)&lt;br /&gt;
􀀀9 log 4 + 9 log 3 +&lt;br /&gt;
7&lt;br /&gt;
2&lt;br /&gt;
( %i33) %,numer;&lt;br /&gt;
124 Problema resuelto 1: estudio y representación de una función&lt;br /&gt;
( %o33)&lt;br /&gt;
0;910861347933972&lt;/div&gt;</summary>
		<author><name>Marjimcru</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n&amp;diff=944</id>
		<title>Estudio de una función</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n&amp;diff=944"/>
		<updated>2011-04-19T11:58:57Z</updated>

		<summary type="html">&lt;p&gt;Marjimcru: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt; &amp;#039;&amp;#039;&amp;#039;Enunciado: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
Sea f(x) = (x^2-9)/x&lt;br /&gt;
Halla los puntos de corte de f(x) con los ejes de coordenadas&lt;br /&gt;
Presenta una lista con los valores de f(n); n = 100; 200; 300; : : : 1500. ¿Cuál piensas&lt;br /&gt;
que es el límite de f(x) en +1? Confírmalo con wxMaxima.&lt;br /&gt;
Estudia las asíntotas verticales, horizontales y oblicuas de f(x).&lt;br /&gt;
Representa de forma conjunta la gráfica de f(x) y de la recta y = x.&lt;br /&gt;
Halla la función derivada de f(x) y la recta tangente a f(x) en el punto a = 3.&lt;br /&gt;
Representar de forma conjunta a la gráfica de f(x) y la de esta recta tangente.&lt;br /&gt;
Calcula una primitiva de f(x).&lt;br /&gt;
Sea A el área limitada por la gráfica de f(x) y el eje OX entre x = 3 y x = 4. ¿Es A&lt;br /&gt;
mayor que uno?&lt;br /&gt;
Puntos de corte&lt;br /&gt;
Comenzamos definiendo f(x):&lt;br /&gt;
( %i1) f(x):=(x^2-9)/x;&lt;br /&gt;
( %o1)&lt;br /&gt;
f (x) :=&lt;br /&gt;
x2 􀀀 9&lt;br /&gt;
x&lt;br /&gt;
118 Problema resuelto 1: estudio y representación de una función&lt;br /&gt;
Sus puntos de corte con OX verifican f(x) = 0:&lt;br /&gt;
( %i2) solve(f(x)=0,x);&lt;br /&gt;
( %o2)&lt;br /&gt;
[x = 􀀀3; x = 3]&lt;br /&gt;
así que tenemos (􀀀3; 0) y (3; 0). Los puntos de corte con OY verifican x = 0, pero&lt;br /&gt;
( %i3) f(0);&lt;br /&gt;
Division by 0&lt;br /&gt;
#0: f(x=0)&lt;br /&gt;
- an error. Quitting. To debug this try debugmode(true);&lt;br /&gt;
Evidentemente, el punto x = 0 no está en el dominio, pues el denominador se hace cero&lt;br /&gt;
(y Maxima nos da el error anterior).&lt;br /&gt;
Valores de f(n)&lt;br /&gt;
Podríamos calcular uno a uno los valores de f(n) pero es más rápido, como&lt;br /&gt;
vimos en el tema anterior, utilizar la función “map”, que es especialmente apropiada&lt;br /&gt;
para crear tablas de valores:&lt;br /&gt;
( %i4) lista:makelist(100*n,n,1,15);&lt;br /&gt;
( %o4)&lt;br /&gt;
[100; 200; 300; 400; 500; 600; 700; 800; 900; 1000; 1100; 1200; 1300; 1400; 1500]&lt;br /&gt;
( %i5) tabla:map(f,lista);&lt;br /&gt;
( %o5)&lt;br /&gt;
�&lt;br /&gt;
9991&lt;br /&gt;
100&lt;br /&gt;
;&lt;br /&gt;
39991&lt;br /&gt;
200&lt;br /&gt;
;&lt;br /&gt;
29997&lt;br /&gt;
100&lt;br /&gt;
;&lt;br /&gt;
159991&lt;br /&gt;
400&lt;br /&gt;
;&lt;br /&gt;
249991&lt;br /&gt;
500&lt;br /&gt;
;&lt;br /&gt;
119997&lt;br /&gt;
200&lt;br /&gt;
;&lt;br /&gt;
489991&lt;br /&gt;
700&lt;br /&gt;
;&lt;br /&gt;
639991&lt;br /&gt;
800&lt;br /&gt;
;&lt;br /&gt;
89999&lt;br /&gt;
100&lt;br /&gt;
;&lt;br /&gt;
999991&lt;br /&gt;
1000&lt;br /&gt;
;&lt;br /&gt;
1209991&lt;br /&gt;
1100&lt;br /&gt;
;&lt;br /&gt;
479997&lt;br /&gt;
400&lt;br /&gt;
;&lt;br /&gt;
16899130( %i6) %,numer;&lt;br /&gt;
( %o6)&lt;br /&gt;
[99;909999999999997; 199;95500000000001; 299;97000000000003; 399;97750000000002; 499;982000000000Parece que&lt;br /&gt;
l��m&lt;br /&gt;
x!+1&lt;br /&gt;
f(x) = +1;&lt;br /&gt;
pero es mejor confirmarlo con Maxima. Efectivamente:&lt;br /&gt;
119&lt;br /&gt;
( %i7) limit(f(x),x,inf);&lt;br /&gt;
( %o7)&lt;br /&gt;
1&lt;br /&gt;
Asíntotas&lt;br /&gt;
Como vemos a continuación, f(x) tiene una asíntota vertical en x = 0, de hecho&lt;br /&gt;
l��m&lt;br /&gt;
x!0+&lt;br /&gt;
f(x) = 􀀀1 l��m&lt;br /&gt;
x!0􀀀&lt;br /&gt;
f(x) = +1&lt;br /&gt;
( %i8) limit(f(x),x,0);&lt;br /&gt;
( %o8)&lt;br /&gt;
und&lt;br /&gt;
( %i9) limit(f(x),x,0,plus);&lt;br /&gt;
( %o9)&lt;br /&gt;
􀀀1&lt;br /&gt;
( %i10) limit(f(x),x,0,minus);&lt;br /&gt;
( %o10)&lt;br /&gt;
1&lt;br /&gt;
Por otra parte, f(x) no tiene asíntotas horizontales en +1(como vimos, el límite&lt;br /&gt;
es +1) y tampoco en 􀀀1, como vemos ahora:&lt;br /&gt;
( %i11) limit(f(x),x,minf);&lt;br /&gt;
( %o11)&lt;br /&gt;
􀀀1&lt;br /&gt;
Y, por otro lado, puesto que&lt;br /&gt;
( %i12) limit(f(x)/x,x,inf);&lt;br /&gt;
( %o12)&lt;br /&gt;
1&lt;br /&gt;
f(x) tiene una asíntota oblicua, de la forma y = 1 � x + a, donde a viene dado por el&lt;br /&gt;
siguiente límite:&lt;br /&gt;
120 Problema resuelto 1: estudio y representación de una función&lt;br /&gt;
( %i13) limit(f(x)-1*x,x,inf);&lt;br /&gt;
( %o13)&lt;br /&gt;
0&lt;br /&gt;
Por tanto, la asíntota oblicua es y = x.&lt;br /&gt;
Gráfica&lt;br /&gt;
Representaremos f(x) junto con su asíntota, y = x. A base de prueba y error, se&lt;br /&gt;
encontrarán los intervalos de x e y adecuados, en este caso se tomará x 2 [􀀀20; 20],&lt;br /&gt;
y 2 [􀀀20; 100]:&lt;br /&gt;
( %i14) plot2d([f(x),x],[x,-20,20],[y,-20,20],[gnuplot_preamble,&amp;quot;set&lt;br /&gt;
zeroaxis;&amp;quot;]);&lt;br /&gt;
( %o14)&lt;br /&gt;
Figura A.1: Gráfica de la función x2􀀀9&lt;br /&gt;
2 junto a su asíntota oblicua y = x&lt;br /&gt;
Derivada y recta tangente&lt;br /&gt;
A continuación, calculamos la derivada de f(x), definimos el punto a = 3 y&lt;br /&gt;
hallamos f0(a).&lt;br /&gt;
( %i15) diff(f(x),x);&lt;br /&gt;
( %o15)&lt;br /&gt;
2 􀀀&lt;br /&gt;
x2 􀀀 9&lt;br /&gt;
x2&lt;br /&gt;
121&lt;br /&gt;
( %i16) ratsimp(%);&lt;br /&gt;
( %o16)&lt;br /&gt;
x2 + 9&lt;br /&gt;
x2&lt;br /&gt;
( %i17) a:3;&lt;br /&gt;
( %o17)&lt;br /&gt;
3&lt;br /&gt;
( %i18) ”(diff(f(x),x)),x=a;&lt;br /&gt;
( %o18)&lt;br /&gt;
2&lt;br /&gt;
Obsérvese que (como se comentó en los apuntes de este tema) antes de sustituir el valor&lt;br /&gt;
x = a en la derivada, es necesario utilizar un doble operador comilla (”), que se obtiene&lt;br /&gt;
pulsando dos veces en la tecla ?. Este operador se puede interpretar como «el resultado&lt;br /&gt;
de evaluar la siguiente expresión» (en este caso, la derivada de f(x)). En general, la&lt;br /&gt;
última entrada se puede interpretar como «sustituir x = a en el resultado de calcular la&lt;br /&gt;
derivada de f(x)».&lt;br /&gt;
También podríamos haber utilizado este operador para definir una función, a la que&lt;br /&gt;
podríamos llamar Df(x), que representaría a la primera derivada de f(x). Esto lo haremos&lt;br /&gt;
más abajo, como ejemplo. Y como se puede ver aprovecharemos para simplificar la&lt;br /&gt;
derivada (con la función “ratsimp” antes de definir Df(x)). Así, la definición se puede&lt;br /&gt;
leer como «Df(x) se define como el resultado (doble comilla) de simplificar (ratsimp)&lt;br /&gt;
la derivada (diff ) de f(x)»&lt;br /&gt;
Una vez que conocemos la pendiente, m = f0(a) = 2, podemos escribir la recta&lt;br /&gt;
tangente como&lt;br /&gt;
y 􀀀 f(a) = m � (x 􀀀 a)&lt;br /&gt;
( %i19) Df(x):=”(ratsimp(diff(f(x),x)));&lt;br /&gt;
( %o19)&lt;br /&gt;
Df (x) :=&lt;br /&gt;
x2 + 9&lt;br /&gt;
x2&lt;br /&gt;
( %i20) m:Df(a);&lt;br /&gt;
( %o20)&lt;br /&gt;
2&lt;br /&gt;
( %i21) y-f(a)=m*(x-a);&lt;br /&gt;
( %o21)&lt;br /&gt;
y = 2 (x 􀀀 3)&lt;br /&gt;
122 Problema resuelto 1: estudio y representación de una función&lt;br /&gt;
( %i22) expand(%);&lt;br /&gt;
( %o22)&lt;br /&gt;
y = 2 x 􀀀 6&lt;br /&gt;
Y (utilizando el menú de wxMaxima, si así lo deseamos), podemos representar la&lt;br /&gt;
gráfica:&lt;br /&gt;
( %i23) plot2d([f(x),2*x-6],[x,-20,20],[y,-20,20],[gnuplot_preamble,&amp;quot;set&lt;br /&gt;
zeroaxis;&amp;quot;]);&lt;br /&gt;
( %o23)&lt;br /&gt;
El resultado se puede apreciar en la figura A.2&lt;br /&gt;
Figura A.2: Gráfica de la función x2􀀀9&lt;br /&gt;
2 junto su recta tengente en x = 3&lt;br /&gt;
Primitiva y área&lt;br /&gt;
Calcular una primitiva es fácil. Recurramos o no al sistema de menús de wxMaxima,&lt;br /&gt;
tendremos:&lt;br /&gt;
( %i24) integrate(f(x),x);&lt;br /&gt;
( %o24)&lt;br /&gt;
x2&lt;br /&gt;
2&lt;br /&gt;
􀀀 9 log x&lt;br /&gt;
Para el cálculo de áreas, observamos que f(x) &amp;gt; 0 en [3;+1), pues hemos visto que&lt;br /&gt;
f(3) = 0 y si x &amp;gt; 3 el numerador y el denominador de f(x) son estrictamente positivos&lt;br /&gt;
123&lt;br /&gt;
(en Maxima esto se puede comprobar con las órdenes “assume” e “is”, como vemos&lt;br /&gt;
más abajo). Por lo tanto, el área del recinto coincide con la siguiente integral definida:&lt;br /&gt;
Z 4&lt;br /&gt;
3&lt;br /&gt;
f(x)dx&lt;br /&gt;
( %i25) f(x);&lt;br /&gt;
( %o25)&lt;br /&gt;
x2 􀀀 9&lt;br /&gt;
x&lt;br /&gt;
( %i26) numerador:num(f(x));&lt;br /&gt;
( %o26)&lt;br /&gt;
x2 􀀀 9&lt;br /&gt;
( %i27) denominador:denom(f(x));&lt;br /&gt;
( %o27)&lt;br /&gt;
x&lt;br /&gt;
( %i28) assume(x&amp;gt;3);&lt;br /&gt;
( %o28)&lt;br /&gt;
[x &amp;gt; 3]&lt;br /&gt;
( %i29) is(numerador&amp;gt;0);&lt;br /&gt;
( %o29)&lt;br /&gt;
true&lt;br /&gt;
( %i30) is(denominador&amp;gt;0);&lt;br /&gt;
( %o30)&lt;br /&gt;
true&lt;br /&gt;
( %i31) forget(x&amp;gt;3);&lt;br /&gt;
( %o31)&lt;br /&gt;
[x &amp;gt; 3]&lt;br /&gt;
( %i32) integrate(f(x),x,3,4);&lt;br /&gt;
( %o32)&lt;br /&gt;
􀀀9 log 4 + 9 log 3 +&lt;br /&gt;
7&lt;br /&gt;
2&lt;br /&gt;
( %i33) %,numer;&lt;br /&gt;
124 Problema resuelto 1: estudio y representación de una función&lt;br /&gt;
( %o33)&lt;br /&gt;
0;910861347933972&lt;/div&gt;</summary>
		<author><name>Marjimcru</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n&amp;diff=942</id>
		<title>Estudio de una función</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n&amp;diff=942"/>
		<updated>2011-04-19T11:58:33Z</updated>

		<summary type="html">&lt;p&gt;Marjimcru: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt; &amp;#039;&amp;#039;&amp;#039;Enunciado: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
Sea&lt;br /&gt;
f(x) = (x^2-9)/x&lt;br /&gt;
Halla los puntos de corte de f(x) con los ejes de coordenadas&lt;br /&gt;
Presenta una lista con los valores de f(n); n = 100; 200; 300; : : : 1500. ¿Cuál piensas&lt;br /&gt;
que es el límite de f(x) en +1? Confírmalo con wxMaxima.&lt;br /&gt;
Estudia las asíntotas verticales, horizontales y oblicuas de f(x).&lt;br /&gt;
Representa de forma conjunta la gráfica de f(x) y de la recta y = x.&lt;br /&gt;
Halla la función derivada de f(x) y la recta tangente a f(x) en el punto a = 3.&lt;br /&gt;
Representar de forma conjunta a la gráfica de f(x) y la de esta recta tangente.&lt;br /&gt;
Calcula una primitiva de f(x).&lt;br /&gt;
Sea A el área limitada por la gráfica de f(x) y el eje OX entre x = 3 y x = 4. ¿Es A&lt;br /&gt;
mayor que uno?&lt;br /&gt;
Puntos de corte&lt;br /&gt;
Comenzamos definiendo f(x):&lt;br /&gt;
( %i1) f(x):=(x^2-9)/x;&lt;br /&gt;
( %o1)&lt;br /&gt;
f (x) :=&lt;br /&gt;
x2 􀀀 9&lt;br /&gt;
x&lt;br /&gt;
118 Problema resuelto 1: estudio y representación de una función&lt;br /&gt;
Sus puntos de corte con OX verifican f(x) = 0:&lt;br /&gt;
( %i2) solve(f(x)=0,x);&lt;br /&gt;
( %o2)&lt;br /&gt;
[x = 􀀀3; x = 3]&lt;br /&gt;
así que tenemos (􀀀3; 0) y (3; 0). Los puntos de corte con OY verifican x = 0, pero&lt;br /&gt;
( %i3) f(0);&lt;br /&gt;
Division by 0&lt;br /&gt;
#0: f(x=0)&lt;br /&gt;
- an error. Quitting. To debug this try debugmode(true);&lt;br /&gt;
Evidentemente, el punto x = 0 no está en el dominio, pues el denominador se hace cero&lt;br /&gt;
(y Maxima nos da el error anterior).&lt;br /&gt;
Valores de f(n)&lt;br /&gt;
Podríamos calcular uno a uno los valores de f(n) pero es más rápido, como&lt;br /&gt;
vimos en el tema anterior, utilizar la función “map”, que es especialmente apropiada&lt;br /&gt;
para crear tablas de valores:&lt;br /&gt;
( %i4) lista:makelist(100*n,n,1,15);&lt;br /&gt;
( %o4)&lt;br /&gt;
[100; 200; 300; 400; 500; 600; 700; 800; 900; 1000; 1100; 1200; 1300; 1400; 1500]&lt;br /&gt;
( %i5) tabla:map(f,lista);&lt;br /&gt;
( %o5)&lt;br /&gt;
�&lt;br /&gt;
9991&lt;br /&gt;
100&lt;br /&gt;
;&lt;br /&gt;
39991&lt;br /&gt;
200&lt;br /&gt;
;&lt;br /&gt;
29997&lt;br /&gt;
100&lt;br /&gt;
;&lt;br /&gt;
159991&lt;br /&gt;
400&lt;br /&gt;
;&lt;br /&gt;
249991&lt;br /&gt;
500&lt;br /&gt;
;&lt;br /&gt;
119997&lt;br /&gt;
200&lt;br /&gt;
;&lt;br /&gt;
489991&lt;br /&gt;
700&lt;br /&gt;
;&lt;br /&gt;
639991&lt;br /&gt;
800&lt;br /&gt;
;&lt;br /&gt;
89999&lt;br /&gt;
100&lt;br /&gt;
;&lt;br /&gt;
999991&lt;br /&gt;
1000&lt;br /&gt;
;&lt;br /&gt;
1209991&lt;br /&gt;
1100&lt;br /&gt;
;&lt;br /&gt;
479997&lt;br /&gt;
400&lt;br /&gt;
;&lt;br /&gt;
16899130( %i6) %,numer;&lt;br /&gt;
( %o6)&lt;br /&gt;
[99;909999999999997; 199;95500000000001; 299;97000000000003; 399;97750000000002; 499;982000000000Parece que&lt;br /&gt;
l��m&lt;br /&gt;
x!+1&lt;br /&gt;
f(x) = +1;&lt;br /&gt;
pero es mejor confirmarlo con Maxima. Efectivamente:&lt;br /&gt;
119&lt;br /&gt;
( %i7) limit(f(x),x,inf);&lt;br /&gt;
( %o7)&lt;br /&gt;
1&lt;br /&gt;
Asíntotas&lt;br /&gt;
Como vemos a continuación, f(x) tiene una asíntota vertical en x = 0, de hecho&lt;br /&gt;
l��m&lt;br /&gt;
x!0+&lt;br /&gt;
f(x) = 􀀀1 l��m&lt;br /&gt;
x!0􀀀&lt;br /&gt;
f(x) = +1&lt;br /&gt;
( %i8) limit(f(x),x,0);&lt;br /&gt;
( %o8)&lt;br /&gt;
und&lt;br /&gt;
( %i9) limit(f(x),x,0,plus);&lt;br /&gt;
( %o9)&lt;br /&gt;
􀀀1&lt;br /&gt;
( %i10) limit(f(x),x,0,minus);&lt;br /&gt;
( %o10)&lt;br /&gt;
1&lt;br /&gt;
Por otra parte, f(x) no tiene asíntotas horizontales en +1(como vimos, el límite&lt;br /&gt;
es +1) y tampoco en 􀀀1, como vemos ahora:&lt;br /&gt;
( %i11) limit(f(x),x,minf);&lt;br /&gt;
( %o11)&lt;br /&gt;
􀀀1&lt;br /&gt;
Y, por otro lado, puesto que&lt;br /&gt;
( %i12) limit(f(x)/x,x,inf);&lt;br /&gt;
( %o12)&lt;br /&gt;
1&lt;br /&gt;
f(x) tiene una asíntota oblicua, de la forma y = 1 � x + a, donde a viene dado por el&lt;br /&gt;
siguiente límite:&lt;br /&gt;
120 Problema resuelto 1: estudio y representación de una función&lt;br /&gt;
( %i13) limit(f(x)-1*x,x,inf);&lt;br /&gt;
( %o13)&lt;br /&gt;
0&lt;br /&gt;
Por tanto, la asíntota oblicua es y = x.&lt;br /&gt;
Gráfica&lt;br /&gt;
Representaremos f(x) junto con su asíntota, y = x. A base de prueba y error, se&lt;br /&gt;
encontrarán los intervalos de x e y adecuados, en este caso se tomará x 2 [􀀀20; 20],&lt;br /&gt;
y 2 [􀀀20; 100]:&lt;br /&gt;
( %i14) plot2d([f(x),x],[x,-20,20],[y,-20,20],[gnuplot_preamble,&amp;quot;set&lt;br /&gt;
zeroaxis;&amp;quot;]);&lt;br /&gt;
( %o14)&lt;br /&gt;
Figura A.1: Gráfica de la función x2􀀀9&lt;br /&gt;
2 junto a su asíntota oblicua y = x&lt;br /&gt;
Derivada y recta tangente&lt;br /&gt;
A continuación, calculamos la derivada de f(x), definimos el punto a = 3 y&lt;br /&gt;
hallamos f0(a).&lt;br /&gt;
( %i15) diff(f(x),x);&lt;br /&gt;
( %o15)&lt;br /&gt;
2 􀀀&lt;br /&gt;
x2 􀀀 9&lt;br /&gt;
x2&lt;br /&gt;
121&lt;br /&gt;
( %i16) ratsimp(%);&lt;br /&gt;
( %o16)&lt;br /&gt;
x2 + 9&lt;br /&gt;
x2&lt;br /&gt;
( %i17) a:3;&lt;br /&gt;
( %o17)&lt;br /&gt;
3&lt;br /&gt;
( %i18) ”(diff(f(x),x)),x=a;&lt;br /&gt;
( %o18)&lt;br /&gt;
2&lt;br /&gt;
Obsérvese que (como se comentó en los apuntes de este tema) antes de sustituir el valor&lt;br /&gt;
x = a en la derivada, es necesario utilizar un doble operador comilla (”), que se obtiene&lt;br /&gt;
pulsando dos veces en la tecla ?. Este operador se puede interpretar como «el resultado&lt;br /&gt;
de evaluar la siguiente expresión» (en este caso, la derivada de f(x)). En general, la&lt;br /&gt;
última entrada se puede interpretar como «sustituir x = a en el resultado de calcular la&lt;br /&gt;
derivada de f(x)».&lt;br /&gt;
También podríamos haber utilizado este operador para definir una función, a la que&lt;br /&gt;
podríamos llamar Df(x), que representaría a la primera derivada de f(x). Esto lo haremos&lt;br /&gt;
más abajo, como ejemplo. Y como se puede ver aprovecharemos para simplificar la&lt;br /&gt;
derivada (con la función “ratsimp” antes de definir Df(x)). Así, la definición se puede&lt;br /&gt;
leer como «Df(x) se define como el resultado (doble comilla) de simplificar (ratsimp)&lt;br /&gt;
la derivada (diff ) de f(x)»&lt;br /&gt;
Una vez que conocemos la pendiente, m = f0(a) = 2, podemos escribir la recta&lt;br /&gt;
tangente como&lt;br /&gt;
y 􀀀 f(a) = m � (x 􀀀 a)&lt;br /&gt;
( %i19) Df(x):=”(ratsimp(diff(f(x),x)));&lt;br /&gt;
( %o19)&lt;br /&gt;
Df (x) :=&lt;br /&gt;
x2 + 9&lt;br /&gt;
x2&lt;br /&gt;
( %i20) m:Df(a);&lt;br /&gt;
( %o20)&lt;br /&gt;
2&lt;br /&gt;
( %i21) y-f(a)=m*(x-a);&lt;br /&gt;
( %o21)&lt;br /&gt;
y = 2 (x 􀀀 3)&lt;br /&gt;
122 Problema resuelto 1: estudio y representación de una función&lt;br /&gt;
( %i22) expand(%);&lt;br /&gt;
( %o22)&lt;br /&gt;
y = 2 x 􀀀 6&lt;br /&gt;
Y (utilizando el menú de wxMaxima, si así lo deseamos), podemos representar la&lt;br /&gt;
gráfica:&lt;br /&gt;
( %i23) plot2d([f(x),2*x-6],[x,-20,20],[y,-20,20],[gnuplot_preamble,&amp;quot;set&lt;br /&gt;
zeroaxis;&amp;quot;]);&lt;br /&gt;
( %o23)&lt;br /&gt;
El resultado se puede apreciar en la figura A.2&lt;br /&gt;
Figura A.2: Gráfica de la función x2􀀀9&lt;br /&gt;
2 junto su recta tengente en x = 3&lt;br /&gt;
Primitiva y área&lt;br /&gt;
Calcular una primitiva es fácil. Recurramos o no al sistema de menús de wxMaxima,&lt;br /&gt;
tendremos:&lt;br /&gt;
( %i24) integrate(f(x),x);&lt;br /&gt;
( %o24)&lt;br /&gt;
x2&lt;br /&gt;
2&lt;br /&gt;
􀀀 9 log x&lt;br /&gt;
Para el cálculo de áreas, observamos que f(x) &amp;gt; 0 en [3;+1), pues hemos visto que&lt;br /&gt;
f(3) = 0 y si x &amp;gt; 3 el numerador y el denominador de f(x) son estrictamente positivos&lt;br /&gt;
123&lt;br /&gt;
(en Maxima esto se puede comprobar con las órdenes “assume” e “is”, como vemos&lt;br /&gt;
más abajo). Por lo tanto, el área del recinto coincide con la siguiente integral definida:&lt;br /&gt;
Z 4&lt;br /&gt;
3&lt;br /&gt;
f(x)dx&lt;br /&gt;
( %i25) f(x);&lt;br /&gt;
( %o25)&lt;br /&gt;
x2 􀀀 9&lt;br /&gt;
x&lt;br /&gt;
( %i26) numerador:num(f(x));&lt;br /&gt;
( %o26)&lt;br /&gt;
x2 􀀀 9&lt;br /&gt;
( %i27) denominador:denom(f(x));&lt;br /&gt;
( %o27)&lt;br /&gt;
x&lt;br /&gt;
( %i28) assume(x&amp;gt;3);&lt;br /&gt;
( %o28)&lt;br /&gt;
[x &amp;gt; 3]&lt;br /&gt;
( %i29) is(numerador&amp;gt;0);&lt;br /&gt;
( %o29)&lt;br /&gt;
true&lt;br /&gt;
( %i30) is(denominador&amp;gt;0);&lt;br /&gt;
( %o30)&lt;br /&gt;
true&lt;br /&gt;
( %i31) forget(x&amp;gt;3);&lt;br /&gt;
( %o31)&lt;br /&gt;
[x &amp;gt; 3]&lt;br /&gt;
( %i32) integrate(f(x),x,3,4);&lt;br /&gt;
( %o32)&lt;br /&gt;
􀀀9 log 4 + 9 log 3 +&lt;br /&gt;
7&lt;br /&gt;
2&lt;br /&gt;
( %i33) %,numer;&lt;br /&gt;
124 Problema resuelto 1: estudio y representación de una función&lt;br /&gt;
( %o33)&lt;br /&gt;
0;910861347933972&lt;/div&gt;</summary>
		<author><name>Marjimcru</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n&amp;diff=941</id>
		<title>Estudio de una función</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Estudio_de_una_funci%C3%B3n&amp;diff=941"/>
		<updated>2011-04-19T11:57:19Z</updated>

		<summary type="html">&lt;p&gt;Marjimcru: Página creada con &amp;#039; &amp;#039;&amp;#039;&amp;#039;Enunciado: &amp;#039;&amp;#039;&amp;#039;  Sea f(x) = x2 􀀀 9 x Halla los puntos de corte de f(x) con los ejes de coordenadas Presenta una lista con los valores de f(n); n = 100; 200; 300; : : : 150…&amp;#039;&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt; &amp;#039;&amp;#039;&amp;#039;Enunciado: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
Sea&lt;br /&gt;
f(x) =&lt;br /&gt;
x2 􀀀 9&lt;br /&gt;
x&lt;br /&gt;
Halla los puntos de corte de f(x) con los ejes de coordenadas&lt;br /&gt;
Presenta una lista con los valores de f(n); n = 100; 200; 300; : : : 1500. ¿Cuál piensas&lt;br /&gt;
que es el límite de f(x) en +1? Confírmalo con wxMaxima.&lt;br /&gt;
Estudia las asíntotas verticales, horizontales y oblicuas de f(x).&lt;br /&gt;
Representa de forma conjunta la gráfica de f(x) y de la recta y = x.&lt;br /&gt;
Halla la función derivada de f(x) y la recta tangente a f(x) en el punto a = 3.&lt;br /&gt;
Representar de forma conjunta a la gráfica de f(x) y la de esta recta tangente.&lt;br /&gt;
Calcula una primitiva de f(x).&lt;br /&gt;
Sea A el área limitada por la gráfica de f(x) y el eje OX entre x = 3 y x = 4. ¿Es A&lt;br /&gt;
mayor que uno?&lt;br /&gt;
Puntos de corte&lt;br /&gt;
Comenzamos definiendo f(x):&lt;br /&gt;
( %i1) f(x):=(x^2-9)/x;&lt;br /&gt;
( %o1)&lt;br /&gt;
f (x) :=&lt;br /&gt;
x2 􀀀 9&lt;br /&gt;
x&lt;br /&gt;
118 Problema resuelto 1: estudio y representación de una función&lt;br /&gt;
Sus puntos de corte con OX verifican f(x) = 0:&lt;br /&gt;
( %i2) solve(f(x)=0,x);&lt;br /&gt;
( %o2)&lt;br /&gt;
[x = 􀀀3; x = 3]&lt;br /&gt;
así que tenemos (􀀀3; 0) y (3; 0). Los puntos de corte con OY verifican x = 0, pero&lt;br /&gt;
( %i3) f(0);&lt;br /&gt;
Division by 0&lt;br /&gt;
#0: f(x=0)&lt;br /&gt;
- an error. Quitting. To debug this try debugmode(true);&lt;br /&gt;
Evidentemente, el punto x = 0 no está en el dominio, pues el denominador se hace cero&lt;br /&gt;
(y Maxima nos da el error anterior).&lt;br /&gt;
Valores de f(n)&lt;br /&gt;
Podríamos calcular uno a uno los valores de f(n) pero es más rápido, como&lt;br /&gt;
vimos en el tema anterior, utilizar la función “map”, que es especialmente apropiada&lt;br /&gt;
para crear tablas de valores:&lt;br /&gt;
( %i4) lista:makelist(100*n,n,1,15);&lt;br /&gt;
( %o4)&lt;br /&gt;
[100; 200; 300; 400; 500; 600; 700; 800; 900; 1000; 1100; 1200; 1300; 1400; 1500]&lt;br /&gt;
( %i5) tabla:map(f,lista);&lt;br /&gt;
( %o5)&lt;br /&gt;
�&lt;br /&gt;
9991&lt;br /&gt;
100&lt;br /&gt;
;&lt;br /&gt;
39991&lt;br /&gt;
200&lt;br /&gt;
;&lt;br /&gt;
29997&lt;br /&gt;
100&lt;br /&gt;
;&lt;br /&gt;
159991&lt;br /&gt;
400&lt;br /&gt;
;&lt;br /&gt;
249991&lt;br /&gt;
500&lt;br /&gt;
;&lt;br /&gt;
119997&lt;br /&gt;
200&lt;br /&gt;
;&lt;br /&gt;
489991&lt;br /&gt;
700&lt;br /&gt;
;&lt;br /&gt;
639991&lt;br /&gt;
800&lt;br /&gt;
;&lt;br /&gt;
89999&lt;br /&gt;
100&lt;br /&gt;
;&lt;br /&gt;
999991&lt;br /&gt;
1000&lt;br /&gt;
;&lt;br /&gt;
1209991&lt;br /&gt;
1100&lt;br /&gt;
;&lt;br /&gt;
479997&lt;br /&gt;
400&lt;br /&gt;
;&lt;br /&gt;
16899130( %i6) %,numer;&lt;br /&gt;
( %o6)&lt;br /&gt;
[99;909999999999997; 199;95500000000001; 299;97000000000003; 399;97750000000002; 499;982000000000Parece que&lt;br /&gt;
l��m&lt;br /&gt;
x!+1&lt;br /&gt;
f(x) = +1;&lt;br /&gt;
pero es mejor confirmarlo con Maxima. Efectivamente:&lt;br /&gt;
119&lt;br /&gt;
( %i7) limit(f(x),x,inf);&lt;br /&gt;
( %o7)&lt;br /&gt;
1&lt;br /&gt;
Asíntotas&lt;br /&gt;
Como vemos a continuación, f(x) tiene una asíntota vertical en x = 0, de hecho&lt;br /&gt;
l��m&lt;br /&gt;
x!0+&lt;br /&gt;
f(x) = 􀀀1 l��m&lt;br /&gt;
x!0􀀀&lt;br /&gt;
f(x) = +1&lt;br /&gt;
( %i8) limit(f(x),x,0);&lt;br /&gt;
( %o8)&lt;br /&gt;
und&lt;br /&gt;
( %i9) limit(f(x),x,0,plus);&lt;br /&gt;
( %o9)&lt;br /&gt;
􀀀1&lt;br /&gt;
( %i10) limit(f(x),x,0,minus);&lt;br /&gt;
( %o10)&lt;br /&gt;
1&lt;br /&gt;
Por otra parte, f(x) no tiene asíntotas horizontales en +1(como vimos, el límite&lt;br /&gt;
es +1) y tampoco en 􀀀1, como vemos ahora:&lt;br /&gt;
( %i11) limit(f(x),x,minf);&lt;br /&gt;
( %o11)&lt;br /&gt;
􀀀1&lt;br /&gt;
Y, por otro lado, puesto que&lt;br /&gt;
( %i12) limit(f(x)/x,x,inf);&lt;br /&gt;
( %o12)&lt;br /&gt;
1&lt;br /&gt;
f(x) tiene una asíntota oblicua, de la forma y = 1 � x + a, donde a viene dado por el&lt;br /&gt;
siguiente límite:&lt;br /&gt;
120 Problema resuelto 1: estudio y representación de una función&lt;br /&gt;
( %i13) limit(f(x)-1*x,x,inf);&lt;br /&gt;
( %o13)&lt;br /&gt;
0&lt;br /&gt;
Por tanto, la asíntota oblicua es y = x.&lt;br /&gt;
Gráfica&lt;br /&gt;
Representaremos f(x) junto con su asíntota, y = x. A base de prueba y error, se&lt;br /&gt;
encontrarán los intervalos de x e y adecuados, en este caso se tomará x 2 [􀀀20; 20],&lt;br /&gt;
y 2 [􀀀20; 100]:&lt;br /&gt;
( %i14) plot2d([f(x),x],[x,-20,20],[y,-20,20],[gnuplot_preamble,&amp;quot;set&lt;br /&gt;
zeroaxis;&amp;quot;]);&lt;br /&gt;
( %o14)&lt;br /&gt;
Figura A.1: Gráfica de la función x2􀀀9&lt;br /&gt;
2 junto a su asíntota oblicua y = x&lt;br /&gt;
Derivada y recta tangente&lt;br /&gt;
A continuación, calculamos la derivada de f(x), definimos el punto a = 3 y&lt;br /&gt;
hallamos f0(a).&lt;br /&gt;
( %i15) diff(f(x),x);&lt;br /&gt;
( %o15)&lt;br /&gt;
2 􀀀&lt;br /&gt;
x2 􀀀 9&lt;br /&gt;
x2&lt;br /&gt;
121&lt;br /&gt;
( %i16) ratsimp(%);&lt;br /&gt;
( %o16)&lt;br /&gt;
x2 + 9&lt;br /&gt;
x2&lt;br /&gt;
( %i17) a:3;&lt;br /&gt;
( %o17)&lt;br /&gt;
3&lt;br /&gt;
( %i18) ”(diff(f(x),x)),x=a;&lt;br /&gt;
( %o18)&lt;br /&gt;
2&lt;br /&gt;
Obsérvese que (como se comentó en los apuntes de este tema) antes de sustituir el valor&lt;br /&gt;
x = a en la derivada, es necesario utilizar un doble operador comilla (”), que se obtiene&lt;br /&gt;
pulsando dos veces en la tecla ?. Este operador se puede interpretar como «el resultado&lt;br /&gt;
de evaluar la siguiente expresión» (en este caso, la derivada de f(x)). En general, la&lt;br /&gt;
última entrada se puede interpretar como «sustituir x = a en el resultado de calcular la&lt;br /&gt;
derivada de f(x)».&lt;br /&gt;
También podríamos haber utilizado este operador para definir una función, a la que&lt;br /&gt;
podríamos llamar Df(x), que representaría a la primera derivada de f(x). Esto lo haremos&lt;br /&gt;
más abajo, como ejemplo. Y como se puede ver aprovecharemos para simplificar la&lt;br /&gt;
derivada (con la función “ratsimp” antes de definir Df(x)). Así, la definición se puede&lt;br /&gt;
leer como «Df(x) se define como el resultado (doble comilla) de simplificar (ratsimp)&lt;br /&gt;
la derivada (diff ) de f(x)»&lt;br /&gt;
Una vez que conocemos la pendiente, m = f0(a) = 2, podemos escribir la recta&lt;br /&gt;
tangente como&lt;br /&gt;
y 􀀀 f(a) = m � (x 􀀀 a)&lt;br /&gt;
( %i19) Df(x):=”(ratsimp(diff(f(x),x)));&lt;br /&gt;
( %o19)&lt;br /&gt;
Df (x) :=&lt;br /&gt;
x2 + 9&lt;br /&gt;
x2&lt;br /&gt;
( %i20) m:Df(a);&lt;br /&gt;
( %o20)&lt;br /&gt;
2&lt;br /&gt;
( %i21) y-f(a)=m*(x-a);&lt;br /&gt;
( %o21)&lt;br /&gt;
y = 2 (x 􀀀 3)&lt;br /&gt;
122 Problema resuelto 1: estudio y representación de una función&lt;br /&gt;
( %i22) expand(%);&lt;br /&gt;
( %o22)&lt;br /&gt;
y = 2 x 􀀀 6&lt;br /&gt;
Y (utilizando el menú de wxMaxima, si así lo deseamos), podemos representar la&lt;br /&gt;
gráfica:&lt;br /&gt;
( %i23) plot2d([f(x),2*x-6],[x,-20,20],[y,-20,20],[gnuplot_preamble,&amp;quot;set&lt;br /&gt;
zeroaxis;&amp;quot;]);&lt;br /&gt;
( %o23)&lt;br /&gt;
El resultado se puede apreciar en la figura A.2&lt;br /&gt;
Figura A.2: Gráfica de la función x2􀀀9&lt;br /&gt;
2 junto su recta tengente en x = 3&lt;br /&gt;
Primitiva y área&lt;br /&gt;
Calcular una primitiva es fácil. Recurramos o no al sistema de menús de wxMaxima,&lt;br /&gt;
tendremos:&lt;br /&gt;
( %i24) integrate(f(x),x);&lt;br /&gt;
( %o24)&lt;br /&gt;
x2&lt;br /&gt;
2&lt;br /&gt;
􀀀 9 log x&lt;br /&gt;
Para el cálculo de áreas, observamos que f(x) &amp;gt; 0 en [3;+1), pues hemos visto que&lt;br /&gt;
f(3) = 0 y si x &amp;gt; 3 el numerador y el denominador de f(x) son estrictamente positivos&lt;br /&gt;
123&lt;br /&gt;
(en Maxima esto se puede comprobar con las órdenes “assume” e “is”, como vemos&lt;br /&gt;
más abajo). Por lo tanto, el área del recinto coincide con la siguiente integral definida:&lt;br /&gt;
Z 4&lt;br /&gt;
3&lt;br /&gt;
f(x)dx&lt;br /&gt;
( %i25) f(x);&lt;br /&gt;
( %o25)&lt;br /&gt;
x2 􀀀 9&lt;br /&gt;
x&lt;br /&gt;
( %i26) numerador:num(f(x));&lt;br /&gt;
( %o26)&lt;br /&gt;
x2 􀀀 9&lt;br /&gt;
( %i27) denominador:denom(f(x));&lt;br /&gt;
( %o27)&lt;br /&gt;
x&lt;br /&gt;
( %i28) assume(x&amp;gt;3);&lt;br /&gt;
( %o28)&lt;br /&gt;
[x &amp;gt; 3]&lt;br /&gt;
( %i29) is(numerador&amp;gt;0);&lt;br /&gt;
( %o29)&lt;br /&gt;
true&lt;br /&gt;
( %i30) is(denominador&amp;gt;0);&lt;br /&gt;
( %o30)&lt;br /&gt;
true&lt;br /&gt;
( %i31) forget(x&amp;gt;3);&lt;br /&gt;
( %o31)&lt;br /&gt;
[x &amp;gt; 3]&lt;br /&gt;
( %i32) integrate(f(x),x,3,4);&lt;br /&gt;
( %o32)&lt;br /&gt;
􀀀9 log 4 + 9 log 3 +&lt;br /&gt;
7&lt;br /&gt;
2&lt;br /&gt;
( %i33) %,numer;&lt;br /&gt;
124 Problema resuelto 1: estudio y representación de una función&lt;br /&gt;
( %o33)&lt;br /&gt;
0;910861347933972&lt;/div&gt;</summary>
		<author><name>Marjimcru</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_libres&amp;diff=938</id>
		<title>Ejercicios libres</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_libres&amp;diff=938"/>
		<updated>2011-04-19T11:32:59Z</updated>

		<summary type="html">&lt;p&gt;Marjimcru: &lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;En esta sección se encuentran ejercicios libremente enunciado por los alumnos y resueltos con los sistemas de software libre.&lt;br /&gt;
&lt;br /&gt;
== Ejercicios ==&lt;br /&gt;
* [[El factorial de 100]].&lt;br /&gt;
* [[Resolver la ecuación 3x^2-17x+10=0]].&lt;br /&gt;
* [[Resolver ecuaciones de segundo grado]].&lt;br /&gt;
* [[Definir y dibujar una función]].&lt;br /&gt;
* [[Obtener, mediante la regla de Simpson, el área de la función sqrt(1+x^2) entre 0 y 1 con un error menor a 0.001]].&lt;br /&gt;
* [[Definir una matriz, calcular su determinante, calcular para que valores de a la matriz es invertible y calcular su matriz inversa]].&lt;br /&gt;
* [[Calcular la distancia entre el punto P y la recta r]].&lt;br /&gt;
* [[Calcular la distancia entre las rectas r y s]].&lt;br /&gt;
* [[Calcular el ángulo entre los vectores v y w]].&lt;br /&gt;
* [[Problema 12 del proyecto Euler]].&lt;br /&gt;
* [[Problema 20 del proyecto Euler]].&lt;br /&gt;
* [[Estudio de una función]].&lt;/div&gt;</summary>
		<author><name>Marjimcru</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Problema_20_del_proyecto_Euler&amp;diff=937</id>
		<title>Problema 20 del proyecto Euler</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Problema_20_del_proyecto_Euler&amp;diff=937"/>
		<updated>2011-04-19T11:20:40Z</updated>

		<summary type="html">&lt;p&gt;Marjimcru: Página creada con &amp;#039; &amp;#039;&amp;#039;&amp;#039;Enunciado: &amp;#039;&amp;#039;&amp;#039; n ! significa n ( n 1) ... 3 2 1  Por ejemplo, 10! = 109 ... 3 2 1 = 3.628.800, y la suma de los dígitos en el número 10! es de 3 + 6 + 2 + 8 + 8 + 0 + 0 = …&amp;#039;&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt; &amp;#039;&amp;#039;&amp;#039;Enunciado: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
n ! significa n ( n 1) ... 3 2 1&lt;br /&gt;
&lt;br /&gt;
Por ejemplo, 10! = 109 ... 3 2 1 = 3.628.800,&lt;br /&gt;
y la suma de los dígitos en el número 10! es de 3 + 6 + 2 + 8 + 8 + 0 + 0 = 27.&lt;br /&gt;
&lt;br /&gt;
Encuentra la suma de los dígitos en el número 100!&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
 &amp;#039;&amp;#039;&amp;#039;Solución: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%i1) set_display(ascii);&lt;br /&gt;
 (%i2) suma(n):=block([aux,sol],&lt;br /&gt;
          aux : n!,&lt;br /&gt;
          sol : 0,&lt;br /&gt;
          while aux&amp;gt;=10 do&lt;br /&gt;
            (sol : sol + mod(sol,10),&lt;br /&gt;
             aux : gcd(aux,10)),&lt;br /&gt;
       print(sol))$&lt;br /&gt;
       suma(100);&lt;/div&gt;</summary>
		<author><name>Marjimcru</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_libres&amp;diff=936</id>
		<title>Ejercicios libres</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_libres&amp;diff=936"/>
		<updated>2011-04-19T11:19:00Z</updated>

		<summary type="html">&lt;p&gt;Marjimcru: /* Ejercicios */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;En esta sección se encuentran ejercicios libremente enunciado por los alumnos y resueltos con los sistemas de software libre.&lt;br /&gt;
&lt;br /&gt;
== Ejercicios ==&lt;br /&gt;
* [[El factorial de 100]].&lt;br /&gt;
* [[Resolver la ecuación 3x^2-17x+10=0]].&lt;br /&gt;
* [[Resolver ecuaciones de segundo grado]].&lt;br /&gt;
* [[Definir y dibujar una función]].&lt;br /&gt;
* [[Obtener, mediante la regla de Simpson, el área de la función sqrt(1+x^2) entre 0 y 1 con un error menor a 0.001]].&lt;br /&gt;
* [[Definir una matriz, calcular su determinante, calcular para que valores de a la matriz es invertible y calcular su matriz inversa]].&lt;br /&gt;
* [[Calcular la distancia entre el punto P y la recta r]].&lt;br /&gt;
* [[Calcular la distancia entre las rectas r y s]].&lt;br /&gt;
* [[Calcular el ángulo entre los vectores v y w]].&lt;br /&gt;
* [[Problema 12 del proyecto Euler]].&lt;br /&gt;
* [[Problema 20 del proyecto Euler]].&lt;/div&gt;</summary>
		<author><name>Marjimcru</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Problema_12_del_proyecto_Euler&amp;diff=935</id>
		<title>Problema 12 del proyecto Euler</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Problema_12_del_proyecto_Euler&amp;diff=935"/>
		<updated>2011-04-19T11:15:04Z</updated>

		<summary type="html">&lt;p&gt;Marjimcru: Página creada con &amp;#039;&amp;#039;&amp;#039;&amp;#039;Enunciado: &amp;#039;&amp;#039;&amp;#039; La secuencia de los números del triángulo se genera mediante la adición de los números naturales. Así que el 7 º número triángulo sería de 1 + 2 + 3 +…&amp;#039;&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;&amp;#039;&amp;#039;&amp;#039;Enunciado: &amp;#039;&amp;#039;&amp;#039; La secuencia de los números del triángulo se genera mediante la adición de los números naturales. Así que el 7 º número triángulo sería de 1 + 2 + 3 + 4 + 5 + 6 + 7 = 28. Los diez primeros términos sería:&lt;br /&gt;
&lt;br /&gt;
1, 3, 6, 10, 15, 21, 28, 36, 45, 55, ...&lt;br /&gt;
&lt;br /&gt;
Vamos a enumerar los factores de los números triángulo siete primeros:&lt;br /&gt;
&lt;br /&gt;
 1 : 1&lt;br /&gt;
 3 : 1,3&lt;br /&gt;
 6 : 1,2,3,6&lt;br /&gt;
10 : 1,2,5,10&lt;br /&gt;
15 : 1,3,5,15&lt;br /&gt;
21 : 1,3,7,21&lt;br /&gt;
28 : 1,2,4,7,14,28&lt;br /&gt;
Podemos ver que el 28 es el número primer triángulo de tener más de cinco divisores.&lt;br /&gt;
&lt;br /&gt;
¿Cuál es el valor del número de primer triángulo de tener más de quinientos divisores?&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución: &amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%i1) sumandos(n):=block([ac,suma],&lt;br /&gt;
            ac : 2,&lt;br /&gt;
          suma : 1,&lt;br /&gt;
          while length(divisors(suma))&amp;lt;=n do&lt;br /&gt;
            (suma : suma + ac,&lt;br /&gt;
              ac: ac + 1),&lt;br /&gt;
         print(suma))$&lt;br /&gt;
&lt;br /&gt;
       sumandos(500);&lt;/div&gt;</summary>
		<author><name>Marjimcru</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_libres&amp;diff=933</id>
		<title>Ejercicios libres</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_libres&amp;diff=933"/>
		<updated>2011-04-19T11:06:14Z</updated>

		<summary type="html">&lt;p&gt;Marjimcru: /* Ejercicios */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;En esta sección se encuentran ejercicios libremente enunciado por los alumnos y resueltos con los sistemas de software libre.&lt;br /&gt;
&lt;br /&gt;
== Ejercicios ==&lt;br /&gt;
* [[El factorial de 100]].&lt;br /&gt;
* [[Resolver la ecuación 3x^2-17x+10=0]].&lt;br /&gt;
* [[Resolver ecuaciones de segundo grado]].&lt;br /&gt;
* [[Definir y dibujar una función]].&lt;br /&gt;
* [[Obtener, mediante la regla de Simpson, el área de la función sqrt(1+x^2) entre 0 y 1 con un error menor a 0.001]].&lt;br /&gt;
* [[Definir una matriz, calcular su determinante, calcular para que valores de a la matriz es invertible y calcular su matriz inversa]].&lt;br /&gt;
* [[Calcular la distancia entre el punto P y la recta r]].&lt;br /&gt;
* [[Calcular la distancia entre las rectas r y s]].&lt;br /&gt;
* [[Calcular el ángulo entre los vectores v y w]].&lt;br /&gt;
* [[Problema 12 del proyecto Euler]].&lt;/div&gt;</summary>
		<author><name>Marjimcru</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=678</id>
		<title>Ejercicios de introducción a Maxima</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=678"/>
		<updated>2011-04-01T21:24:51Z</updated>

		<summary type="html">&lt;p&gt;Marjimcru: /* Ejercicio 7 */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;__NOTOC__&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Funciones y variables a utilizar:&amp;#039;&amp;#039;&amp;#039; &amp;#039;&amp;#039;float&amp;#039;&amp;#039;, &amp;#039;&amp;#039;is&amp;#039;&amp;#039;, &amp;#039;&amp;#039;expand&amp;#039;&amp;#039;, &amp;#039;&amp;#039;fpprec&amp;#039;&amp;#039;, &amp;#039;&amp;#039;bfloat&amp;#039;&amp;#039;, &amp;#039;&amp;#039;solve&amp;#039;&amp;#039;, &amp;#039;&amp;#039;factor&amp;#039;&amp;#039;, &amp;#039;&amp;#039;rectform&amp;#039;&amp;#039;, &amp;#039;&amp;#039;abs&amp;#039;&amp;#039;, &amp;#039;&amp;#039;carg&amp;#039;&amp;#039;, &amp;#039;&amp;#039;plot2D&amp;#039;&amp;#039; y &amp;#039;&amp;#039;find_root&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 1 ==&lt;br /&gt;
=== Ejercicio 1.1 ===&lt;br /&gt;
Definir la constante &amp;lt;math&amp;gt;a = (20+14\sqrt{2})^{1/3} + (20-14\sqrt{2})^{1/3}&amp;lt;/math&amp;gt;.&lt;br /&gt;
----&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%1) a : (20+14*sqrt(2))^(1/3) + (20-14*sqrt(2))^(1/3)$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.2 ===&lt;br /&gt;
Calcular el valor numérico de a. ¿A qué entero se aproxima?&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%i1) float(a);&lt;br /&gt;
 (%o1) 3.999999999999996&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 2 ==&lt;br /&gt;
Ejercicio 2. Escribir el número &amp;lt;math&amp;gt;\left(sin\frac{\pi}{3}+cos\frac{\pi}{3}\right)^9&amp;lt;/math&amp;gt; en la forma &amp;lt;math&amp;gt;a + b \ast c^d&amp;lt;/math&amp;gt;, donde &amp;lt;math&amp;gt;a, b, c&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;d&amp;lt;/math&amp;gt; son números racionales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;Nota&amp;#039;&amp;#039;: Cambiar el valor de la variable &amp;#039;&amp;#039;%piargs&amp;#039;&amp;#039; a &amp;#039;&amp;#039;true&amp;#039;&amp;#039; y usar &amp;#039;&amp;#039;radcan&amp;#039;&amp;#039; para la simplificación de radicales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 3 ==&lt;br /&gt;
Calcular la cifra 149 del número &amp;lt;math&amp;gt;\pi&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
(%i1) fpprec : 149;&lt;br /&gt;
(%o1) 149&lt;br /&gt;
(%i2) bfloat(1000*%pi);&lt;br /&gt;
(%02) 3.1415926535897932384626433832[92 digits]0938446095505822317253594081b3&lt;br /&gt;
&lt;br /&gt;
Cifra 149: 1&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 4 ==&lt;br /&gt;
Se considera el polinomio &amp;lt;math&amp;gt;p = x^4-x^3-7x^2-8x-6&amp;lt;/math&amp;gt;.&lt;br /&gt;
 (%i1) p:x^4-x^3-7*x^2-8*x-6$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.1. ===&lt;br /&gt;
Calcular las raices reales de &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;x=1-\sqrt(7), x=1+\sqrt(7)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comentario de J.A. Alonso: En la solución hay que escribir la sesión con Maxima.&lt;br /&gt;
&lt;br /&gt;
Ok, éste es el proceso y de todas las soluciones posibles tomo las reales.&lt;br /&gt;
&lt;br /&gt;
(%o1) p:x^4-x^3-7*x^2-8*x-6$&lt;br /&gt;
solve(p);&lt;br /&gt;
&lt;br /&gt;
(%o2) [x=1-sqrt(7),x=sqrt(7)+1,x=-(sqrt(3)*%i+1)/2,x=(sqrt(3)*%i-1)/2]&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;x=1-\sqrt(7),x=1+\sqrt(7),x=-(\sqrt(3)i+1)/2,x=(\sqrt(3)i-1)/2&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.2 ===&lt;br /&gt;
Factorizar al máximo el polinomio &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&amp;lt;math&amp;gt;(x^2-2x-6)(x^2+x+1)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comentario de J.A. Alonso: En la solución hay que escribir la sesión con Maxima.&lt;br /&gt;
&lt;br /&gt;
Ok, en Maxima sería:&lt;br /&gt;
&lt;br /&gt;
(%o3) factor(p);&lt;br /&gt;
(x^2-2*x-6)*(x^2+x+1)&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(x^2-2x-6)(x^2+x+1)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 5 ==&lt;br /&gt;
Sea &amp;lt;math&amp;gt;z=\left(\frac{1-i\sqrt 3}{1+i}\right)^{20}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
 (%i1) z: ((1-%i*sqrt(3))/(1+%i))^20$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.1 === &lt;br /&gt;
Calcular la parte real y la parte imaginaria de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
La parte real sería:&lt;br /&gt;
(%i1) realpart(z);&lt;br /&gt;
&lt;br /&gt;
La parte imaginaria sería:&lt;br /&gt;
(%i2) imagpart(z);&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.2 === &lt;br /&gt;
Calcular el módulo y el argumento de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
El módulo sería:&lt;br /&gt;
(%i1) abs(Z);&lt;br /&gt;
&lt;br /&gt;
El argumento sería:&lt;br /&gt;
(%i2) carg(z);&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 6 ==&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.1 === &lt;br /&gt;
Con la ayuda de la representación gráfica, conjeturar el número de soluciones de la ecuación&lt;br /&gt;
:&amp;lt;math&amp;gt;\sin x=1-x^4&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
La representación sería : &lt;br /&gt;
(%i1) plot2d([sin(x)-1+x^4],[x,-100,100],[y,-10,10]);&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.2 === &lt;br /&gt;
Dar una aproximación de cada solución.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
(%i1) solve(sin(x)-1+x^4=0);&lt;br /&gt;
&lt;br /&gt;
Las soluciones obtenidas son:&lt;br /&gt;
[x=%i*(1-sin(x))^(1/4),x=-(1-sin(x))^(1/4),x=-%i*(1-sin(x))^(1/4),x=(1-sin(x))^(1/4)]&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 7 ==&lt;br /&gt;
Resolver el siguiente sistema lineal en función de los parámetros &lt;br /&gt;
&amp;lt;math&amp;gt;a, b&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;c&amp;lt;/math&amp;gt;:&lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\left\{&lt;br /&gt;
\begin{array}{l}&lt;br /&gt;
x+ay+a^2 z=0 \\&lt;br /&gt;
x+by+b^2 z=0 \\&lt;br /&gt;
x+cy+c^2z=1&lt;br /&gt;
\end{array}&lt;br /&gt;
\right.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
Esto se resuelve de la siguiente manera:&lt;br /&gt;
(%i1) a1:x+a*y+a^2*z=0;&lt;br /&gt;
(%i2) a2:x+b*y+b^2*z=0;&lt;br /&gt;
(%i3) a3:x+c*y+c^2*z=1;&lt;br /&gt;
(%i4) linsolve([a1,a2,a3], [x,y,z]);&lt;br /&gt;
&lt;br /&gt;
Y obtenemos las soluciones siguientes:&lt;br /&gt;
(%i5)  a^2*z+a*y+x=0&lt;br /&gt;
(%i6) b^2*z+b*y+x=0&lt;br /&gt;
(%i7) c^2*z+c*y+x=1&lt;br /&gt;
(%i8) [x=(a*b)/(c^2-b*c+a*(b-c)),y=-(b+a)/(c^2-b*c+a*(b-c)),z=1/(c^2-b*c+a*(b-c))]&lt;/div&gt;</summary>
		<author><name>Marjimcru</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=677</id>
		<title>Ejercicios de introducción a Maxima</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=677"/>
		<updated>2011-04-01T20:52:50Z</updated>

		<summary type="html">&lt;p&gt;Marjimcru: /* Ejercicio 6.2 */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;__NOTOC__&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Funciones y variables a utilizar:&amp;#039;&amp;#039;&amp;#039; &amp;#039;&amp;#039;float&amp;#039;&amp;#039;, &amp;#039;&amp;#039;is&amp;#039;&amp;#039;, &amp;#039;&amp;#039;expand&amp;#039;&amp;#039;, &amp;#039;&amp;#039;fpprec&amp;#039;&amp;#039;, &amp;#039;&amp;#039;bfloat&amp;#039;&amp;#039;, &amp;#039;&amp;#039;solve&amp;#039;&amp;#039;, &amp;#039;&amp;#039;factor&amp;#039;&amp;#039;, &amp;#039;&amp;#039;rectform&amp;#039;&amp;#039;, &amp;#039;&amp;#039;abs&amp;#039;&amp;#039;, &amp;#039;&amp;#039;carg&amp;#039;&amp;#039;, &amp;#039;&amp;#039;plot2D&amp;#039;&amp;#039; y &amp;#039;&amp;#039;find_root&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 1 ==&lt;br /&gt;
=== Ejercicio 1.1 ===&lt;br /&gt;
Definir la constante &amp;lt;math&amp;gt;a = (20+14\sqrt{2})^{1/3} + (20-14\sqrt{2})^{1/3}&amp;lt;/math&amp;gt;.&lt;br /&gt;
----&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%1) a : (20+14*sqrt(2))^(1/3) + (20-14*sqrt(2))^(1/3)$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.2 ===&lt;br /&gt;
Calcular el valor numérico de a. ¿A qué entero se aproxima?&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%i1) float(a);&lt;br /&gt;
 (%o1) 3.999999999999996&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 2 ==&lt;br /&gt;
Ejercicio 2. Escribir el número &amp;lt;math&amp;gt;\left(sin\frac{\pi}{3}+cos\frac{\pi}{3}\right)^9&amp;lt;/math&amp;gt; en la forma &amp;lt;math&amp;gt;a + b \ast c^d&amp;lt;/math&amp;gt;, donde &amp;lt;math&amp;gt;a, b, c&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;d&amp;lt;/math&amp;gt; son números racionales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;Nota&amp;#039;&amp;#039;: Cambiar el valor de la variable &amp;#039;&amp;#039;%piargs&amp;#039;&amp;#039; a &amp;#039;&amp;#039;true&amp;#039;&amp;#039; y usar &amp;#039;&amp;#039;radcan&amp;#039;&amp;#039; para la simplificación de radicales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 3 ==&lt;br /&gt;
Calcular la cifra 149 del número &amp;lt;math&amp;gt;\pi&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
(%i1) fpprec : 149;&lt;br /&gt;
(%o1) 149&lt;br /&gt;
(%i2) bfloat(1000*%pi);&lt;br /&gt;
(%02) 3.1415926535897932384626433832[92 digits]0938446095505822317253594081b3&lt;br /&gt;
&lt;br /&gt;
Cifra 149: 1&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 4 ==&lt;br /&gt;
Se considera el polinomio &amp;lt;math&amp;gt;p = x^4-x^3-7x^2-8x-6&amp;lt;/math&amp;gt;.&lt;br /&gt;
 (%i1) p:x^4-x^3-7*x^2-8*x-6$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.1. ===&lt;br /&gt;
Calcular las raices reales de &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;x=1-\sqrt(7), x=1+\sqrt(7)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comentario de J.A. Alonso: En la solución hay que escribir la sesión con Maxima.&lt;br /&gt;
&lt;br /&gt;
Ok, éste es el proceso y de todas las soluciones posibles tomo las reales.&lt;br /&gt;
&lt;br /&gt;
(%o1) p:x^4-x^3-7*x^2-8*x-6$&lt;br /&gt;
solve(p);&lt;br /&gt;
&lt;br /&gt;
(%o2) [x=1-sqrt(7),x=sqrt(7)+1,x=-(sqrt(3)*%i+1)/2,x=(sqrt(3)*%i-1)/2]&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;x=1-\sqrt(7),x=1+\sqrt(7),x=-(\sqrt(3)i+1)/2,x=(\sqrt(3)i-1)/2&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.2 ===&lt;br /&gt;
Factorizar al máximo el polinomio &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&amp;lt;math&amp;gt;(x^2-2x-6)(x^2+x+1)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comentario de J.A. Alonso: En la solución hay que escribir la sesión con Maxima.&lt;br /&gt;
&lt;br /&gt;
Ok, en Maxima sería:&lt;br /&gt;
&lt;br /&gt;
(%o3) factor(p);&lt;br /&gt;
(x^2-2*x-6)*(x^2+x+1)&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(x^2-2x-6)(x^2+x+1)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 5 ==&lt;br /&gt;
Sea &amp;lt;math&amp;gt;z=\left(\frac{1-i\sqrt 3}{1+i}\right)^{20}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
 (%i1) z: ((1-%i*sqrt(3))/(1+%i))^20$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.1 === &lt;br /&gt;
Calcular la parte real y la parte imaginaria de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
La parte real sería:&lt;br /&gt;
(%i1) realpart(z);&lt;br /&gt;
&lt;br /&gt;
La parte imaginaria sería:&lt;br /&gt;
(%i2) imagpart(z);&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.2 === &lt;br /&gt;
Calcular el módulo y el argumento de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
El módulo sería:&lt;br /&gt;
(%i1) abs(Z);&lt;br /&gt;
&lt;br /&gt;
El argumento sería:&lt;br /&gt;
(%i2) carg(z);&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 6 ==&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.1 === &lt;br /&gt;
Con la ayuda de la representación gráfica, conjeturar el número de soluciones de la ecuación&lt;br /&gt;
:&amp;lt;math&amp;gt;\sin x=1-x^4&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
La representación sería : &lt;br /&gt;
(%i1) plot2d([sin(x)-1+x^4],[x,-100,100],[y,-10,10]);&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.2 === &lt;br /&gt;
Dar una aproximación de cada solución.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
(%i1) solve(sin(x)-1+x^4=0);&lt;br /&gt;
&lt;br /&gt;
Las soluciones obtenidas son:&lt;br /&gt;
[x=%i*(1-sin(x))^(1/4),x=-(1-sin(x))^(1/4),x=-%i*(1-sin(x))^(1/4),x=(1-sin(x))^(1/4)]&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 7 ==&lt;br /&gt;
Resolver el siguiente sistema lineal en función de los parámetros &lt;br /&gt;
&amp;lt;math&amp;gt;a, b&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;c&amp;lt;/math&amp;gt;:&lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\left\{&lt;br /&gt;
\begin{array}{l}&lt;br /&gt;
x+ay+a^2 z=0 \\&lt;br /&gt;
x+by+b^2 z=0 \\&lt;br /&gt;
x+cy+c^2z=1&lt;br /&gt;
\end{array}&lt;br /&gt;
\right.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;/div&gt;</summary>
		<author><name>Marjimcru</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=676</id>
		<title>Ejercicios de introducción a Maxima</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=676"/>
		<updated>2011-04-01T20:49:50Z</updated>

		<summary type="html">&lt;p&gt;Marjimcru: /* Ejercicio 6.1 */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;__NOTOC__&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Funciones y variables a utilizar:&amp;#039;&amp;#039;&amp;#039; &amp;#039;&amp;#039;float&amp;#039;&amp;#039;, &amp;#039;&amp;#039;is&amp;#039;&amp;#039;, &amp;#039;&amp;#039;expand&amp;#039;&amp;#039;, &amp;#039;&amp;#039;fpprec&amp;#039;&amp;#039;, &amp;#039;&amp;#039;bfloat&amp;#039;&amp;#039;, &amp;#039;&amp;#039;solve&amp;#039;&amp;#039;, &amp;#039;&amp;#039;factor&amp;#039;&amp;#039;, &amp;#039;&amp;#039;rectform&amp;#039;&amp;#039;, &amp;#039;&amp;#039;abs&amp;#039;&amp;#039;, &amp;#039;&amp;#039;carg&amp;#039;&amp;#039;, &amp;#039;&amp;#039;plot2D&amp;#039;&amp;#039; y &amp;#039;&amp;#039;find_root&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 1 ==&lt;br /&gt;
=== Ejercicio 1.1 ===&lt;br /&gt;
Definir la constante &amp;lt;math&amp;gt;a = (20+14\sqrt{2})^{1/3} + (20-14\sqrt{2})^{1/3}&amp;lt;/math&amp;gt;.&lt;br /&gt;
----&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%1) a : (20+14*sqrt(2))^(1/3) + (20-14*sqrt(2))^(1/3)$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.2 ===&lt;br /&gt;
Calcular el valor numérico de a. ¿A qué entero se aproxima?&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%i1) float(a);&lt;br /&gt;
 (%o1) 3.999999999999996&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 2 ==&lt;br /&gt;
Ejercicio 2. Escribir el número &amp;lt;math&amp;gt;\left(sin\frac{\pi}{3}+cos\frac{\pi}{3}\right)^9&amp;lt;/math&amp;gt; en la forma &amp;lt;math&amp;gt;a + b \ast c^d&amp;lt;/math&amp;gt;, donde &amp;lt;math&amp;gt;a, b, c&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;d&amp;lt;/math&amp;gt; son números racionales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;Nota&amp;#039;&amp;#039;: Cambiar el valor de la variable &amp;#039;&amp;#039;%piargs&amp;#039;&amp;#039; a &amp;#039;&amp;#039;true&amp;#039;&amp;#039; y usar &amp;#039;&amp;#039;radcan&amp;#039;&amp;#039; para la simplificación de radicales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 3 ==&lt;br /&gt;
Calcular la cifra 149 del número &amp;lt;math&amp;gt;\pi&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
(%i1) fpprec : 149;&lt;br /&gt;
(%o1) 149&lt;br /&gt;
(%i2) bfloat(1000*%pi);&lt;br /&gt;
(%02) 3.1415926535897932384626433832[92 digits]0938446095505822317253594081b3&lt;br /&gt;
&lt;br /&gt;
Cifra 149: 1&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 4 ==&lt;br /&gt;
Se considera el polinomio &amp;lt;math&amp;gt;p = x^4-x^3-7x^2-8x-6&amp;lt;/math&amp;gt;.&lt;br /&gt;
 (%i1) p:x^4-x^3-7*x^2-8*x-6$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.1. ===&lt;br /&gt;
Calcular las raices reales de &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;x=1-\sqrt(7), x=1+\sqrt(7)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comentario de J.A. Alonso: En la solución hay que escribir la sesión con Maxima.&lt;br /&gt;
&lt;br /&gt;
Ok, éste es el proceso y de todas las soluciones posibles tomo las reales.&lt;br /&gt;
&lt;br /&gt;
(%o1) p:x^4-x^3-7*x^2-8*x-6$&lt;br /&gt;
solve(p);&lt;br /&gt;
&lt;br /&gt;
(%o2) [x=1-sqrt(7),x=sqrt(7)+1,x=-(sqrt(3)*%i+1)/2,x=(sqrt(3)*%i-1)/2]&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;x=1-\sqrt(7),x=1+\sqrt(7),x=-(\sqrt(3)i+1)/2,x=(\sqrt(3)i-1)/2&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.2 ===&lt;br /&gt;
Factorizar al máximo el polinomio &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&amp;lt;math&amp;gt;(x^2-2x-6)(x^2+x+1)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comentario de J.A. Alonso: En la solución hay que escribir la sesión con Maxima.&lt;br /&gt;
&lt;br /&gt;
Ok, en Maxima sería:&lt;br /&gt;
&lt;br /&gt;
(%o3) factor(p);&lt;br /&gt;
(x^2-2*x-6)*(x^2+x+1)&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(x^2-2x-6)(x^2+x+1)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 5 ==&lt;br /&gt;
Sea &amp;lt;math&amp;gt;z=\left(\frac{1-i\sqrt 3}{1+i}\right)^{20}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
 (%i1) z: ((1-%i*sqrt(3))/(1+%i))^20$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.1 === &lt;br /&gt;
Calcular la parte real y la parte imaginaria de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
La parte real sería:&lt;br /&gt;
(%i1) realpart(z);&lt;br /&gt;
&lt;br /&gt;
La parte imaginaria sería:&lt;br /&gt;
(%i2) imagpart(z);&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.2 === &lt;br /&gt;
Calcular el módulo y el argumento de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
El módulo sería:&lt;br /&gt;
(%i1) abs(Z);&lt;br /&gt;
&lt;br /&gt;
El argumento sería:&lt;br /&gt;
(%i2) carg(z);&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 6 ==&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.1 === &lt;br /&gt;
Con la ayuda de la representación gráfica, conjeturar el número de soluciones de la ecuación&lt;br /&gt;
:&amp;lt;math&amp;gt;\sin x=1-x^4&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
La representación sería : &lt;br /&gt;
(%i1) plot2d([sin(x)-1+x^4],[x,-100,100],[y,-10,10]);&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.2 === &lt;br /&gt;
Dar una aproximación de cada solución.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 7 ==&lt;br /&gt;
Resolver el siguiente sistema lineal en función de los parámetros &lt;br /&gt;
&amp;lt;math&amp;gt;a, b&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;c&amp;lt;/math&amp;gt;:&lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\left\{&lt;br /&gt;
\begin{array}{l}&lt;br /&gt;
x+ay+a^2 z=0 \\&lt;br /&gt;
x+by+b^2 z=0 \\&lt;br /&gt;
x+cy+c^2z=1&lt;br /&gt;
\end{array}&lt;br /&gt;
\right.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;/div&gt;</summary>
		<author><name>Marjimcru</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=675</id>
		<title>Ejercicios de introducción a Maxima</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=675"/>
		<updated>2011-04-01T20:42:43Z</updated>

		<summary type="html">&lt;p&gt;Marjimcru: /* Ejercicio 5.2 */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;__NOTOC__&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Funciones y variables a utilizar:&amp;#039;&amp;#039;&amp;#039; &amp;#039;&amp;#039;float&amp;#039;&amp;#039;, &amp;#039;&amp;#039;is&amp;#039;&amp;#039;, &amp;#039;&amp;#039;expand&amp;#039;&amp;#039;, &amp;#039;&amp;#039;fpprec&amp;#039;&amp;#039;, &amp;#039;&amp;#039;bfloat&amp;#039;&amp;#039;, &amp;#039;&amp;#039;solve&amp;#039;&amp;#039;, &amp;#039;&amp;#039;factor&amp;#039;&amp;#039;, &amp;#039;&amp;#039;rectform&amp;#039;&amp;#039;, &amp;#039;&amp;#039;abs&amp;#039;&amp;#039;, &amp;#039;&amp;#039;carg&amp;#039;&amp;#039;, &amp;#039;&amp;#039;plot2D&amp;#039;&amp;#039; y &amp;#039;&amp;#039;find_root&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 1 ==&lt;br /&gt;
=== Ejercicio 1.1 ===&lt;br /&gt;
Definir la constante &amp;lt;math&amp;gt;a = (20+14\sqrt{2})^{1/3} + (20-14\sqrt{2})^{1/3}&amp;lt;/math&amp;gt;.&lt;br /&gt;
----&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%1) a : (20+14*sqrt(2))^(1/3) + (20-14*sqrt(2))^(1/3)$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.2 ===&lt;br /&gt;
Calcular el valor numérico de a. ¿A qué entero se aproxima?&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%i1) float(a);&lt;br /&gt;
 (%o1) 3.999999999999996&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 2 ==&lt;br /&gt;
Ejercicio 2. Escribir el número &amp;lt;math&amp;gt;\left(sin\frac{\pi}{3}+cos\frac{\pi}{3}\right)^9&amp;lt;/math&amp;gt; en la forma &amp;lt;math&amp;gt;a + b \ast c^d&amp;lt;/math&amp;gt;, donde &amp;lt;math&amp;gt;a, b, c&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;d&amp;lt;/math&amp;gt; son números racionales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;Nota&amp;#039;&amp;#039;: Cambiar el valor de la variable &amp;#039;&amp;#039;%piargs&amp;#039;&amp;#039; a &amp;#039;&amp;#039;true&amp;#039;&amp;#039; y usar &amp;#039;&amp;#039;radcan&amp;#039;&amp;#039; para la simplificación de radicales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 3 ==&lt;br /&gt;
Calcular la cifra 149 del número &amp;lt;math&amp;gt;\pi&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
(%i1) fpprec : 149;&lt;br /&gt;
(%o1) 149&lt;br /&gt;
(%i2) bfloat(1000*%pi);&lt;br /&gt;
(%02) 3.1415926535897932384626433832[92 digits]0938446095505822317253594081b3&lt;br /&gt;
&lt;br /&gt;
Cifra 149: 1&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 4 ==&lt;br /&gt;
Se considera el polinomio &amp;lt;math&amp;gt;p = x^4-x^3-7x^2-8x-6&amp;lt;/math&amp;gt;.&lt;br /&gt;
 (%i1) p:x^4-x^3-7*x^2-8*x-6$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.1. ===&lt;br /&gt;
Calcular las raices reales de &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;x=1-\sqrt(7), x=1+\sqrt(7)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comentario de J.A. Alonso: En la solución hay que escribir la sesión con Maxima.&lt;br /&gt;
&lt;br /&gt;
Ok, éste es el proceso y de todas las soluciones posibles tomo las reales.&lt;br /&gt;
&lt;br /&gt;
(%o1) p:x^4-x^3-7*x^2-8*x-6$&lt;br /&gt;
solve(p);&lt;br /&gt;
&lt;br /&gt;
(%o2) [x=1-sqrt(7),x=sqrt(7)+1,x=-(sqrt(3)*%i+1)/2,x=(sqrt(3)*%i-1)/2]&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;x=1-\sqrt(7),x=1+\sqrt(7),x=-(\sqrt(3)i+1)/2,x=(\sqrt(3)i-1)/2&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.2 ===&lt;br /&gt;
Factorizar al máximo el polinomio &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&amp;lt;math&amp;gt;(x^2-2x-6)(x^2+x+1)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comentario de J.A. Alonso: En la solución hay que escribir la sesión con Maxima.&lt;br /&gt;
&lt;br /&gt;
Ok, en Maxima sería:&lt;br /&gt;
&lt;br /&gt;
(%o3) factor(p);&lt;br /&gt;
(x^2-2*x-6)*(x^2+x+1)&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(x^2-2x-6)(x^2+x+1)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 5 ==&lt;br /&gt;
Sea &amp;lt;math&amp;gt;z=\left(\frac{1-i\sqrt 3}{1+i}\right)^{20}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
 (%i1) z: ((1-%i*sqrt(3))/(1+%i))^20$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.1 === &lt;br /&gt;
Calcular la parte real y la parte imaginaria de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
La parte real sería:&lt;br /&gt;
(%i1) realpart(z);&lt;br /&gt;
&lt;br /&gt;
La parte imaginaria sería:&lt;br /&gt;
(%i2) imagpart(z);&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.2 === &lt;br /&gt;
Calcular el módulo y el argumento de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
El módulo sería:&lt;br /&gt;
(%i1) abs(Z);&lt;br /&gt;
&lt;br /&gt;
El argumento sería:&lt;br /&gt;
(%i2) carg(z);&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 6 ==&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.1 === &lt;br /&gt;
Con la ayuda de la representación gráfica, conjeturar el número de soluciones de la ecuación&lt;br /&gt;
:&amp;lt;math&amp;gt;\sin x=1-x^4&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.2 === &lt;br /&gt;
Dar una aproximación de cada solución.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 7 ==&lt;br /&gt;
Resolver el siguiente sistema lineal en función de los parámetros &lt;br /&gt;
&amp;lt;math&amp;gt;a, b&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;c&amp;lt;/math&amp;gt;:&lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\left\{&lt;br /&gt;
\begin{array}{l}&lt;br /&gt;
x+ay+a^2 z=0 \\&lt;br /&gt;
x+by+b^2 z=0 \\&lt;br /&gt;
x+cy+c^2z=1&lt;br /&gt;
\end{array}&lt;br /&gt;
\right.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;/div&gt;</summary>
		<author><name>Marjimcru</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=674</id>
		<title>Ejercicios de introducción a Maxima</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=674"/>
		<updated>2011-04-01T20:41:15Z</updated>

		<summary type="html">&lt;p&gt;Marjimcru: /* Ejercicio 5.1 */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;__NOTOC__&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Funciones y variables a utilizar:&amp;#039;&amp;#039;&amp;#039; &amp;#039;&amp;#039;float&amp;#039;&amp;#039;, &amp;#039;&amp;#039;is&amp;#039;&amp;#039;, &amp;#039;&amp;#039;expand&amp;#039;&amp;#039;, &amp;#039;&amp;#039;fpprec&amp;#039;&amp;#039;, &amp;#039;&amp;#039;bfloat&amp;#039;&amp;#039;, &amp;#039;&amp;#039;solve&amp;#039;&amp;#039;, &amp;#039;&amp;#039;factor&amp;#039;&amp;#039;, &amp;#039;&amp;#039;rectform&amp;#039;&amp;#039;, &amp;#039;&amp;#039;abs&amp;#039;&amp;#039;, &amp;#039;&amp;#039;carg&amp;#039;&amp;#039;, &amp;#039;&amp;#039;plot2D&amp;#039;&amp;#039; y &amp;#039;&amp;#039;find_root&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 1 ==&lt;br /&gt;
=== Ejercicio 1.1 ===&lt;br /&gt;
Definir la constante &amp;lt;math&amp;gt;a = (20+14\sqrt{2})^{1/3} + (20-14\sqrt{2})^{1/3}&amp;lt;/math&amp;gt;.&lt;br /&gt;
----&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%1) a : (20+14*sqrt(2))^(1/3) + (20-14*sqrt(2))^(1/3)$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.2 ===&lt;br /&gt;
Calcular el valor numérico de a. ¿A qué entero se aproxima?&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%i1) float(a);&lt;br /&gt;
 (%o1) 3.999999999999996&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 2 ==&lt;br /&gt;
Ejercicio 2. Escribir el número &amp;lt;math&amp;gt;\left(sin\frac{\pi}{3}+cos\frac{\pi}{3}\right)^9&amp;lt;/math&amp;gt; en la forma &amp;lt;math&amp;gt;a + b \ast c^d&amp;lt;/math&amp;gt;, donde &amp;lt;math&amp;gt;a, b, c&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;d&amp;lt;/math&amp;gt; son números racionales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;Nota&amp;#039;&amp;#039;: Cambiar el valor de la variable &amp;#039;&amp;#039;%piargs&amp;#039;&amp;#039; a &amp;#039;&amp;#039;true&amp;#039;&amp;#039; y usar &amp;#039;&amp;#039;radcan&amp;#039;&amp;#039; para la simplificación de radicales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 3 ==&lt;br /&gt;
Calcular la cifra 149 del número &amp;lt;math&amp;gt;\pi&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
(%i1) fpprec : 149;&lt;br /&gt;
(%o1) 149&lt;br /&gt;
(%i2) bfloat(1000*%pi);&lt;br /&gt;
(%02) 3.1415926535897932384626433832[92 digits]0938446095505822317253594081b3&lt;br /&gt;
&lt;br /&gt;
Cifra 149: 1&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 4 ==&lt;br /&gt;
Se considera el polinomio &amp;lt;math&amp;gt;p = x^4-x^3-7x^2-8x-6&amp;lt;/math&amp;gt;.&lt;br /&gt;
 (%i1) p:x^4-x^3-7*x^2-8*x-6$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.1. ===&lt;br /&gt;
Calcular las raices reales de &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;x=1-\sqrt(7), x=1+\sqrt(7)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comentario de J.A. Alonso: En la solución hay que escribir la sesión con Maxima.&lt;br /&gt;
&lt;br /&gt;
Ok, éste es el proceso y de todas las soluciones posibles tomo las reales.&lt;br /&gt;
&lt;br /&gt;
(%o1) p:x^4-x^3-7*x^2-8*x-6$&lt;br /&gt;
solve(p);&lt;br /&gt;
&lt;br /&gt;
(%o2) [x=1-sqrt(7),x=sqrt(7)+1,x=-(sqrt(3)*%i+1)/2,x=(sqrt(3)*%i-1)/2]&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;x=1-\sqrt(7),x=1+\sqrt(7),x=-(\sqrt(3)i+1)/2,x=(\sqrt(3)i-1)/2&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.2 ===&lt;br /&gt;
Factorizar al máximo el polinomio &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&amp;lt;math&amp;gt;(x^2-2x-6)(x^2+x+1)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
Comentario de J.A. Alonso: En la solución hay que escribir la sesión con Maxima.&lt;br /&gt;
&lt;br /&gt;
Ok, en Maxima sería:&lt;br /&gt;
&lt;br /&gt;
(%o3) factor(p);&lt;br /&gt;
(x^2-2*x-6)*(x^2+x+1)&lt;br /&gt;
&lt;br /&gt;
&amp;lt;math&amp;gt;(x^2-2x-6)(x^2+x+1)&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 5 ==&lt;br /&gt;
Sea &amp;lt;math&amp;gt;z=\left(\frac{1-i\sqrt 3}{1+i}\right)^{20}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
 (%i1) z: ((1-%i*sqrt(3))/(1+%i))^20$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.1 === &lt;br /&gt;
Calcular la parte real y la parte imaginaria de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
La parte real sería:&lt;br /&gt;
(%i1) realpart(z);&lt;br /&gt;
&lt;br /&gt;
La parte imaginaria sería:&lt;br /&gt;
(%i2) imagpart(z);&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.2 === &lt;br /&gt;
Calcular el módulo y el argumento de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 6 ==&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.1 === &lt;br /&gt;
Con la ayuda de la representación gráfica, conjeturar el número de soluciones de la ecuación&lt;br /&gt;
:&amp;lt;math&amp;gt;\sin x=1-x^4&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.2 === &lt;br /&gt;
Dar una aproximación de cada solución.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 7 ==&lt;br /&gt;
Resolver el siguiente sistema lineal en función de los parámetros &lt;br /&gt;
&amp;lt;math&amp;gt;a, b&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;c&amp;lt;/math&amp;gt;:&lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\left\{&lt;br /&gt;
\begin{array}{l}&lt;br /&gt;
x+ay+a^2 z=0 \\&lt;br /&gt;
x+by+b^2 z=0 \\&lt;br /&gt;
x+cy+c^2z=1&lt;br /&gt;
\end{array}&lt;br /&gt;
\right.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;/div&gt;</summary>
		<author><name>Marjimcru</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Usuario:Marjimcru&amp;diff=646</id>
		<title>Usuario:Marjimcru</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Usuario:Marjimcru&amp;diff=646"/>
		<updated>2011-03-31T14:20:45Z</updated>

		<summary type="html">&lt;p&gt;Marjimcru: Página creada con &amp;#039;María de los Ángeles Jiménez Cruz&amp;#039;&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;María de los Ángeles Jiménez Cruz&lt;/div&gt;</summary>
		<author><name>Marjimcru</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=645</id>
		<title>Ejercicios de introducción a Maxima</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=645"/>
		<updated>2011-03-31T14:17:44Z</updated>

		<summary type="html">&lt;p&gt;Marjimcru: /* Ejercicio 1.2 */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;__NOTOC__&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Funciones y variables a utilizar:&amp;#039;&amp;#039;&amp;#039; &amp;#039;&amp;#039;float&amp;#039;&amp;#039;, &amp;#039;&amp;#039;is&amp;#039;&amp;#039;, &amp;#039;&amp;#039;expand&amp;#039;&amp;#039;, &amp;#039;&amp;#039;fpprec&amp;#039;&amp;#039;, &amp;#039;&amp;#039;bfloat&amp;#039;&amp;#039;, &amp;#039;&amp;#039;solve&amp;#039;&amp;#039;, &amp;#039;&amp;#039;factor&amp;#039;&amp;#039;, &amp;#039;&amp;#039;rectform&amp;#039;&amp;#039;, &amp;#039;&amp;#039;abs&amp;#039;&amp;#039;, &amp;#039;&amp;#039;carg&amp;#039;&amp;#039;, &amp;#039;&amp;#039;plot2D&amp;#039;&amp;#039; y &amp;#039;&amp;#039;find_root&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 1 ==&lt;br /&gt;
=== Ejercicio 1.1 ===&lt;br /&gt;
Definir la constante &amp;lt;math&amp;gt;a = (20+14\sqrt{2})^{1/3} + (20-14\sqrt{2})^{1/3}&amp;lt;/math&amp;gt;.&lt;br /&gt;
----&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%1) a : (20+14*sqrt(2))^(1/3) + (20-14*sqrt(2))^(1/3)$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.2 ===&lt;br /&gt;
Calcular el valor numérico de a. ¿A qué entero se aproxima?&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%i1) float(a);&lt;br /&gt;
 (%o1) 3.999999999999996&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 2 ==&lt;br /&gt;
Ejercicio 2. Escribir el número &amp;lt;math&amp;gt;\left(sin\frac{\pi}{3}+cos\frac{\pi}{3}\right)^9&amp;lt;/math&amp;gt; en la forma &amp;lt;math&amp;gt;a + b \ast c^d&amp;lt;/math&amp;gt;, donde &amp;lt;math&amp;gt;a, b, c&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;d&amp;lt;/math&amp;gt; son números racionales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;Nota&amp;#039;&amp;#039;: Cambiar el valor de la variable &amp;#039;&amp;#039;%piargs&amp;#039;&amp;#039; a &amp;#039;&amp;#039;true&amp;#039;&amp;#039; y usar &amp;#039;&amp;#039;radcan&amp;#039;&amp;#039; para la simplificación de radicales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 3 ==&lt;br /&gt;
Calcular la cifra 149 del número &amp;lt;math&amp;gt;\pi&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 4 ==&lt;br /&gt;
Se considera el polinomio &amp;lt;math&amp;gt;p = x^4-x^3-7x^2-8x-6&amp;lt;/math&amp;gt;.&lt;br /&gt;
 (%i1) p:x^4-x^3-7*x^2-8*x-6$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.1. ===&lt;br /&gt;
Calcular las raices reales de &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.2 ===&lt;br /&gt;
Factorizar al máximo el polinomio &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 5 ==&lt;br /&gt;
Sea &amp;lt;math&amp;gt;z=\left(\frac{1-i\sqrt 3}{1+i}\right)^{20}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
 (%i1) z: ((1-%i*sqrt(3))/(1+%i))^20$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.1 === &lt;br /&gt;
Calcular la parte real y la parte imaginaria de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.2 === &lt;br /&gt;
Calcular el módulo y el argumento de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 6 ==&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.1 === &lt;br /&gt;
Con la ayuda de la representación gráfica, conjeturar el número de soluciones de la ecuación&lt;br /&gt;
:&amp;lt;math&amp;gt;\sin x=1-x^4&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.2 === &lt;br /&gt;
Dar una aproximación de cada solución.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 7 ==&lt;br /&gt;
Resolver el siguiente sistema lineal en función de los parámetros &lt;br /&gt;
&amp;lt;math&amp;gt;a, b&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;c&amp;lt;/math&amp;gt;:&lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\left\{&lt;br /&gt;
\begin{array}{l}&lt;br /&gt;
x+ay+a^2 z=0 \\&lt;br /&gt;
x+by+b^2 z=0 \\&lt;br /&gt;
x+cy+c^2z=1&lt;br /&gt;
\end{array}&lt;br /&gt;
\right.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;/div&gt;</summary>
		<author><name>Marjimcru</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=644</id>
		<title>Ejercicios de introducción a Maxima</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=644"/>
		<updated>2011-03-31T14:16:48Z</updated>

		<summary type="html">&lt;p&gt;Marjimcru: /* Ejercicio 1.1 */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;__NOTOC__&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Funciones y variables a utilizar:&amp;#039;&amp;#039;&amp;#039; &amp;#039;&amp;#039;float&amp;#039;&amp;#039;, &amp;#039;&amp;#039;is&amp;#039;&amp;#039;, &amp;#039;&amp;#039;expand&amp;#039;&amp;#039;, &amp;#039;&amp;#039;fpprec&amp;#039;&amp;#039;, &amp;#039;&amp;#039;bfloat&amp;#039;&amp;#039;, &amp;#039;&amp;#039;solve&amp;#039;&amp;#039;, &amp;#039;&amp;#039;factor&amp;#039;&amp;#039;, &amp;#039;&amp;#039;rectform&amp;#039;&amp;#039;, &amp;#039;&amp;#039;abs&amp;#039;&amp;#039;, &amp;#039;&amp;#039;carg&amp;#039;&amp;#039;, &amp;#039;&amp;#039;plot2D&amp;#039;&amp;#039; y &amp;#039;&amp;#039;find_root&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 1 ==&lt;br /&gt;
=== Ejercicio 1.1 ===&lt;br /&gt;
Definir la constante &amp;lt;math&amp;gt;a = (20+14\sqrt{2})^{1/3} + (20-14\sqrt{2})^{1/3}&amp;lt;/math&amp;gt;.&lt;br /&gt;
----&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
 (%1) a : (20+14*sqrt(2))^(1/3) + (20-14*sqrt(2))^(1/3)$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.2 ===&lt;br /&gt;
Calcular el valor numérico de a. ¿A qué entero se aproxima?&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 2 ==&lt;br /&gt;
Ejercicio 2. Escribir el número &amp;lt;math&amp;gt;\left(sin\frac{\pi}{3}+cos\frac{\pi}{3}\right)^9&amp;lt;/math&amp;gt; en la forma &amp;lt;math&amp;gt;a + b \ast c^d&amp;lt;/math&amp;gt;, donde &amp;lt;math&amp;gt;a, b, c&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;d&amp;lt;/math&amp;gt; son números racionales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;Nota&amp;#039;&amp;#039;: Cambiar el valor de la variable &amp;#039;&amp;#039;%piargs&amp;#039;&amp;#039; a &amp;#039;&amp;#039;true&amp;#039;&amp;#039; y usar &amp;#039;&amp;#039;radcan&amp;#039;&amp;#039; para la simplificación de radicales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 3 ==&lt;br /&gt;
Calcular la cifra 149 del número &amp;lt;math&amp;gt;\pi&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 4 ==&lt;br /&gt;
Se considera el polinomio &amp;lt;math&amp;gt;p = x^4-x^3-7x^2-8x-6&amp;lt;/math&amp;gt;.&lt;br /&gt;
 (%i1) p:x^4-x^3-7*x^2-8*x-6$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.1. ===&lt;br /&gt;
Calcular las raices reales de &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.2 ===&lt;br /&gt;
Factorizar al máximo el polinomio &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 5 ==&lt;br /&gt;
Sea &amp;lt;math&amp;gt;z=\left(\frac{1-i\sqrt 3}{1+i}\right)^{20}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
 (%i1) z: ((1-%i*sqrt(3))/(1+%i))^20$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.1 === &lt;br /&gt;
Calcular la parte real y la parte imaginaria de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.2 === &lt;br /&gt;
Calcular el módulo y el argumento de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 6 ==&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.1 === &lt;br /&gt;
Con la ayuda de la representación gráfica, conjeturar el número de soluciones de la ecuación&lt;br /&gt;
:&amp;lt;math&amp;gt;\sin x=1-x^4&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.2 === &lt;br /&gt;
Dar una aproximación de cada solución.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 7 ==&lt;br /&gt;
Resolver el siguiente sistema lineal en función de los parámetros &lt;br /&gt;
&amp;lt;math&amp;gt;a, b&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;c&amp;lt;/math&amp;gt;:&lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\left\{&lt;br /&gt;
\begin{array}{l}&lt;br /&gt;
x+ay+a^2 z=0 \\&lt;br /&gt;
x+by+b^2 z=0 \\&lt;br /&gt;
x+cy+c^2z=1&lt;br /&gt;
\end{array}&lt;br /&gt;
\right.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;/div&gt;</summary>
		<author><name>Marjimcru</name></author>
		
	</entry>
	<entry>
		<id>https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=643</id>
		<title>Ejercicios de introducción a Maxima</title>
		<link rel="alternate" type="text/html" href="https://www.glc.us.es/~jalonso/SLEAM2010/index.php?title=Ejercicios_de_introducci%C3%B3n_a_Maxima&amp;diff=643"/>
		<updated>2011-03-31T14:03:39Z</updated>

		<summary type="html">&lt;p&gt;Marjimcru: /* Ejercicio 1.1 */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;__NOTOC__&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Funciones y variables a utilizar:&amp;#039;&amp;#039;&amp;#039; &amp;#039;&amp;#039;float&amp;#039;&amp;#039;, &amp;#039;&amp;#039;is&amp;#039;&amp;#039;, &amp;#039;&amp;#039;expand&amp;#039;&amp;#039;, &amp;#039;&amp;#039;fpprec&amp;#039;&amp;#039;, &amp;#039;&amp;#039;bfloat&amp;#039;&amp;#039;, &amp;#039;&amp;#039;solve&amp;#039;&amp;#039;, &amp;#039;&amp;#039;factor&amp;#039;&amp;#039;, &amp;#039;&amp;#039;rectform&amp;#039;&amp;#039;, &amp;#039;&amp;#039;abs&amp;#039;&amp;#039;, &amp;#039;&amp;#039;carg&amp;#039;&amp;#039;, &amp;#039;&amp;#039;plot2D&amp;#039;&amp;#039; y &amp;#039;&amp;#039;find_root&amp;#039;&amp;#039;.&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 1 ==&lt;br /&gt;
=== Ejercicio 1.1 ===&lt;br /&gt;
Definir la constante &amp;lt;math&amp;gt;a = (20+14\sqrt{2})^{1/3} + (20-14\sqrt{2})^{1/3}&amp;lt;/math&amp;gt;.&lt;br /&gt;
----&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
a:2+3;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 1.2 ===&lt;br /&gt;
Calcular el valor numérico de a. ¿A qué entero se aproxima?&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 2 ==&lt;br /&gt;
Ejercicio 2. Escribir el número &amp;lt;math&amp;gt;\left(sin\frac{\pi}{3}+cos\frac{\pi}{3}\right)^9&amp;lt;/math&amp;gt; en la forma &amp;lt;math&amp;gt;a + b \ast c^d&amp;lt;/math&amp;gt;, donde &amp;lt;math&amp;gt;a, b, c&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;d&amp;lt;/math&amp;gt; son números racionales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;Nota&amp;#039;&amp;#039;: Cambiar el valor de la variable &amp;#039;&amp;#039;%piargs&amp;#039;&amp;#039; a &amp;#039;&amp;#039;true&amp;#039;&amp;#039; y usar &amp;#039;&amp;#039;radcan&amp;#039;&amp;#039; para la simplificación de radicales.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 3 ==&lt;br /&gt;
Calcular la cifra 149 del número &amp;lt;math&amp;gt;\pi&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 4 ==&lt;br /&gt;
Se considera el polinomio &amp;lt;math&amp;gt;p = x^4-x^3-7x^2-8x-6&amp;lt;/math&amp;gt;.&lt;br /&gt;
 (%i1) p:x^4-x^3-7*x^2-8*x-6$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.1. ===&lt;br /&gt;
Calcular las raices reales de &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 4.2 ===&lt;br /&gt;
Factorizar al máximo el polinomio &amp;lt;math&amp;gt;p&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 5 ==&lt;br /&gt;
Sea &amp;lt;math&amp;gt;z=\left(\frac{1-i\sqrt 3}{1+i}\right)^{20}&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
 (%i1) z: ((1-%i*sqrt(3))/(1+%i))^20$&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.1 === &lt;br /&gt;
Calcular la parte real y la parte imaginaria de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 5.2 === &lt;br /&gt;
Calcular el módulo y el argumento de &amp;lt;math&amp;gt;z&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 6 ==&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.1 === &lt;br /&gt;
Con la ayuda de la representación gráfica, conjeturar el número de soluciones de la ecuación&lt;br /&gt;
:&amp;lt;math&amp;gt;\sin x=1-x^4&amp;lt;/math&amp;gt;.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
=== Ejercicio 6.2 === &lt;br /&gt;
Dar una aproximación de cada solución.&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;br /&gt;
&lt;br /&gt;
== Ejercicio 7 ==&lt;br /&gt;
Resolver el siguiente sistema lineal en función de los parámetros &lt;br /&gt;
&amp;lt;math&amp;gt;a, b&amp;lt;/math&amp;gt; y &amp;lt;math&amp;gt;c&amp;lt;/math&amp;gt;:&lt;br /&gt;
:&amp;lt;math&amp;gt;&lt;br /&gt;
\left\{&lt;br /&gt;
\begin{array}{l}&lt;br /&gt;
x+ay+a^2 z=0 \\&lt;br /&gt;
x+by+b^2 z=0 \\&lt;br /&gt;
x+cy+c^2z=1&lt;br /&gt;
\end{array}&lt;br /&gt;
\right.&lt;br /&gt;
&amp;lt;/math&amp;gt;&lt;br /&gt;
&lt;br /&gt;
&amp;#039;&amp;#039;&amp;#039;Solución:&amp;#039;&amp;#039;&amp;#039;&lt;/div&gt;</summary>
		<author><name>Marjimcru</name></author>
		
	</entry>
</feed>