删除RpivotTable中的总计时出现问题
请有人帮我删除RpivotTable中出现的总计,如图所示。我也在添加代码。 其上卡久了,请引导 问候删除RpivotTable中的总计时出现问题,r,shiny,pivot-table,dashboard,rpivottable,R,Shiny,Pivot Table,Dashboard,Rpivottable,请有人帮我删除RpivotTable中出现的总计,如图所示。我也在添加代码。 其上卡久了,请引导 问候 library(rpivotTable) rpivotTable(data = mtcars, subtotals = FALSE, rows = c( "cyl"),cols=c("carb"), vals = "mpg", aggregatorName = "Sum", rendererName = "Table", width="50%", height="550px") 当前版本的r
library(rpivotTable)
rpivotTable(data = mtcars, subtotals = FALSE, rows = c( "cyl"),cols=c("carb"), vals = "mpg", aggregatorName = "Sum", rendererName = "Table", width="50%", height="550px")
当前版本的rPivottable不允许您删除总计,但下一个版本可能会删除。当前版本的rPivottable不允许您删除总计,但下一个版本可能会删除总计。我通过CSS实现了这样的工作(一种解决方法,因为只有显示是隐藏的):
mypivottable我是通过CSS(一种解决方法,因为只有显示是隐藏的)实现的:
mypivottable小计可以删除,显示在下面的第6行:
library(pivottabler)
pt <- PivotTable$new()
pt$addData(data)
pt$addColumnDataGroups("Date")
pt$addRowDataGroups("SKU.ID" , addTotal=FALSE)
pt$addRowDataGroups("Location" , addTotal=FALSE)
pt$renderPivot()
pt$defineCalculation(calculationName="Total Sales Qty", summariseExpression="sum(Sales_Qty, na.rm=TRUE)")
pt$defineCalculation(calculationName="TotalSalesQty")
pt$renderPivot()
库(数据透视表)
pt小计可以删除,显示在下面的第6行:
library(pivottabler)
pt <- PivotTable$new()
pt$addData(data)
pt$addColumnDataGroups("Date")
pt$addRowDataGroups("SKU.ID" , addTotal=FALSE)
pt$addRowDataGroups("Location" , addTotal=FALSE)
pt$renderPivot()
pt$defineCalculation(calculationName="Total Sales Qty", summariseExpression="sum(Sales_Qty, na.rm=TRUE)")
pt$defineCalculation(calculationName="TotalSalesQty")
pt$renderPivot()
库(数据透视表)
pt如果您添加
标记$style(.pvtTotalLabel.colTotal.rowTotal.pvtgrandtall{display:none;}”)
到用户界面。e、 g
ui <- fluidPage(
tags$style(
".pvtTotalLabel, .colTotal, .rowTotal, .pvtGrandTotal { display: none; }"
),
rpivotTableOutput("pivot_table", height = "100%")
)
ui如果您添加
标记$style(.pvtTotalLabel.colTotal.rowTotal.pvtgrandtall{display:none;}”)
到用户界面。e、 g
ui <- fluidPage(
tags$style(
".pvtTotalLabel, .colTotal, .rowTotal, .pvtGrandTotal { display: none; }"
),
rpivotTableOutput("pivot_table", height = "100%")
)
ui谢谢nicolas,你能告诉我下一个版本什么时候可用吗?我想再问你一件事,shiny应用程序的url没有加载,在日志中说内存不足,我不想最小化我的数据集,你能给我建议一个解决方案吗?嗨nicolas,我有两个问题。1) 如果不删除,是否可以隐藏总计?2) 我可以增加下拉列表的宽度吗?由于一些字符串很大,除非滚动到左边,否则在下拉列表中无法读取谢谢nicolas,你能告诉我下一个版本何时可用吗?我想再问你一件事,shiny应用程序的url没有加载,在日志中显示内存不足,我不想最小化我的数据集,你能给我建议一个解决方案吗?嗨nicolas,我有两个问题。1) 如果不删除,是否可以隐藏总计?2) 我可以增加下拉列表的宽度吗?因为有些字符串很大,除非向左滚动,否则在下拉列表中无法读取