Deriv 패키지 지수 출력 해석

Question

deriv 패키지를 사용하여 파생 상품을 계산했지만 나눗셈 결과는 실제로 나를 괴롭힌다. 여기

내 기능 및 결과 : (1-X^2) 있어야하는데 나는 해결책을 알고

testFunction <- function(x) x/(x^2+1) 

Deriv(testFunction) 

function (x) 
{ 
    .e1 <- x^2 
    .e2 <- 1 + .e1 
    (1 - 2 * (.e1/.e2))/.e2 
} 

/(^ 2 + 1 X)^2,하지만 난 이해가 안 돼요 R이 나에게주는 .e1과 .e2의 출력.

Answer 1

당신은 무엇을 이해하지 못합니까?

(1 - 2 * (.e1/.e2))/.e2 = (1 - 2x²/(1+x²))/(1+x²) 
= ((1+x² - 2x²)/(1+x²))/(1+x²) 
= (1-x²)/(1+x²)² 

정확히 사용자가 언급 한 결과입니다.