From 4b1669087803263579613bc21b221912e4a604a7 Mon Sep 17 00:00:00 2001 From: Michael Chirico Date: Fri, 24 Oct 2025 11:35:36 -0700 Subject: [PATCH] Change 'x' argument for clarity --- R/describe.s | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/R/describe.s b/R/describe.s index dec9c64..5ba0116 100644 --- a/R/describe.s +++ b/R/describe.s @@ -1431,12 +1431,12 @@ html_describe_con <- function(x, sparkwidth=200, ## If the variable was transformed, also put in the leftmost tooltip ## the name of the transformation - g <- function(x) { - trans <- x$trans + g <- function(u) { + trans <- u$trans lo <- if(length(trans)) paste0('Transformation for
histogram:', trans[[1]]) - gv <- x$gridvalues + gv <- u$gridvalues val <- gsub('; ', '
', gv$values) spikespark(val, gv$frequency, ttlow=lo, w=sparkwidth, cumulative=TRUE, xpre='')