Bonjour,
j'ai un probleme pour ajouter du texte sur les graphiques produits
par ade4 sous R. C'est illustre par l'exemple ci-dessous :
#########
#
# Generation d'un pseudo jeu de donnees :
#
set.seed(0.1071966) # Magic number for reproducibility
n <- 100
data <- runif(2*n)
dim(data) <- c(n, 2)
data <- data.frame(data)
#
# Definition d'une fonction qui essaye d'ajouter du texte partout :
#
show.me.text.visible <- function(length = 50, col = "red")
{
xx <- seq(0, 1, length = length)
for( i in xx )
{
for( j in xx )
{
text(i, j, "*", col = col)
}
}
}
#
# Avec plot() pas de probleme :
#
plot(data, xlim = c(0,1), ylim = c(0,1))
show.me.text.visible() # Ca c'est OK, on peut mettre du texte partout
#
# Avec s.value() probleme :
#
library(ade4)
s.value(data, z = rep(1,n), xlim = c(0,1), ylim = c(0,1))
show.me.text.visible() # Pas OK, on ne peut pas mettre du texte partout
#########
C'est embestant parce que c'est souvent en bordure que l'on ajoute
des annotations.
Any idea?
Zan
P.-S. C'est ade4 1.1-2 sous
platform powerpc-apple-darwin6.8
arch powerpc
os darwin6.8
system powerpc, darwin6.8
status
major 1
minor 8.1
year 2003
month 11
day 21
language R
This archive was generated by hypermail 2b30 : Tue Sep 07 2004 - 13:30:57 MEST