tapply

0熱

2答えて

Rの因子変数を '要約'したいので、どのレコードレベルでどの因子レベルが存在するのか分かります。 df <- data.frame(record= c("a","a","b","c","c","c"), species = c("COD", "SCE", "COD", "COD","SCE","QSC")) record species a COD a SCE

0熱

1答えて

複数の変数の少なくとも1

私は顧客とどのくらい彼らが費やしてきた情報を含むデータのセットを持っていると一致するtapplyを使用して、各顧客にのみonce.Example表示されます。 customer<-c("Andy","Bobby","Oscar","Oliver","Jane","Cathy","Emma","Chris") age<-c(25,34,20,36,23,35,34,22) category<-c

0熱

1答えて

tapply（）が適用されたときのRのデータフレームの元の数字の突然の変化

私はtapply（）をRで多用しましたが、tapply（）関数の後に大きさの順番が突然変わる理由はわかりません適用される。元のCSVデータを読み込むと、次のようになります。 Barcode Group Price 1002-01-23 A 10.23568975 1002-01-24 A 2356.25 1002-01-25 A 123.54897 1002-01-26

-3熱

2答えて

グループごとのカテゴリをグループ化する

現在、ローンの目的とローンごとに関連するローングレードが表示されたローンが表示されているデータセットを使用しています。データセットは、loancaseと別の列がグレードいる間にいずれかの列が目的であると呼ばれています。以下に、比率でペアワイズで塗りつぶすマトリックスがあります。各行は100％になるはずです。つまり、各エントリは、そのグレードを受け取ったその特定の目的の割合です。例えば、の行[カ

2熱

1答えて

集計（）を使用してNA値をカウントし、代替としてtapply（）を使用する方法

私はRに新しく、Rでの試験の準備を1週間で行うことを試みています。宿題に関する質問のうち、私は可能な限り多くの方法で1つの問題を解決しようとしています。時間制約の厳しいコーディング試験では、より多くのツールを用意するのが便利です。問題は次のとおりです。私のデータセットでは、「ckm_nodes.csv」変数適用日は医師は、医師がそれを処方し始めなかった場合は11月1953年から数えて、テト

1熱

2答えて

計算統計および/またはR

におけるデータフレームのサブセットにおける複数の列上の機能私はデータフレーム（次の形式のサンプル）を持っている： DateTime Ind1 Ind2 V1 V2 Ac1 Ac2 w1 w2 w3 shift 2016-05-01 00:01:00 U A 5 7 20 100 50 70 200 1 2016-05-01 00:01:20 U A 5 7 20 109 35 7

1熱

1答えて

R - 1つのベクターを条件別に2つの別個のベクターに分ける（症例/対照患者）

睡眠中の患者に由来するEEGを使用しています。私はC3-M2とC4-M1の平均値を必要とするので、私はベクトル作成 ID C3-M2 C4-M1 Disorder 12 347 325 Control 13 397 346 Bipolar 14 368 363 Control 15 370 379 Control 16 368 310 Bipolar ： fast_spin

0熱

1答えて

入力がデータフレームである私は、およそ次のようになります3列のデータ持っ

をベクトルでない-apply関数にforループの変換：各一意のIDに対して uid <- c(1,1,1,1,1,1,2,2,2) sale <- c(0,1,1,0,0,0,0,1,0) e <- as.data.frame(cbind(uid, sale)) e$uid <- as.factor(e$uid) e$sincesale <- NA を、私は同じ手順を適用したいです -

0熱

1答えて

NaNを使用した結果、計算手段が

であることを確認しましたが、同様の質問がありますが、単純なことを理解できません。私は異なる野球の位置の平均給与を計算しようとしています。 library(Lahman) library(tidyverse) data("Fielding") data(Salaries) # First, I need to merge two datasets merged.df <- merge(