Fonction pour répéter assignation

**Haw27** · 12/11/2009, 21h24

Bonjour,
Je recherche une fonction pour faire répéter une assignation :

Code :

1
2
3
4
5
6
7
pop_1<-rep(0,100)
pop_2<-rep(0,100)
pop_3<-rep(0,100)
pop_4<-rep(0,100)
pop_5<-rep(0,100)
...
pop_n<-rep(0,100)

Merci

**TimoP** · 12/11/2009, 21h47

le faire sous forme de liste n'est pas plus adapté?

**Haw27** · 12/11/2009, 22h19

Sans doute, mais comment on peut faire une liste ? (Pour mon cas ?

)

**TimoP** · 12/11/2009, 22h23

Code :

1
2
3
4
5
6
 
pop <- list()
for(i in 1:n)
{
pop[[i]] <- vector('numeric',100)
}

**pitipoisson** · 13/11/2009, 15h23

Bonjour bis,

ou en s'inspirant d'une solution à un autre problème pour faire plus efficace

Code :

1
2
n <- 10
pop <- lapply(1:n, function(x) numeric(100))

**Haw27** · 13/11/2009, 21h45

Merci,
pas mal cette fonction lapply !!

R