小编Vin*_*lix的帖子
更改默认 ggsave 背景颜色
我遇到一个问题，几个月前， 的行为ggsave()似乎发生了变化，默认为透明背景而不是白色背景。例如这段代码：
box_plot <-ggplot(vaccine_data_summary, aes(y = vaccine_uptake, x = region)) +
geom_boxplot(outlier.shape = NA)
ggsave("box_plot.png", plot = box_plot, width = 1200, height = 675, units = "px", scale = 2)
结果是透明背景。为了解决这个问题，我添加了背景参数。
ggsave("box_plot.png", plot = box_plot, width = 1200, height = 675, units = "px", bg = "white", scale = 2)
但是，我更愿意再次将默认值设置为白色，这样我就不必更新所有旧代码。
10
推荐指数
推荐指数
1
解决办法
解决办法
6216
查看次数
查看次数
ggplots geom_tile 中的圆角可能吗？
是否可以为ggplot2geom_tile图层中的图块制作圆角？
带标准边缘的示例：
df <- data.frame(
x = rep(seq(2, 15, 6.5), 2),
y = c(rep(6.5, 3), rep(2,3)),
h = rep(4.25, 6),
w = rep(6.25, 6),
info= rep("boring\ntiles", 6),
color = factor(c(rep(1,3), rep(2,3)))
)
ggplot(df, aes(x, y, height = h, width = w, label = info)) +
geom_tile(aes(fill = color), alpha=0.83) +
geom_text(color = "white", fontface = "bold", size = 8,
aes(label = info, x = x - 2.9, y = y - 1), hjust = 0)
8
推荐指数
推荐指数
1
解决办法
解决办法
1148
查看次数
查看次数
如何在 R 中使用 Tabulizer 从 pdf 中提取表格时解决 Java 错误
我正在尝试pdf使用tabulizer中的包从 a 中提取表R。我运行以下行：
table <- extract_tables('https://fm.dk/media/17137/oekonomisk-redegoerelse-august-2019_weba.pdf', pages = 20)
但是我不断收到此错误：
.jcall("RJavaTools", "Ljava/lang/Object;", "invokeMethod", cl, 中的错误：java.lang.IllegalAccessException：类 RJavaTools 无法访问类 java.util.ArrayList$Itr 的成员（在模块 java 中） .base) 带有修饰符“public”
我能够从 中提取元数据pdf，所以我很确定这不是软件包安装的问题tabulizer，而是一个java问题，我对此不是很有经验。
5
推荐指数
推荐指数
1
解决办法
解决办法
895
查看次数
查看次数
为什么我的 R 与 rowSums 一起变异不起作用（错误：“mutate()”输入“..2”出现问题。x“x”必须是数字？输入“..2”是“rowSums(.)”。） ？
我正在尝试学习如何使用across()R 中的函数，并且我想用rowSums()它做一个简单的事情。但是，我不断收到此错误：
\n\n错误：
\nmutate()输入有问题..2。x 'x' 必须是数字 \xe2\x84\xb9\n输入..2为rowSums(., na.rm = TRUE)。
然而，我所有相关的列都是数字。任何帮助任何解释我为什么会收到此错误的信息将不胜感激！
\n这是一个可重现的示例：
\nlibrary(dplyr)\ntest <- tibble(resource_name = c("Justin", "Corey", "Justin"),\n project = c("P1", "P2", "P3"),\n sep_2021 = c(1, 2, NA),\n oct_2021 = c(5, 2, 1))\n\n\ntest %>%\n select(resource_name, project, sep_2021, oct_2021) %>%\n mutate(total = across(contains("_20")), rowSums(., na.rm = TRUE))\n这就是我要去的原因
\nanswer <- tibble(resource_name = c("Justin", "Corey", "Justin"),\n project = c("P1", "P2", …4
推荐指数
推荐指数
1
解决办法
解决办法
1611
查看次数
查看次数
在 R 中制作 WCS Munsell 颜色图表，scale_fill_manual、ggplot2 中的顺序问题
我想为世界色彩调查所使用的芯片制作孟塞尔色彩图表。它应该看起来像这样：
需要的信息可以在WCS页面上找到，这里，我采取以下步骤：
library(munsell) # https://cran.r-project.org/web/packages/munsell/munsell.pdf
library(ggplot2)
# take the "cnum-vhcm-lab-new.txt" file from: https://www1.icsi.berkeley.edu/wcs/data.html#wmt
# change by replacing .50 with .5 removing .00 after hue values
WCS <- read.csv("cnum-vhcm-lab-new.txt", sep = "\t", header = T)
WCS$hex <- mnsl2hex(hvc2mnsl(hue = WCS$MunH, value = ceiling(WCS$MunV), chroma = WCS$C), fix = T)
# this works, but the order of tiles is messed up
ggplot(aes(x=H, y=V, fill=hex), data = WCS) +
geom_tile(aes(x=H, y=V), show.legend = F) +
scale_fill_manual(values = WCS$hex) +
scale_x_continuous(breaks = …2
推荐指数
推荐指数
1
解决办法
解决办法
321
查看次数
查看次数