Discussion :

[Florence Magnin]

Bonjour,

je cherche à créer 6 figures réparties en 2 colonne de 3 pour 2 * 3 figures du même genre. 1 jeu de figure se réalise très bien avec l'utilisation de:

Code :

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

1
2
 
par(mfcol = c (3,2))

En revanche, quand jcherche à effectuer les autres figures (avec une fonction filled.contour), j'obtiens le message d'erreur suivant:

Code :

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

1
2
 
Error in plot.new() : figure margins too large

Quelqu'un pourrait-il m'orienter sur la façon de régler ce problème?

En vous remerciant et bien cordialement.

F. Magnin

[A. D.]

Bonjour,

Si vous tapez le nom de la fonction "filled.contour" dans R, vous obtenez son code, ci-dessous :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
> filled.contour
function (x = seq(0, 1, length.out = nrow(z)), y = seq(0, 1, 
    length.out = ncol(z)), z, xlim = range(x, finite = TRUE), 
    ylim = range(y, finite = TRUE), zlim = range(z, finite = TRUE), 
    levels = pretty(zlim, nlevels), nlevels = 20, color.palette = cm.colors, 
    col = color.palette(length(levels) - 1), plot.title, plot.axes, 
    key.title, key.axes, asp = NA, xaxs = "i", yaxs = "i", las = 1, 
    axes = TRUE, frame.plot = axes, ...) 
{
    (...)

    mar[4L] <- mar[2L]
    mar[2L] <- 1
    par(mar = mar)
    plot.new()
    plot.window(xlim = c(0, 1), ylim = range(levels), xaxs = "i", 
        yaxs = "i")

    (...)

    if (!missing(key.title)) 
        key.title
    mar <- mar.orig
    mar[4L] <- 1
    par(mar = mar)
    plot.new()
    plot.window(xlim, ylim, "", xaxs = xaxs, yaxs = yaxs, asp = asp)
    if (!is.matrix(z) || nrow(z) <= 1L || ncol(z) <= 1L) 
        stop("no proper 'z' matrix specified")
   
   (...)

    else plot.axes
    if (frame.plot) 
        box()
    if (missing(plot.title)) 
        title(...)
    else plot.title
    invisible()
}
<bytecode: 0xa318fd4>
<environment: namespace:graphics>

Ceci vous permet de voir qu'à plusieurs reprises la fonction fait appel à "plot.new()", ce qui va ouvrir une nouvelle fenêtre graphique et non afficher le graphique dans une des zones définies dans le "par".
Une solution serait de re-créer une fonction "myfilled.contour" en adaptant le code précédent et remplaçant/supprimant les "plot.new".

Bonne continuation


Cordialement,

A.D.

[Florence Magnin]

Et bien merci des précisions. J'ignorais comment ça fonctionne.
Je vais donc m'oriente vers votre solution.

Bien cordialement.

F. Magnin