डेटाटेबल में कॉलम का सारांश (पैकेज डीटी से)

Question

क्या इस उदाहरण में डेटाटाबल (डीटी पैकेज द्वारा प्रदत्त) के आर संस्करण में सारांश जोड़ने की संभावना है?

https://datatables.net/examples/advanced_init/footer_callback.html

Answer 1

सबसे पहले आप अपने datatable के लिए एक पाद लेख जोड़ने के लिए (कंटेनर पैरामीटर का उपयोग), और फिर जावास्क्रिप्ट कोड आप विकल्पों में से पैरामीटर के भीतर footerCallback समारोह (में जुड़े हुए सम्मिलित है डेटाटेबल)।

sketch <- htmltools::withTags(table(
    tableHeader(c('State', names(USArrests))), 
    tableFooter(rep('', 5)) 
)) 

#here is a copy of the javascript you had link 
opts <- list( 
    footerCallback = JS("function(row, data, start, end, display) {", 
     "var api = this.api(), data;", 
     "var intVal = function (i) {", 
      "return typeof i === 'string' ?", 
      "i.replace(/[\\$,]/g, '')*1 :typeof i === 'number' ?", 
      "i : 0;};", 
     "total = api", 
      ".column(3)", 
      ".data()", 
      ".reduce(function (a, b) {", 
      " return intVal(a) + intVal(b);", 
     " }, 0);", 
     "$(api.column(3).footer()).html('('+ total +' total)');", 
     "}")) 

datatable(USArrests, container = sketch, options = opts) 

:

यहाँ USArrests डेटासेट के साथ एक उदाहरण है