Comment est-ce que j'arrête ce morceau de code R d'imprimer la sortie?

Question

J'ai reçu le code ci-dessous et il continue à imprimer les tableaux de fréquence. Comment puis-je l'empêcher de faire cela.

pl = read.csv("c:/pl.csv") 
freqs = function(name){ assign(name, table(pl[,name],pl$bad_outcome), envir = .GlobalEnv);} 
lapply(names(pl), freqs); 

Answer 1

Vous avez trois options:

1) Affecter la sortie, puisque ce que vous voyez comme « l'impression » est en fait un retour.

x <- lapply(names(pl), freqs) 

2) utiliser la fonction l_ply dans plyr.

library(plyr) 
l_ply(names(pl), freqs) 

3) Ne pas faire l'assign à l'intérieur du lapply, mais le faire plus tard avec attach:

x <- lapply(names(pl), function(name) table(pl[,name],pl$bad_outcome)) 
attach(x)