R中每個類別的線性回歸

Question

我有一個超級簡單的數據集，有 3 列，只有第一列是 id，它是一個 6 位數字，重復第二列是天，它是 14 天內的天數（有些天數缺失）第三列是視圖，它的數量從某一天從某個 id 收集的視圖。

我想知道是否有辦法對每個 id 進行回歸？

謝謝！

Answer 1

這是一個快速的玩具示例，將 lapply 應用於 iris 數據集並為因子變量的每個級別估計不同的回歸。

results <- lapply(levels(iris$Species), function(id)
                   lm(Sepal.Length ~ Sepal.Width, iris[iris$Species == id, ]))
names(results) <- levels(iris$Species)
summary(results[["virginica"]])

上面推薦的by方法更簡潔

results2 <- by(iris, iris$Species,
   function(x) lm(Sepal.Length ~ Sepal.Width, data = x))
summary(results2[["virginica"]])