Discussion :

[Hydro999]

Bonjour,

Je débute avec R et voici le probleme que je rencontre.

Pour commencer j'écris les lignes suivantes et j'obtiens la fonction en 3D

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
>f<-function(x,y) 10*sin(sqrt(x^2+y^2))/sqrt(x^2+y^2)
> x<-seq(-10,10,length=30)
> y<-x
> z<-outer(x,y,f)
> persp(x,y,z,theta=30,phi=30,expand=0.5)

Puis pour faire la meme chose avec le package :rgl , je tape les lignes suivantes

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
> library(rgl)
> rgl.surface(x,y,z)

Là ça me fait une méchante erreur qui me fait quitter R.

*** caught bus error ***
address 0x0, cause 'non-existent physical address'

Traceback:
1: .C(rgl_material, success = FALSE, idata, cdata, ddata)
2: rgl.material(...)
3: rgl.surface(x, y, z)

Possible actions:
1: abort (with core dump, if enabled)
2: normal R exit
3: exit R without saving workspace
4: exit R saving workspace
Selection:

Donc quelqu'un a-t-il une solution pour ce problème ?

cdt

[manoir]

Bonjour hydro999


Avec la version R 2.8.1 la fonction rgl.surface fonctionne sur ton exemple.

Faut peut être mettre à jour le package ou installer une version récente de R

Bon courage
Manoir

[Hydro999]

Ok merci