Inspirado en un debate sobre esta pregunta Descubrí la siguiente función híbrida:
Las curvas en rojo se definen como $$f(x)=\exp\left((\sin x)^{(\sin x)^{\sin x}}\right)$$ y las curvas en azul se definen como $$g(x)=(\sin x)^{\sin x}$$
El resultado parece la cabeza de una seta (con un poco de decoración :)
Pregunta: Considere sólo una "cabeza de hongo". ¿Cuál es el área?
Podemos reescribir el problema como $$\int_0^\pi\left[e^{(\sin x)^{(\sin x)^{\sin x}}}-(\sin x)^{\sin x}\right]\,dx$$ y podemos ver que es simétrico en $x=\pi/2$ ya que $\sin\left(\frac\pi2-x\right)=\sin\left(\frac\pi2+x\right)$ por lo que equivale a $$2\int_0^{\pi/2}\left[e^{(\sin x)^{(\sin x)^{\sin x}}}-(\sin x)^{\sin x}\right]\,dx\tag{1}$$
Wolfram Alpha calcula que esta integral definida es de alrededor de $3.88407$ (no es igual a, como se señala en los comentarios.
Entonces, ¿cómo debo abordar esta integral? No preveo una forma cerrada, por lo que las aproximaciones estarían bien.
Actualización: He aproximado las funciones en otras más simples, para dar un valor de $3.86029$ .
3 votos
¿Es eso $(\sin x)^{\sin x}$ o $\sin(x^{\sin x})$ ?
5 votos
@DarkMalthorp : No lo haría $(\sin x)^{\sin x}$ sea $\sin^{\sin x} x$ ?
3 votos
Ah, sí, supongo que sí. Personalmente odio completamente esa notación y por eso nunca la uso, pero gracias por la aclaración
5 votos
utilizando el comando
N[2*Int[Exp[Sin[x]^(Sin[x]^Sin[x]) ] - Sin[x]^(Sin[x]),{x,0,Pi/2}],40]
, WA devuelve3.8840669854123474566360415029651865604369...
3 votos
+1 por el dibujo de la seta
2 votos
Creo que su $3.88407$ es un valor aproximado obtenido numéricamente. Debería haber un botón para más dígitos. Si es exacto habrá un botón para la forma exacta.
1 votos
De hecho esta integral no tiene forma cerrada...
0 votos
@MostafaAyaz Parece que sí. La calculadora simbólica inversa No encuentro nada o bien.