Discussion :

[pitchu]

Bonjour,

Je voudrais savoir comment afficher les résultats d'une liste sur une même ligne (ou comme une data.frame/matrix)

Code :

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

1
2
 
list("val"= sqrt(3), "temps" = Sys.time(), "poids" = object_size(c(1:1e6)))

resultat

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
 
[[1]]
[[1]]$val
[1] 1
 
[[1]]$temps
[1] "2019-02-08 16:27:45 +04"
 
[[1]]$poids
4 MB
 
 
[[2]]
[[2]]$val
[1] 1.414214
 
[[2]]$temps
[1] "2019-02-08 16:27:45 +04"
 
[[2]]$poids
4 MB

ce que je voudrais c'est cela sans dénaturé les valeurs

Code :

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

1
2
3
4
 
$val   $temps     $poids
 1       "2019-02-08 16:27:45 +04"  4 MB
1.414214 "2019-02-08 16:27:45 +04" 4 MB

[tototode]

Bonjour,

"a priori" ça ne fonctionnera pas à cause de l'objet qui vient de object_size. Je n'arrive pas à le mettre facilement dans une colonne d'un data.frame. Il faut d'abord le formater sous format texte :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
l1 <- list("val"= sqrt(3), "temps" = Sys.time(), "poids" = object_size(c(1:1e6)))
l2 <- list(l1, l1)
 
l2 <- lapply(l2, function(x) {
  x[[3]] <- paste0(format(signif(x[[3]]/1000^2, digits = 3), big.mark = ",", scientific = FALSE), " MB")
  x
  })
 
df <- do.call(rbind, lapply(l2, as.data.frame))
df
       val               temps poids
1 1.732051 2019-02-08 16:31:40  4 MB
2 1.732051 2019-02-08 16:31:40  4 MB

cdlt

[pitchu]

Bonjour,
merci de votre aide.