У меня есть несколько графиков, для которых я создаю линейные модели geom_line, однако я хочу провести geom_line через (0,0) и не могу понять, как это сделать.
Я использую ggplot на фрейме данных, а затем использую geom_line для создания двух линейных корреляций для двух выборок в фрейме данных. С помощью следующего кода
ggplot(df_test,aes(x=xval, y=yval)) +
geom_point(aes(color = Samples)) +
scale_color_manual(values = c("Sample1" = 'black','Sample2'='red')) +
geom_smooth(data=df_test[df_test$Samples == "Sample1",],
method=lm,color="black",formula= (y~poly(x,1)),se=F) +
geom_smooth(data=df_test[df_test$Samples == "Sample2",],
method=lm,color="red",formula= (y~poly(x,1)),se=F) +
geom_text(aes(label=Chromosome,color=Samples),hjust=0.2, vjust=-0.5) +
labs (y="yval") +
labs(x="xval") +
theme_bw()
, который дает следующее изображение 
В идеале черная линия должна проходить через (0,0)
И я пытался использовать что-то похожее на Заставить начало координат начинаться с 0
scale_x_continuous(breaks = seq(0, 12, 1)
scale_x_continuous(expand = c(0, 0)) + scale_y_continuous(expand = c(0, 0))
Но это не работает. Это возможно с ggplot? Если да, может кто-нибудь помочь с этой проблемой? Большое спасибо