Bonjour,

Je suis entrain de tester la boucle foreach mais je bloque sur un petit exemple.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
 
l <- list("a" = seq(1,10,1), "b" = seq(0,100,10))
foreach(i = l, n = 1:length(l)) %do% 
{ 
  foreach(j = i) %do% 
  {
    if ("a" == names(l[n])) {j*2}
    if ("b" == names(l[n])) {j/2}
  } 
}
Ça me retourne NULL pour la première partie, je ne comprends pas pourquoi.

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
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
[[1]]
[[1]][[1]]
NULL
 
[[1]][[2]]
NULL
 
[[1]][[3]]
NULL
 
[[1]][[4]]
NULL
 
[[1]][[5]]
NULL
 
[[1]][[6]]
NULL
 
[[1]][[7]]
NULL
 
[[1]][[8]]
NULL
 
[[1]][[9]]
NULL
 
[[1]][[10]]
NULL
 
 
[[2]]
[[2]][[1]]
[1] 0
 
[[2]][[2]]
[1] 5
 
[[2]][[3]]
[1] 10
 
[[2]][[4]]
[1] 15
 
[[2]][[5]]
[1] 20
 
[[2]][[6]]
[1] 25
 
[[2]][[7]]
[1] 30
 
[[2]][[8]]
[1] 35
 
[[2]][[9]]
[1] 40
 
[[2]][[10]]
[1] 45
 
[[2]][[11]]
[1] 50