मैं एक्सेल में आर के माध्यम से वर्तमान में की गई कुछ रिपोर्टिंग को स्वचालित करने के लिए एक्सपीएस का लाभ उठाने की कोशिश कर रहा हूं। मुझे आम तौर पर कुछ क्षेत्रों (कॉलम) के सापेक्ष कुछ समूह (पंक्तियों) में बहुत सारे मूल्यों को सारांशित करने की आवश्यकता होती है। मुझे सेल विवरण से छुटकारा पाना मुश्किल हो रहा है।

यहाँ एक उदाहरण है:

animals <- data.table(
  animal = c(1, 1, 2, 2, 3, 3, 4, 4),
  standing = c(1, 2, 1, 2, 1, 2, 1 ,2),
  height = c(50, 70, 75, 105, 25, 55, 10, 20)
)

animals <- expss::apply_labels(
  animals,
  animal = "animal",
  animal = c("cat" = 1, "dog" = 2, "turtle" = 3, "rat" = 4),
  standing = "standing",
  standing = c("no" = 1, "yes" = 2),
  height = "height"
)

expss::expss_output_viewer()

animals %>%
  expss::tab_cells(height) %>%
  expss::tab_cols(animal) %>%
  expss::tab_rows(standing) %>% 
  expss::tab_stat_sum(label = "") %>%
  expss::tab_pivot()

आप देखेंगे कि "ऊंचाई" एक लेबल के रूप में छपी है, कृपया मैं इससे कैसे छुटकारा पाऊं?

धन्यवाद!

1
codesaurus 15 नवम्बर 2019, 13:05

1 उत्तर

सबसे बढ़िया उत्तर

"|" लेबल के रूप में असाइन किया गया लेबल और चर नाम दोनों को दबाएं:

library(expss)
animals <- data.table(
    animal = c(1, 1, 2, 2, 3, 3, 4, 4),
    standing = c(1, 2, 1, 2, 1, 2, 1 ,2),
    height = c(50, 70, 75, 105, 25, 55, 10, 20)
)

animals <- expss::apply_labels(
    animals,
    animal = "animal",
    animal = c("cat" = 1, "dog" = 2, "turtle" = 3, "rat" = 4),
    standing = "standing",
    standing = c("no" = 1, "yes" = 2),
    height = "|"  # to suppress label
)

expss::expss_output_viewer()

animals %>%
    expss::tab_cells(height) %>%
    expss::tab_cols(animal) %>%
    expss::tab_rows(standing) %>% 
    expss::tab_stat_sum(label = "") %>%
    expss::tab_pivot()
2
Gregory Demin 15 नवम्बर 2019, 15:48