È possibile troncare l'output quando si visualizza il contenuto di dati?

Question

Ho un frame di dati con alcune colonne "commenti" molto lunghe. Quando li ho visualizzati sono suddivisi in blocchi diversi, rendendo difficile leggere attraverso le file. È possibile modificare un'impostazione in R o modificare la chiamata a dati. Frome per troncare stringhe a una certa lunghezza?

Esempio: un frame dati a 3 colonne

data.frame(cbind(rep(1,5),rep(c("very very long obnoxious character string here" ,"dog","cat","dog",5)),rep(c("very very long obnoxious character string here" ,"dog","cat","dog",5))))

Frame di dati risultante come visualizzato nella mia schermata:

  X1                                             X2
1  1 very very long obnoxious character string here
2  1                                            dog
3  1                                            cat
4  1                                            dog
5  1                                              5
                                          X3
1 very very long obnoxious character string here
2                                            dog
3                                            cat
4                                            dog
5                                              5

Answer 1

Consiglio una specie di modo esplicito come questo:

f <- function(x) data.frame(lapply(x, substr, 1, 5))

Uso:

> f(d)
  X1    X2    X3
1  1 very  very 
2  1   dog   dog
3  1   cat   cat
4  1   dog   dog
5  1     5     5

Sebbene sia possibile modificare il comportamento predefinito, non consiglio:

body(format.data.frame)[[5]] <- quote(for (i in 1L:nc) rval[[i]] <- substr(format(x[[i]], ..., justify = justify), 1, 5))
unlockBinding("format.data.frame", baseenv())
assign("format.data.frame", format.data.frame, pos = baseenv())
lockBinding("format.data.frame", baseenv())
rm(format.data.frame)

Uso:

> d
  X1    X2    X3
1  1 very  very 
2  1   dog   dog
3  1   cat   cat
4  1   dog   dog
5  1     5     5