mirror of
https://github.com/rstudio/shiny.git
synced 2026-01-07 22:24:02 -05:00
chore(check): Fix minor check warnings (#4299)
This commit is contained in:
@@ -32,3 +32,4 @@
|
||||
^eslint\.config\.mjs$
|
||||
^_dev$
|
||||
^.claude$
|
||||
^README-npm\.md$
|
||||
|
||||
@@ -70,7 +70,7 @@
|
||||
"coverage_detailed": "npx --yes type-check --detail",
|
||||
"coverage": "type-coverage -p tsconfig.json --at-least 90",
|
||||
"circular": "npx --yes dpdm --transform ./srcts/src/index.ts",
|
||||
"prepack": "cp README.md README-orig.md && cp npm-README.md README.md",
|
||||
"prepack": "cp README.md README-orig.md && cp README-npm.md README.md",
|
||||
"postpack": "test -f README-orig.md && cp README-orig.md README.md && rm README-orig.md"
|
||||
},
|
||||
"prettier": {
|
||||
|
||||
@@ -348,12 +348,20 @@ test_that("ggplot coordmap with various scales and coords", {
|
||||
sortList(list(left=10, right=20, bottom=0, top=5))
|
||||
)
|
||||
|
||||
coord_transform_universal <- function(...) {
|
||||
if (packageVersion("ggplot2") >= "4.0.0") {
|
||||
coord_transform(...)
|
||||
} else {
|
||||
coord_trans(...)
|
||||
}
|
||||
}
|
||||
|
||||
# Log scales and log coord transformations
|
||||
dat <- data.frame(xvar = c(10^-1, 10^3), yvar = c(2^-2, 2^4))
|
||||
p <- ggplot(dat, aes(xvar, yvar)) + geom_point() +
|
||||
scale_x_log10(expand = c(0 ,0)) +
|
||||
scale_y_continuous(expand = c(0, 0)) +
|
||||
coord_trans(y = "log2")
|
||||
coord_transform_universal(y = "log2")
|
||||
png(tmpfile)
|
||||
m <- getGgplotCoordmap(print(p), 500, 400, 72)
|
||||
dev.off()
|
||||
|
||||
Reference in New Issue
Block a user