如何结合geom_smooth()来确定x轴和y轴？
结合geom_smooth()来确定x轴和y轴，需要考虑以下几个方面：
- 数据类型：首先要确定x轴和y轴的数据类型。如果是连续型数据，可以使用geom_smooth()函数进行平滑拟合；如果是离散型数据，可以考虑使用其他类型的图形来展示。
- 平滑方法：geom_smooth()函数提供了多种平滑方法，如线性回归、局部加权回归、多项式回归等。根据数据的特点和需求，选择合适的平滑方法。
- 参数设置：geom_smooth()函数还可以通过设置参数来调整平滑曲线的样式和拟合程度。常用的参数包括span（局部加权回归的平滑度）、method（平滑方法）、se（是否显示置信区间）等。
- 数据分组：如果需要根据某个变量对数据进行分组展示，可以使用ggplot2中的facet_wrap()或facet_grid()函数来实现。这样可以在同一图中同时展示多个平滑曲线，每个曲线对应不同的数据分组。
综上所述，结合geom_smooth()来确定x轴和y轴，需要根据数据类型选择合适的平滑方法，并通过调整参数和数据分组来达到所需的展示效果。
腾讯云相关产品和产品介绍链接地址：
- 腾讯云计算服务：https://cloud.tencent.com/product
- 腾讯云数据库：https://cloud.tencent.com/product/cdb
- 腾讯云服务器：https://cloud.tencent.com/product/cvm
- 腾讯云人工智能：https://cloud.tencent.com/product/ai
- 腾讯云物联网：https://cloud.tencent.com/product/iot
- 腾讯云移动开发：https://cloud.tencent.com/product/mobdev
- 腾讯云存储：https://cloud.tencent.com/product/cos
- 腾讯云区块链：https://cloud.tencent.com/product/bc
- 腾讯云元宇宙：https://cloud.tencent.com/product/mu
相关·内容
2回答
你好，我不能用我想要的方式得到这张图。我知道你不应该在一幅图上画两个y轴，但是，这是为了一堂课，我要让学生在这张图上画一条预测的线。我需要两个y轴分别以0和50为中心。理想情况下，我希望将第一个y轴图扩展到+7，尽管这并不是必要的。
library(tidyverse)
date<-seq.Date(from=as.Date('1998-01-21'), to=as.Date('1998-02-1'), by='days')
tone<-c(-7.2, -6.3, -1.1, -2.8, 0.8, -2.5, 1.5,3.1, -
浏览 2提问于2021-02-02得票数 0
2回答
我试图用lm()函数的估计值，绘制出一个年龄在x轴的曲线，y轴的预期血清尿酸，以及男性/白人、女性/白人、男性/黑人、女性/黑人的线条。
goutdata <- read.table("gout.txt", header = TRUE)
goutdata$sex <- factor(goutdata$sex,levels = c("M", "F"))
goutdata$race <- as.factor(goutdata$race)
fm <- lm(su~sex+race+age, data = goutdata)
浏览 2提问于2018-11-11得票数 2
回答已采纳
2回答
目前，我使用绘制一个具有一个公共x和两个不同y轴的图：
library(ggplot2)
library(scales)
scaleFactor <- max(mtcars$cyl) / max(mtcars$hp)
ggplot(mtcars, aes(x=disp)) +
labs(title = "My Plot") +
geom_smooth(aes(y=cyl), method="loess", col="blue") +
geom_smooth(aes(y=hp * scaleFactor), method=
浏览 2提问于2018-12-06得票数 0
回答已采纳
我试图用伽马误差分布来绘制一个geom_smooth。
library(ggplot)
data <- data.frame(x = 1:100, y = (1:100 + runif(1:100, min = 0, max = 50))^2)
p <- ggplot(data, aes(x, y)) +
geom_point() +
geom_smooth(method = 'glm', method.args = list(family = Gamma(link = "log")))
我也希望使用scale_y_revers
浏览 8提问于2022-07-05得票数 1
回答已采纳
1回答
我在ggplot上绘制了一个时间序列数据，年在x轴，雨水在y轴上。我想在这个图上覆盖一条趋势线(这条趋势线的方程是rain = 2.6*Year + 23)。我的坡度是用泰尔森法计算出来的，我怎样才能把它叠加在我的地图上呢？
到目前为止我的代码是
ggplot(data = Datarain, aes(x = year, y = rain)) +
geom_smooth(color="red", formula = y ~ x) +
geom_smooth(method = "lm", se=FALSE color="blue", f
浏览 2提问于2014-10-15得票数 0
回答已采纳
我绘制了一个散点图，并在上面拟合了一条线；现在我需要更改x轴的刻度级别标签，这是连续的。数据： y <- data.frame(a = 1:5, b = 5:9)
> y
a b
1 1 5
2 2 6
3 3 7
4 4 8
5 5 9 我把它画出来： ggplot(y, aes(a, b))+
geom_jitter()+
stat_summary(fun.data = mean_cl_normal)+
geom_smooth(method = 'lm', formula = y~x) ? 这还不错，但我需
浏览 7提问于2020-01-12得票数 0
回答已采纳
1回答
我想把这些画出来。
subj type stc key value
1 2 1 1 X1 94.30562
2 2 1 7 X1 94.30104
3 2 2 1 X1 95.26288
4 2 2 7 X1 94.66240
5 3 1 1 X1 89.52976
6 3 1 7 X1 88.52011
在这里，需要五个人(子j)在两种类型的intonations.On中分别表示sentence1和sentence7，其中有60个关键点(x1-x60)，其中提取频率值。
我
浏览 1提问于2020-06-27得票数 1
回答已采纳
1回答
除了定义变量的趋势线之外，我还如何使用GGPLOT包括一个总体趋势线？
我的数据是用任期(x轴)来绘制封闭度(y轴).每项观察都有一个额外的变量，即“性别”。
前2行数据如下。我目前的代码包括按“性别”划分的颜色，以及每个颜色的趋势线(M / F)。是否有可能同时为完整的数据包括第三个“汇总”趋势线(即不是按性别划分的子集)？
No. Gender Tenure Closeness
1 M 3 .3
2 F 5 .5
ggplot(B, aes(x=Ten
浏览 0提问于2016-10-06得票数 1
回答已采纳
1回答
我有一个简单的图表，x轴上是年份，y轴上是人口。为什么年份的末尾有小数点？我不确定如何格式化它。它是数据框中的一个数字。 dput(head(that[,c("year","pop")]))
structure(list(year = c(2010, 2011, 2012, 2013, 2014, 2015),
pop = c(9574323, 9657592, 9749476, 9843336, 9932887, 10031646
)), row.names = c("1", "2", "3", "
浏览 14提问于2020-03-25得票数 1
回答已采纳
1回答
我需要在相同的轴上绘制两个回归图。为此，我的数据集中有3列(让我们称它们为A、B& C)。我想用B对A，然后C对A，把它们作为不同的颜色回归线，数据点和它们的对应线是相同的颜色。
更确切地说，为了创建单独的情节，我对第一个代码使用了以下代码：
P1 <- ggplot(data=volboth, aes(x=control, y=vol30)) +
geom_point(alpha=1, size=4, color="maroon") +
ggtitle("Correlation Plot: Ground Survey (Control) vs 30m
浏览 6提问于2015-10-31得票数 0
回答已采纳
我遇到了一个问题，geom_smooth()在我的ggplot2上不起作用。但是，不是平滑的曲线，而是折叠。 ? 我的X轴变量是factor变量(我试图将其转换为数值变量，但没有成功)，而Y轴是数值变量。我的data.frame是 ? ? ggplot(tmp, aes(x = x, y = y))+
geom_point()+
geom_smooth(formula = y ~ x, method = "loess", stat = "identity", se = T, group = "") 我希望能拍到这样的照片。 ?
浏览 121提问于2019-08-24得票数 3
回答已采纳
我有以下data.frame：
prv <- data.frame(mese = as.Date(c( "2020-09-01", "2020-10-01" ,"2020-11-01","2020-12-01" ,
"2021-01-01" ,"2021-02-01", "2021-03-01" ,"2021-04-01")),
cumulato = c(
浏览 10提问于2021-07-16得票数 0
回答已采纳
2回答
我有一个问题，黄土线正确地显示在地理位置。我有几个变量，它们都不能低于零，例如高度、重量和丰度。我试图用黄土线来绘制这个数据。使用一些虚构的数据：
library(ggplot2)
df <- as.data.frame(rep(1:7, each = 5))
df[,2] <- c(0,1,5,0,6,0,7,2,9,1,1,18,4,2,34,8,18,24,56,12,12,18,24,63,48,
40,70,53,75,98,145,176,59,98,165)
names(df) <- c("x", "y")
浏览 2提问于2018-05-22得票数 5
回答已采纳
2回答
我是R的新手，我正在尝试使用geom_smooth(method=lm)在ggplot中拟合回归线。
我碰巧注意到，对于相同的数据集，当轴从线性-线性变为线性-对数和对数-对数时，回归线的斜率会发生变化，以至于y-截距不同，相关性也不真实。
数据(r)的相关系数为-0.125
conc <- c(1.5188717, 1.8794363, 2.5455899, 1.5810686, 0.4938004, 2.9526288)
absp <- c(6.975519, 2.279606, 2.265391, 1.611868, 1.379097, 1.324827)
mydata &l
浏览 6提问于2016-07-26得票数 2
我有一个有三列的数据框' data‘。第一列标识化合物，第二列标识化合物的浓度，第三列是我的测量数据，称为“面积”。 # A tibble: 12 x 3
Compound Conc Area
<chr> <dbl> <dbl>
1 Compound 1 0 247
2 Compound 1 5 44098
3 Compound 1 100 981797
4 Compound 1 1000 7084602
5 Compound 2 0
浏览 22提问于2019-05-02得票数 0
在plotly包中，我使用ggplot()函数和ggplotly()函数。我想用x轴上的CWD数量和y轴上的草坪量创建一个散点图。每个散点图应有三条线，反映每年的线性关系(2013年、2014年、2015年)。每年草坪有10分，CWD每年有10分。我的数据样本如下：
Year CWD Lawn
1 2013 0 420
2 2013 6 390
3 2013 14 410
4 2013 12 349
5 2013 3 348
6 2013 46 354
7 2013 121 311
8 2013 56 381
9
浏览 3提问于2016-09-21得票数 3
回答已采纳
1回答
我试着在单X轴上绘制双条图，如何实现呢？我知道如何处理线图。例如，我正在使用mtcars数据。另外，我想在那个条形图中添加图例和错误行。
library(ggplot2)
scaleFactor <- max(mtcars$cyl) / max(mtcars$hp)
ggplot(mtcars, aes(x=disp)) +
geom_smooth(aes(y=cyl), method="loess", col="blue") +
geom_smooth(aes(y=hp * scaleFactor), method="loess
浏览 5提问于2022-04-18得票数 0
我有这个dataframe。 我创建了一个绘图，在y轴"value“和x轴上表示"Column_S”的每个级别，其中包含从S1到S10的级别。所有这些都通过"VS“和"Inst”(带有facet_grid)和"Estatus“与颜色进行分组。 na.omit(data) %>%
group_by(VS,Estatus,Inst, Columna_S) %>%
summarise(media = mean(value),
desvio = sd(value),
浏览 23提问于2021-02-06得票数 1
回答已采纳
我有两个x轴相同的图--x的范围都是0-5。我想把它们合并到一个图中，但我没有找到前面的例子。下面是我得到的信息：
c <- ggplot(survey, aes(often_post,often_privacy)) + stat_smooth(method="loess")
c <- ggplot(survey, aes(frequent_read,often_privacy)) + stat_smooth(method="loess")
如何将它们组合在一起？Y轴是“经常保密的”，而在每个图中，x轴是“经常发布”或“频繁阅读”。我认为我可以很容易
浏览 0提问于2012-06-28得票数 5
回答已采纳
2回答
我有一个data.frame，我收集的数据是秒，我把它画在y轴上。然而，当我想要绘制这些数据时，我希望它以毫秒作为y轴上的单位。
如何修改y轴中的值，使它们比实际发生的数据大1000倍，而所绘制的点却保持不变？
这是我目前使用的代码：
ggplot(DSRCdelay_cl, aes(x=numVehicles, y=value, colour=as.factor(clusteringDistance) ) ) +
geom_smooth(fill=NA, aes(group=clusteringDistance, size=0 ) ) +
xlab(expression(
浏览 3提问于2015-05-02得票数 1
回答已采纳
我想用两个y轴绘制一个图，并在每组中添加两条线性回归线。我在这个网站上看到了一些方法，对我来说很容易得到两个y轴的点。但是我不能控制线性回归线。我想做的图如下：
我的数据如下：
ggplot(plotdata) + geom_point(aes(x,z),colour="green") +
geom_smooth(aes(x,y), method=lm, se=FALSE,colour="green") +
geom_point(aes(x,y*100), colour="red") +
geom_smoo
浏览 1提问于2018-07-29得票数 0
1回答
我想从多次试验的曲线中估计出一个“平均曲线”。在使用大约x()之前，我已经这样做了，但是之后我有了一组固定的x轴值，并根据这些值来测量y。
在这个数据集中，x和y的值都是混合的(也就是说，x没有固定的值，而y已经被测量过)。相反，每次试验都有不同的x值集。
在这些情况下(有标准误差)有没有一种平均曲线的方法？
或者:如何从不同的曲线中提取y-值(对于一组固定的x-值)并构造一个新的数据格式？
我提供了一个样本数据集(融化)-和代码，为个别试验绘制曲线。P1，P2，P3，P4，P5个人审判的姓名/ID
> dput(head(dat,74))
structure(list(ID =
浏览 2提问于2018-06-13得票数 0
这个问题以前是以不同的形式提出的，指的是连续变量，而不是离散变量。因此，我认为有理由提出一个新的问题。
我有一个在x轴上的时间点和y轴上的得分的图。
Dose <- rep(c("Time1", "Time2", "Time3", "Time4", "Time5"), 4)
ID <- rep(1:4, each = 5)
set.seed(123)
Score <- rnorm(20, 10, 3)
df <- data.frame(ID, Dose, Score)
p <- gg
浏览 4提问于2016-02-23得票数 0
回答已采纳
我有一个图，我想改变span参数，但我看不到在每个数据中超过1000的lines.My观测值有什么不同。
我使用了以下代码：
ggplot(data, aes(x=, y=)) + geom_smooth(aes(color="KHRC"),se = FALSE, span = 0.3)+
geom_smooth(data=GO1,aes(color="GO1"),se = FALSE, span = 0.3)+
geom_smooth(data=GO2,aes(color="GO2"),se = FALSE, span = 0.3)+
浏览 5提问于2017-10-05得票数 0
1回答
根据EwoutW.Steyerberg的临床预测模型，我们有以下几点：
校准图在x轴上有预测，在y轴上有结果。一条身份线有助于定位:完美的预测应该在45°线上。对于线性回归，校准图的结果是简单的散点图。对于二进制结果，图中只包含y轴的0和1值。概率不是直接观察到的。然而，平滑技术可以用来估计结果的观测概率(p(y= 1))与预测概率之间的关系。所观察到的0/1结果被0到1之间的值所代替，方法是将受试者的结果值与相似的预测概率相结合，例如使用黄土算法。
我用二元结果拟合了一个logistic回归模型。下面是一个示例代码。校准曲线看起来很奇怪，因为样品太小了。我主要想知道这个方法是否正确。
浏览 0提问于2018-09-03得票数 1
3回答
因子内的网格
、、、
考虑像这样的数据
fitem<-rep(rep(1:16,each=3),2)
fsubs<-factor(rep(rep(paste('sub',1:3,sep=''),16),2))
ftime<-factor(as.character(rep(c('a','b'),each=48)))
fcounts<-as.numeric(round(runif(96,1,10)))
fdf<-data.frame(fsubs,fitem,fcounts,ftime)
head(df)
fsubs
浏览 1提问于2020-06-08得票数 1
回答已采纳
我正在绘制一条geom_smooth线，并希望添加一条地毯。Y的可变性比平均值大得多，因此当只绘制平滑线时，y尺度从实际数据范围减小。当我在底部添加一块地毯时，它会重新缩放y轴，就好像y轴上也有一块地毯一样，这使得很难看到平滑线条之间的关系。
示例：
ggplot(diamonds, aes(y=carat, x=price, color=cut)) +
geom_smooth(se=F, method='lm')
上面的操作将y轴缩放到大约0到3的范围。
仅将地毯添加到底部：
ggplot(diamonds, aes(y=carat, x=price, color=
浏览 1提问于2013-02-28得票数 2
回答已采纳
1回答
我有一个geom_smooth，它有一个x轴日期，y轴COVID情况，然后是两个类别。我在试着画出最大峰值。
# Reproducible data
library(tidyverse)
df <- tribble(~date, ~cases, ~category,
"2021/1/1", 100, "A",
"2021/1/1", 103, "B",
"2021/1/2", 108, "A",
浏览 4提问于2022-02-17得票数 3
1回答
我试图用R中的ggplot2制作一个对数x轴和正常缩放y轴的图形，这一切都很好，但是当我用model="lm“添加一个更平滑的图时，我会遇到问题。
我想要的是，在进行日志转换之前，先通过数据拟合一个线性模型，然后再进行日志转换，这样，由geom_smooth拟合的直线应该是弯曲的，而不是直线。我已经找到了一种用coord_trans(x="log10")来完成这个任务的方法，但是如果我这样做的话，x轴的勾号就会被弄乱。
到目前为止，我得到的是：
require(ggplot2)
require(colorspace)
require(scales)
C<-c(2
浏览 1提问于2015-03-26得票数 2
回答已采纳
1回答
我已经从应答的中重新创建了这个图。但我想知道如何用平滑的图覆盖或替换条形图，即将X轴上的点连接在一起。如果它们是用来代替条形的，那么用颜色填充它会很好。我试过使用geom_smooth，但我不能让它做我想做的事情，如果能帮上忙，我将不胜感激。下面是我正在讨论的问题的情节和代码。
set.seed(1)
df0 <- data.frame(Age = factor(rep(x = 1:10, times = 2)),
Gender = rep(x = c("Female", "Male"), each = 10),
浏览 2提问于2016-05-16得票数 4
我有一个数据帧x1，它是用下面的代码生成的，
x <- c(1:10)
y <- x^3
z <- y-20
s <- z/3
t <- s*6
q <- s*y
x1 <- cbind(x,y,z,s,t,q)
x1 <- data.frame(x1)
我想提取y轴截距和线性回归的斜率来拟合数据，
x y z s t q
1 1 1 -19 -6.333333 -38 -6.333333
2 2 8 -12 -4.000000 -24 -
浏览 3提问于2014-01-24得票数 5
回答已采纳
很抱歉，这个例子不是很好，但它确实突出了这一点。
mtcars$tran <- factor(mtcars$am, labels=c("Man","Aut"))
ggplot(mtcars, aes(x=hp, y= mpg, group=tran)) + geom_smooth(aes(colour=tran))
ggplot(mtcars, aes(x=hp, y= mpg, group=tran)) + geom_point(aes(colour=tran))
ggplot(mtcars, aes(x=hp, y= mpg, group=tran)
浏览 4提问于2011-11-23得票数 12
回答已采纳
我想用LMS (Lambda)方法为我的数据创建百分位数曲线。我有下面的例子数据。如何用LMS绘制yvar (y轴上)与年龄(x轴上)的第10、50和90百分位数曲线？
age = sample(5:75, 500, replace=T)
yvar = rnorm(500, age, 20)
mydata = data.frame(age, yvar)
head(mydata)
age yvar
1 61 87.16011
2 58 49.73289
3 65 15.60212
4 71 83.32699
5 33 40.89592
6 18 25.04376
pl
浏览 3提问于2014-12-15得票数 1
回答已采纳
1回答
我想手动设置Y轴的范围。我想手动增加Y轴的30单位。我有以下代码：
library(scales)
library(ggplot2)
ggplot(mtcars,aes(x=wt,y=mpg)) +
geom_point() +
geom_smooth() +
scale_y_continuous(trans = ~.+30)
但是我得到了以下错误消息：
match.fun(f)中的错误：'c("~_trans“、". + 30_trans")‘不是函数、字符或符号
有人能帮我吗？
这就是我想要的情节：
浏览 0提问于2020-03-13得票数 0
我是R的新手，目前正在学习如何使用ggplot2绘图。我下载了一些新冠肺炎数据，我正在尝试创建一个曲线图，其中x轴是日期，y轴是案例。 Data frame 我的代码如下： data<- structure(list(date = structure(c(18344, 18343, 18341, 18340,
18339, 18338, 18337, 18336, 18333, 18331, 18330, 18329, 18328,
18325), class = "Date"), cases = c(69L, 71L, 36L, 91L, 92L, 57L, 48
浏览 32提问于2020-03-24得票数 0
3回答
如何在同一图上显示两条回归线？以下是两个模型：
data(mtcars)
a <- lm(mpg~wt+hp)
b <- lm(mpg~wt+hp+wt*hp)
我在x轴上绘制wt，在y轴上绘制mpg，并将hp绘制为颜色。这是以R为基数的：
cr <- colorRamp(c("yellow", "red"))
with(mtcars, {
plot(wt, mpg, col = rgb(cr(hp / max(hp)), max=255),
xlab="Weight", ylab="Miles per
浏览 7提问于2014-07-29得票数 1
我使用ggplot和geoms来显示我的数据，但是绘图侧边栏区域只显示一个灰色框，其中的x和y轴被正确标记。
这是输出图像：
构成情节的代码：
ggplot(Wc, aes(y = popsafe, x = rnground)) +
geom_jitter(aes(col = me)) +
geom_smooth(method = "lm", se = FALSE, col = "black")
浏览 0提问于2018-04-05得票数 1
回答已采纳
我正在使用ggplot2绘制两个已知为双曲线关系的变量。我想用geom_smooth添加一条拟合曲线。 geom_smooth(se = FALSE, method = "gam", formula = y ~ 1/x) 只是给了我一条直线。是否有可能强制geom_smooth绘制双曲线？ 最小可重现示例： n <- 100
x <- seq(n)
y <- rnorm(n, 50 + 30 * x^(-0.2), 1)
Data <- data.frame(x, y)
ggplot(data = Data,
aes(x = x, y
浏览 43提问于2021-08-27得票数 1
我是R& ggplot的相对新手。我正试图策划一场互动。当我用SPSS软件绘制交互作用时，回归线从y轴一直延伸到地块的相反边缘：
然而，当我使用graph时，回归线只会一直延伸到第一个和最后一个数据点，这会使图形看起来很奇怪。
有没有办法补救这个问题，让我的ggplot看起来更像SPSS的图表？
这是我正在使用的代码
No5Plot <- ggplot(data=pccdata, aes(x= factor2, y = pcc, color = Factor.1)) +
geom_point(size=1.2) +
theme_classic() +
浏览 2提问于2022-02-19得票数 3
回答已采纳
我想知道当我们使用bin参数时，stat_summary_bin函数是如何绑定的？ ggplot(df, aes(x=x,y=y)) +
stat_summary_bin(fun='mean', bins=100,
color='orange', size=2, geom='point') + geom_smooth(method='lm') + theme_minimal() 它是否将x-axis分割成相等的宽度？或者每个bin都有相同数量的观察值？ 我认为stat
浏览 55提问于2021-01-14得票数 1
1回答
ggplot2中的线性回归
、、、、
首先是我的数据： dput(df_TB_d[1:10,])
structure(list(Name = c("Baden-Württemberg", "Bayern", "Berlin",
"Brandenburg", "Bremen", "Hamburg", "Hessen", "Mecklenburg-Vorpommern",
"Niedersachsen", "Nordrhein-Westfalen"), Land = c(&
浏览 12提问于2020-11-27得票数 0
回答已采纳
我正在尝试基于y变量生成一个带有两个geom_line的geom_line。我的x轴是日期，y轴是从-5到5的情感，每一个日期我都得到几个情感值。我想看看这些日子里情绪是如何变化的。
我的数据看起来如下(每一行都是不同的人)：
这是我用来生成情节的代码：
ggplot(kernplot, aes(x=dates, y=Sentiment)) +
geom_line()+
scale_x_date(date_breaks = "1 day", date_labels = "%Y-%m-%d", limits = as.Date(c("2017-0
浏览 0提问于2018-01-03得票数 0
回答已采纳
2回答
我有一个包含列x、y和类型(A和B)的数据帧。我想以对数比例绘制x轴，然后以每种类型的拟合置信区间绘制数据的线性拟合。
df = structure(list(x = c(21.9247706844111, 22.5845455758455, 23.2842999484095, 24.0277818926186, 24.819223123522, 25.6634195847913, 26.565828729518, 27.5326876468961, 28.5711574392776, 29.6895009170119, 30.8973029400445, 32.205745844917
浏览 1提问于2018-09-28得票数 2
我有这样的数据帧：
frame <- data.frame("AGE" = seq(18,44,1),
"GROUP1"= c(83,101,159,185,212,276,330,293,330,356,370,325,264,274,214,229,227,154,132,121,83,69,57,32,16,17,8),
"GROUP2"= c(144,210,259,329,391,421,453,358,338,318,270,258,207,186,1
浏览 2提问于2016-05-19得票数 1
1回答
我首先使用的是geom_line，它返回我想要的输出。但是当使用带有曲线公式的geom_smooth时，每条线都是从不同的点开始的，这使得线之间的比较变得困难。我如何解决这个问题，让所有拟合的直线都从Y轴的底部开始？ 代码： ggplot(data = induction,
mapping = aes(x = time_min, y = A_state, color = treatment_p, shape = treatment_p))+
geom_smooth(method = "lm", formula = y ~ poly(x, 2))+
浏览 16提问于2020-12-09得票数 0
1回答
我正在做一个剂量-反应图，其中饮食摄入量(x轴)分为两个干预组(高蛋白和低蛋白)，y轴显示骨骼结果的变化。 "x" is defined from a variable in my dataset called "Protein", where the factor "1" is high protein and "2" is low protein 我想做一条线性回归线来显示摄入量和骨骼结果变化之间的联系，然而，由于正态分布的假设是不正确的，我想做两条单独的线-每组一条(高vs.低)-显示这种联系。 我使用了以下代码： abl
浏览 7提问于2020-09-15得票数 0
我试着用几个月作为x轴来绘制一个g图，但是我每天都有好几次，我需要按时间顺序排列时间。我已经尝试手动将空格和标签设置为月份号和名称，但现在x轴只是空白。我该怎么办？
month_nums <- seq(1, 12)
month_names <- month.abb
time_strs <- paste(moods$Month, moods$Day, moods$Year, moods$Hour, moods$Minute, sep=":")
timestamps <- as.POSIXct(time_strs, format = "%m:%d:
浏览 1提问于2022-07-23得票数 0
回答已采纳
3回答
我想要使用ggplot创建一个显示方法比较数据的散点图。图应具有原始数据、理想线和误差拟合线。图例应显示线型/线宽/线条颜色的理想线和贴合线。
我可以得到我想要的大部分东西，但传说中有以下问题：
图例为每一行类型显示2行，为什么？，如何修复？我更喜欢在图例矩形中没有粉红色的背景(如果我不指定填充颜色，则矩形背景变成默认的灰色，我不喜欢它)
样本代码：
set.seed(603)
x.raw=rnorm(n=30, mean=50, sd=20)
y.raw=x.raw+rnorm(n=30, mean=2, sd=2)
x.raw=round(x.raw, 2); y.raw=round(y.
浏览 3提问于2011-06-07得票数 6
1回答
我有一个数据集
，这就是我要做的，
b<- read.table("file_name.out")
EXP <- 2
names(b) <- paste("name_",1:30)
gg2 <- subset((aggregate(cbind(name_4)~name_1+name_2+name_3,b, FUN=mean)),(aggregate(cbind(name_4)~name_1+name_2+name_3,b, FUN=mean))$name_1 == c(1:EXP))
plot_exp <-
function(
浏览 2提问于2014-05-26得票数 0
回答已采纳
我对ggplot完全陌生，对R比较新鲜，我想用连接线来制作一个“前后”的散点图，来说明在特殊训练之前和之后不同子组的百分比的变化。我尝试过一些选择，但还没有：
分别显示每个单独的观察(现在相同的值是重叠的)
用线连接相关的前后测量值(x=0和X=1)，以更清楚地说明变化方向。
使用形状和颜色对类和id的数据进行子集
我怎样才能最好地使用ggplot (或其他)来创建一个满足上述要求的散点图？
主要选择: geom_point()
下面是一些使用genom_point的示例数据和示例代码
x <- c(0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,
浏览 0提问于2018-06-18得票数 0
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
实时音视频
即时通信 IM活动推荐
腾讯云开发者
