df1 <-
structure(
list(
Z = structure(
1:5, .Label = c("A", "B", "C", "D",
"E"), class = "factor"
), H1 = c(0L, 0L, 0L, 0L, 0L), X1 = c(178L,
182L, 197L, 177L, 163L), H2 = c(0L, 0L, 0L, 0L, 0L), X2 = c(85L,
77L, 66L, 68L, 86L), X3 = c(320L, 344L, 332L, 311L, 322L)
), class = c("tbl_df",
"tbl", "data.frame"), row.names = c(NA,-5L), .Names = c("Z",
"H1", "X1", "H2", "X2", "X3")
)
有没有办法告诉DT::datable隐藏只有零的列？在这种情况下H1，H2
我可以做这个：
library(DT)
df1 %>%
datatable(rownames = F,
extensions = 'ColVis', options = list(
dom = 'C<"clear">lfrtip',
colVis = list(exclude = c(0), activate = 'mouseover')
))
然后手动隐藏这些列。
如果df1是data.frame，则可以执行以下操作：
df1[, colSums(df1 != 0) > 0]
本文收集自互联网，转载请注明来源。
如有侵权，请联系[email protected] 删除。
我来说两句