r - r のカテゴリ変数に基づく線形回帰

Question

さまざまな r リソースを調べましたが、問題の明確な解決策が見つかりません。これが他の場所で回答されている場合、正しい方向へのポインターが役立ちます。次のデータセットを使用します。

    tmp <- c(35,35,35,35,35,36,36,36,36,36)
    experiment <- factor(tmp)
    rpm <- c(10,20,40,80,120,10,20,40,80,120)
    x <- c(678,1889,3416,8916,17917,665,1385,3377,8551,16793)
    test <- data.frame(experiment,rpm,x)

x に対して rpm で lm を使用した線形回帰など、回帰を実行したいと思います。

    lm(x ~ rpm)

したがって、この例では、実験 35 用と実験 36 用の 2 つの回帰があります。コード？

Answer 1

ありますplyr：

library(plyr)
dlply(test, .(experiment), function(df) with(df, lm(x ~ rpm)))