Differences

This shows you the differences between two versions of the page.

--- interaction_effects_in_regression_analysis [2023/06/14 08:54] – [Two continuous variables] hkimscil
+++ interaction_effects_in_regression_analysis [2025/06/16 13:00] (current) – [E.g.2] hkimscil
@@ Line 96: / Line 96: @@
 ====== Two category variables ======
-<code>> set.seed(12)
+<code>
+> set.seed(12)
 > f1<-gl(n=2,k=30,labels=c("Low","High"))
 > f2<-as.factor(rep(c("A","B","C"),times=20))
@@ Line 272: / Line 273: @@
   - f1High:f2C : 질소가 High이고 온도도 High인 상태 -1.16 감소한다.
-<code>interact_plot(mod2, pred = "f1", modx = "f2")</code>
+<code>
-{{:r:interaction.effects.2.jpeg}}
+> interact_plot(mod2, pred = "f1", modx = "f2")
+</code>
+{{:pasted:20250616-072703.png?400}}
+<code>
+> interact_plot(mod2, pred = "f2", modx = "f1")
+</code>
+{{:pasted:20250616-072946.png?400}}
+:r:interaction.effects.2.jpeg
 ====== Two continuous variables ======
 <code># third case interaction between two continuous variables
@@ Line 412: / Line 420: @@
 ====== E.g.2  ======
 {{:r:states.rds}}
-Download the data file to c:/Rstatistics first. Then
+<code>
-do
+# states.data <- readRDS("c:/Rstatistics/dataSets/states.rds")
-<code>states.data <- readRDS("c:/Rstatistics/dataSets/states.rds") </code>
+states.data <- readRDS(url("http://commres.net/wiki/_media/r/states.rds"))
+</code>
 Or, read the above data file directly
@@ Line 462: / Line 471: @@
 </code>
 <code>
-> data.info <- data.frame(attributes(data)[c("names", "var.labels")])
+> data.info <- data.frame(attributes(states.data)[c("names", "var.labels")])
 > # attributes(data) reveals various attributes of the data file,
 > # which contains variable names and labels.