Souci en R

[invited84210a7]

Je veux intégrer une fonction. Mais j'ai un probleme:

> integrate(function(x) x**3,0,1)
0.25 with absolute error < 2.8e-15

> integrate(function(x) x**3,0,1)+1
Erreur dans integrate(function(x) x^3, 0, 1) + 1 :
argument non numérique pour un opérateur binaire

Je pense alors a prendre le bon élément de cette sortie:

> integrate(function(x) x**3,0,1)[1]
$value
[1] 0.25

> integrate(function(x) x**3,0,1)[1]+1
Erreur dans integrate(function(x) x^3, 0, 1)[1] + 1 :
argument non numérique pour un opérateur binaire



En gros, c'est un type value et non un type reel...
Comment me débarasser de ce problème?

Merci d'avence,
Pierre
-----

[invite24357dd0]

Bonjour,
Je ne comprends pas vraiment ce que tu souhaites faire. Si je lis correctement l'aide, la fonction integrate() te donne la valeur de l'aire sous la courbe définie par ta fonction () et les bornes inférieure (0) et supérieure (1). La valeur de retour de integrate() est une liste dont la case de numéro 1 contient la valeur calculée de l'intégrale.

Que cherches-tu avec ton "+1" ? Sachant que la réponse à l'intégrale est 0.25, si tu souhaites avoir 1.25 comme réponse finale, essaie:

> z <- integrate(function(x) x**3,0,1)
> as.double(z[1]) + 1
[1] 1.25
>

Est-ce que çà répond à ta question ? Si non, peux-tu la (re)formuler ?

[invited84210a7]

Merci, ca répond pleinement à ma question
Pierre