我一直在尝试创建一个自定义条形图,在其中可以更改每组的颜色和图案(条纹或无条纹)。
structure(list(Level= c(0.2, 0.3, 0.25, 0.35, 0.4, 0.5, 0.5, 0.6, 0.15, 0.35), Group= c("A", "A",
"B", "B", "C", "C", "D", "D",
"E", "E"), Condition = c("no", "yes", "no", "yes", "no", "yes", "no",
"yes", "no", "yes")), row.names = c(NA, -10L), class = c("tbl_df",
"tbl", "data.frame"))
Run Code Online (Sandbox Code Playgroud)
然而,我希望这两个组都是白色的,并且如果条件 == yes 的条形中有黑色条纹,就像 ggpattern 图中经常看到的那样。
使用 ggpattern 我找不到可行的解决方案 [Error in seq.default(from, to, by) : invalid '(to - from)/by'] 是我最常遇到的错误之一。
p<- ggplot(z, aes(fill=Condition, y=Level, x=Group, pattern = Condition)) +
geom_bar(position="dodge", stat="identity") +
ggpubr::theme_pubr() +
theme(legend.position …Run Code Online (Sandbox Code Playgroud) 我正在尝试创建一个带有 midrule 的表(cmidrule 跳过第一列),但是这个 cmidrule 的颜色与 hrule 不同。我无法使用像重新着色 midrule 那样的包来更改 cmidrule 的颜色。
\begin{tabular}{lcccc}
\hline
& \multicolumn{2}{c}{Value-Weighted} & \multicolumn{2}{c}{Equal-Weighted}\\
\cmidrule{2-5}
& Equity Premium & Information Ratio & Equity Premium & Information Ratio \\
\hline
\end{tabular}
Run Code Online (Sandbox Code Playgroud)
我希望表格中的线条颜色相同(请注意,我在文档中的任何地方都使用 hrule,因此最好使用 hrule 的颜色)