\( \DeclareMathOperator{\abs}{abs} \newcommand{\ensuremath}[1]{\mbox{$#1$}} \)
(%i2) |
f(
y)
:
=
y
^(
1
/
3)
$
wxdraw2d( filled_func = 8, fill_color = grey, explicit( x ^ 3, x, 0, 2), filled_func =false, color = blue, line_width = 3, explicit( x ^ 3, x, 0, 2), xaxis =true) ; |
El volumen lo podemos obtener como la suma de las áreas de las secciones del objeto. Esta área vendrá dada por \(\pi f(y)^2\):
(%i3) | A( y) : = %pi * f( y) ^ 2 ; |
Ahora calculamo la primitiva y aplicamos Barrow:
(%i5) |
define(
F(
y),
integrate(
A(
y),
y))
;
print( "Volumen=", F( 8) - F( 0)) $ |
Este mismo resultado lo habríamos obtenido directamente:
(%i6) | print( "Volumen=", integrate( A( y), y, 0, 8)) $ |
Created with wxMaxima.
Nos piden calcular el volumen de revolución del área comprendida entre \(y=x^3\), \(y=8\) y \(x=1\) respecto del eje y. En ese caso nos interesa x=f(y):