web-dev-qa-db-ja.com

複数のデータ列を含む1つの行に複数の行を組み合わせるR

同じ効果が異なる方法で測定されたデータセットがあり、それらの測定値を比較したい。私のデータセットは次のようになります：

Study     MType     ID     Insect     Mean     Sd     N
Alla      Fecundity  1      Aphid      .62      .7628  11
Alla      RGR        1      Aphid      -32.8    7.76   11
Ando      Survival   2      Bee        2.34     .67    8
Ando      RGR        2      Bee        4.56     .34    10
Ando      Fecundity  2      Bee        5.32     4.3    20

各行のMType、Mean、Sd、Nが保持されるように、ID番号で行を結合します（ただし、列を区別できるように列名を変更する必要があります）。

うまくいけば、最終的には次のようになります：

Study ID Insect Fecundity.mean Fecundity.Sd Fecundity.N RGR.mean RGR.Sd...etc

いくつかの困難：

  1. 約10種類のMTypeがあります
  2. 各ID番号は2〜4のMTypeを持っています

私はリシェイプとティディルをいじりましたが、どちらかでこれを行う方法を理解することができませんでした。助けてください！

rtidyrreshape2
4
birdoptera

ベースR経由でreshapeを使用できます。この投稿に従って、データをロングフォーマットからワイドフォーマットに変換したいとします。 ロングフォーマットからワイドフォーマットにデータを再形成する方法 。

データが_data.frame_ dにある場合：

reshape(d, idvar=c("ID", "Study", "Insect"), timevar = "MType", direction="wide")

結果：

_  Study ID Insect Mean.Fecundity Sd.Fecundity N.Fecundity Mean.RGR Sd.RGR N.RGR Mean.Survival Sd.Survival N.Survival
1  Alla  1  Aphid           0.62       0.7628          11   -32.80   7.76    11            NA          NA         NA
3  Ando  2    Bee           5.32       4.3000          20     4.56   0.34    10          2.34        0.67          8
_
4
tcash21

tidyrを使用してこれを行うことは、最初にgather()、次にspread()にする必要があるため、明白ではありません。

library(tidyverse)
example <- tribble(
~Study, ~MType, ~ID, ~Insect, ~Mean,   ~Sd,   ~N,
"Alla", "Fecundity",  1, "Aphid", .62, .7628,  11,
"Alla", "RGR",   1, "Aphid", -32.8,  7.76, 11,
"Ando", "Survival", 2, "Bee",   2.34,   .67,  8,
"Ando", "RGR",   2, "Bee",   4.56,   .34,  10,
"Ando", "Fecundity",  2, "Bee",   5.32,   4.3,  20)

gather(example, key = "Statistic", value = "value", Mean, Sd, N) %>%
  unite(col="MType.Statistic", MType, Statistic, sep = ".") %>% 
  spread(key = MType.Statistic, value=value)
#> # A tibble: 2 x 12
#>   Study    ID Insect Fecundity.Mean Fecundity.N Fecundity.Sd RGR.Mean
#> * <chr> <dbl> <chr>           <dbl>       <dbl>        <dbl>    <dbl>
#> 1 Alla   1.00 Aphid           0.620        11.0        0.763   -32.8 
#> 2 Ando   2.00 Bee             5.32         20.0        4.30      4.56
#> # ... with 5 more variables: RGR.N <dbl>, RGR.Sd <dbl>,
#> #   Survival.Mean <dbl>, Survival.N <dbl>, Survival.Sd <dbl>
3
atiretoo - reinstate monica