私の問題の簡略版：
A、B、Cの3つのサイトにまたがる60個のサンプルポイント（それぞれにさまざまなOTUの存在量を持つ）を持つOTUテーブルがあります。各サイトには20個のサンプルがあります。
A、B、C の各サイトの希薄化曲線をプロットしたいと思います。各サイトから「十分な」シーケンスがサンプリングされたかどうかを確認するために、サイトの曲線が安定しているかどうかを確認したいと思います。
現時点では、私はこれをやっています：
raremax <- min(rowSums(otu.table))
rarecurve(otu.table, sample = raremax)
現在、すべてのサンプル ポイントが個々の曲線としてプロットされています。これは私が望んでいるものではありません。各サンプリング サイトの全体的な曲線をプロットしたいと考えています。