- html - 出于某种原因,IE8 对我的 Sass 文件中继承的 html5 CSS 不友好?
- JMeter 在响应断言中使用 span 标签的问题
- html - 在 :hover and :active? 上具有不同效果的 CSS 动画
- html - 相对于居中的 html 内容固定的 CSS 重复背景?
只是想了解 geom_abline 如何与 ggplot 中的方面一起工作。
我有一个学生考试成绩数据集。这些位于具有 4 列的数据表 dt 中:
student: unique student ID
cohort: grouping factor for students (A, B, … H)
subject: subject of the test (English, Math, Science)
score: the test score for that student in that subject
library(data.table)
## cohorts: list of cohorts with number of students in each
cohorts <- data.table(name=toupper(letters[1:8]),size=as.numeric(c(8,25,16,30,10,27,13,32)))
## base: assign students to cohorts
base <- data.table(student=c(1:sum(cohorts$size)),cohort=rep(cohorts$name,cohorts$size))
## scores for each subject
english <- data.table(base,subject="English", score=rnorm(nrow(base), mean=45, sd=50))
math <- data.table(base,subject="Math", score=rnorm(nrow(base), mean=55, sd=25))
science <- data.table(base,subject="Science", score=rnorm(nrow(base), mean=70, sd=25))
## combine
dt <- rbind(english,math,science)
## clip scores to (0,100)
dt$score<- (dt$score>=0) * dt$score
dt$score<- (dt$score<=100)*dt$score + (dt$score>100)*100
library(ggplot2)
library(Hmisc)
ggp <- ggplot(dt,aes(x=cohort, y=score)) + ylim(0,100)
ggp <- ggp + stat_summary(fun.data="mean_cl_normal")
ggp <- ggp + geom_abline(aes(slope=0,intercept=mean(score)),color="blue",linetype="dashed")
ggp <- ggp + facet_grid(subject~.)
ggp
means <- dt[,list(mean.score=mean(score)),by="subject"]
ggp <- ggplot(dt,aes(x=cohort, y=score)) + ylim(0,100)
ggp <- ggp + stat_summary(fun.data="mean_cl_normal")
ggp <- ggp + geom_abline(data=means, aes(slope=0,intercept=mean.score),color="blue",linetype="dashed")
ggp <- ggp + facet_grid(subject~.)
ggp
最佳答案
这应该做你想做的。 stat_*
函数对每个方面使用不同的数据集合。我认为在 aes
中的任何表达式的geom_*
函数旨在用于每个 y 值的转换。
ggplot(dt,aes(x=cohort, y=score)) +
stat_summary(fun.data="mean_cl_normal") +
stat_smooth(formula=y~1,aes(group=1),method="lm",se=FALSE) +
facet_grid(subject~.) + ylim(0,100)
关于r - geom_abline 似乎不尊重 facet_grid [ggplot2] 中的组,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/19985661/
使用 geom_abline(...)(以及 geom_vline 和 geom_hline)是否会在使用时导致同一行的多次叠加“天真”? 例如,假设我们对以下多面散点图感兴趣: library(gg
我想在图例中通过 geom_abline 显示添加的行,因为条形图在 x 轴标签中表示。 真尴尬,不知道我怎么忘了玩具数据。我还清理了示例,确保我运行的是最新版本的 R 和 ggplot(并 resh
我正在尝试在使用geom_abline创建的线条之间创建阴影区域 require(ggplot2) val_intcpt % mutate(y = intcpt + ss * x) # add p
这是我的数据集的结构: > dput(data) structure(list(es = c(0.29603085763985, 0.421393627439682, 0.18965347315654
我一直在为 geom_abline 苦苦挣扎与 scale_x_reverse 结合使用时的命令. 例如,以下代码在标识之后创建 10 个点的图。我可以用 scale_x_reverse 反转 x 轴
我是初学者ggplot2 ——从我开始尝试它到现在才 4 天。因此,如果这个问题听起来太基本,我深表歉意。我很感激任何指导——我一直在为这个问题苦苦挣扎大约一个小时。 我正在尝试使用 geom_abl
目标:为 geom_point 创建一个颜色图例,为每个组显示一个彩色点,为 geom_abline 创建一个图例,为每条线显示一条彩色线。 我做错了什么吗?有解决办法吗? # data: mtcar
有few posts关于在 ggplot2 中使用阴影区域,但我认为没有人能准确回答我的问题。我有两个斜率用于跨越许多条件的线,我想对它们之间的区域进行阴影处理。以下是示例数据: dat <- dat
我想画两个不同的geom_abline在我的两个方面。这似乎与 geom_hline 的工作方式不同 - 已回答 here . 同时 library(ggplot2) dummy1 <- expand
我正在尝试为以下情节准备图例,虚线后跟 A,虚线后跟 B。它显示不正确。由于我有 2 个审美,它有时只显示一种线型,有时什么都不显示。我使用了 scale_linetype_manual() 和 gu
我在使用 geom_abline 时遇到错误在与 facet_wrap 相同的情节中或 facet_grid ,我不明白为什么。例如 # Example data ex <- data.frame(x
我想画两个不同的geom_abline在我的两个方面。这似乎与 geom_hline 的工作方式不同 - 已回答 here . 同时 library(ggplot2) dummy1 <- expand
只是想了解 geom_abline 如何与 ggplot 中的方面一起工作。 我有一个学生考试成绩数据集。这些位于具有 4 列的数据表 dt 中: student: unique student ID
我有回归线的斜率和截距的 R 代码。它看起来像这样: A <- lm(formula=A~B,data=Averages) 我明白了: Coefficients: (Intercept) B
有谁知道 geom_abline() 中的哪个论点?负责不影响 x 和 y 尺度? 函数draw_panel()带我 GeomAbline获取底层的“范围”,但该线通常应该位于原始比例之外: Geom
我是一名优秀的程序员,十分优秀!