我用ggplot2创建了两个透明的重叠直方图.
test = data.frame(condition = rep(c("a", "b"), each = 500), value = rep(-1, 1000))
test[1:500,]$value = rnorm(500)
test[501:1000,]$value = rnorm(500) + 2
fig = ggplot(test, aes(x = value, fill = condition)) +
#scale_fill_grey() +
geom_histogram(position = "identity", alpha = .5)
fig
结果情节看起来很棒,但它是彩色的.我需要灰度或黑/白情节.
使用"scale_fill_grey()"会导致具有透明度的图表非常难以"阅读".
理想情况下,我想要一个使用纹理而不是颜色的黑/白图,例如,交叉影线:"///"表示一个条件,"\\\"表示另一个条件,当条形图产生"XXX"交叠.这可能吗？
我有一个包含许多列的.csv数据文件。不幸的是，字符串值没有引号（即apples io“ apples”）。当我使用readr包中的read_csv时，字符串值将作为字符导入：
library(readr)
mydat = data.frame(first = letters, numbers = 1:26, second = sample(letters, 26))
write.csv(mydat, "mydat.csv", quote = FALSE, row.names = FALSE)
read_csv("mydat.csv")
结果是：
Parsed with column specification:
cols(
first = col_character(),
numbers = col_integer(),
second = col_character()
)
# A tibble: 26 x 3
first numbers second
<chr> <int> <chr>
1 a 1 r
2 b 2 n
3 c 3 m
4 d 4 z
5 e 5 p
6 f 6 j
7 g 7 …