用r语言回避
我正在尝试生成以下数据的柱状图(数据来自sqlserver数据库) 我试着用躲闪的方式来控制阴谋。我希望我能得到多个直方图,但我得到了一个直方图用r语言回避,r,ggplot2,R,Ggplot2,我正在尝试生成以下数据的柱状图(数据来自sqlserver数据库) 我试着用躲闪的方式来控制阴谋。我希望我能得到多个直方图,但我得到了一个直方图 > qplot(value, data=Data, geom = "bar", fill = temp, position = "dodge") 为了验证数据中有两种不同的温度,我生成了一个温度直方图 > qplot(temp,data=Data,geom="bar") 我还生成了一个值的直方图,它与上面的第一个图相同。 为了验证我的
> qplot(value, data=Data, geom = "bar", fill = temp, position = "dodge")
为了验证数据中有两种不同的温度,我生成了一个温度直方图
> qplot(temp,data=Data,geom="bar")
我还生成了一个值的直方图,它与上面的第一个图相同。
为了验证我的命令,我生成了一个带有一些示例数据的图形,我使用的命令似乎还可以
> head(SampleData)
val cat
1 1 a
2 2 a
3 3 a
4 4 a
5 4 a
6 2 a
请帮助我找到问题用于定义这两个组的变量应该是一个
因子
# Sample data
n <- 100
d <- sample( c(TRUE,FALSE), n, replace=TRUE )
d <- data.frame(
value = ifelse(d, 10, 30 ) + 10 * rnorm(n),
temp = ifelse(d,0,97)
)
# Make sure temp is a factor
p <- ggplot(d, aes(x=value, fill=factor(temp)))
p + geom_histogram(position="stack")
p + geom_histogram(position="dodge")
#示例数据
太好了,非常感谢。我将尝试在文档中找到更多关于这些因素的信息
# Sample data
n <- 100
d <- sample( c(TRUE,FALSE), n, replace=TRUE )
d <- data.frame(
value = ifelse(d, 10, 30 ) + 10 * rnorm(n),
temp = ifelse(d,0,97)
)
# Make sure temp is a factor
p <- ggplot(d, aes(x=value, fill=factor(temp)))
p + geom_histogram(position="stack")
p + geom_histogram(position="dodge")