20/07/26 21:59:35.55 Zd39FNjK.net
文字化けを訂正
integral_(-1)^1 π (π - cos^(-1)(x))^2 dx = π (π^2 - 4) ≒ 18.440
Rのコード
f<- function(x) -cos(x) # == sin(x-pi/2) == -cos(x)
A <- function(x)pi*(pi-acos(x))^2
integrate(A,-1,1)
> integrate(A,-1,1)$value
[1] 18.4399