二項式線性模型擬合問題

我是一個學生,正在為學校的一個項目工作,給我的示例代碼有一條數據集的線性模型線(藍色)。同時,當我用數據運行完全相同的代碼時,它會給我兩條藍線,而不是我想要的對角線。我不知道我做錯了什么/我的數據和示例數據集之間的區別是什么。任何幫助都將不勝感激!

Example code:

drunkdoor <- read_csv("https://uoepsy.github.io/data/drunkdoor.csv")
head(drunkdoor)
ggplot(drunkdoor, aes(x=age, y=notice)) + geom_point()+geom_smooth(method = "lm", se = FALSE, fullrange = TRUE) + xlim(30, 80)

My code:

data1 <- read_csv('https://uoepsy.github.io/data/dapr2_2021_nullsit_data.csv')
head(data1)
ggplot(data1, aes(x = z_test, y = intervention1)) + geom_point() + geom_smoot(method = "lm)

? 最佳回答:

不同之處在于,在示例圖中,它們使用的是y的數值,而您使用的是字符值。解決這個問題的一種方法是指定“group”值,以便ggplot知道哪些點集應該在同一條線上。如果在aes()中使用group=1,它將知道將所有點分組在一起并繪制一條線(而不是為每個字符值繪制一條線)

ggplot(data1, aes(x = z_test, y = intervention1, group=1)) + 
  geom_point() + 
  geom_smooth(method = "lm")

或者,可以將值更改為數值

ggplot(data1, aes(x = z_test, y = ifelse(intervention1=="control",0,1))) + 
  geom_point() + 
  geom_smooth(method = "lm")

請注意,這兩條線是不同的,因為它在y軸上以不同的順序放置值。你需要決定是在上面“控制”還是在下面“控制”。

主站蜘蛛池模板: 国产婷婷色一区二区三区深爱网 | 日本一区二区三区精品国产 | 伊人久久精品一区二区三区| 国产福利电影一区二区三区久久老子无码午夜伦不 | 国产精品免费大片一区二区| 亚洲片国产一区一级在线观看| 亚洲一区二区三区首页| 在线日韩麻豆一区| 69福利视频一区二区| 久久精品国产一区二区| 中文字幕精品一区二区2021年| 亚洲午夜福利AV一区二区无码| 国产一国产一区秋霞在线观看 | 丰满岳妇乱一区二区三区| 国产经典一区二区三区蜜芽 | 中文字幕日韩人妻不卡一区 | 丰满岳乱妇一区二区三区| 海角国精产品一区一区三区糖心 | 久久亚洲AV午夜福利精品一区| 亚洲爽爽一区二区三区| 日韩美一区二区三区| 亲子乱av一区区三区40岁| 国产经典一区二区三区蜜芽| 高清国产AV一区二区三区| 免费一区二区三区| 中文字幕精品无码一区二区三区| 国产不卡视频一区二区三区| 精品视频在线观看一区二区| 日本一区二区三区四区视频| 精品国产免费观看一区| 国产精品一区二区AV麻豆| 日美欧韩一区二去三区| 精品人妻一区二区三区四区在线| 国内精品视频一区二区三区| 日本韩国一区二区三区| 精品视频一区二区三区在线播放| 国产suv精品一区二区6| 亚洲国产激情一区二区三区| 97久久精品午夜一区二区| 亚洲永久无码3D动漫一区| 日韩精品区一区二区三VR|