Q&A性別によって心疾患の罹患割合が違うデータを作成したいとする
r
1n <- 100 2id <- 1:n 3sex <- rbinom(n,1,0.6) 4X <- data.frame(id,sex) 5riskA <- 0.20 6riskB <- 0.05 7X$card <- ifelse(X$sex==1,rbinom(1,1,riskA),rbinom(1,1,riskB)) 8summary(X$card)
とすると、なぜか全てゼロになります。
なぜでしょうか？
どうすれば作成できるのでしょうか？
回答1件
0
自己解決
rbinom(1,1,riskA) ではなく rbinom(n,1,riskA) のようにすると
うまくいきました。
お騒がせしました
投稿2019/04/04 07:34
総合スコア13
あなたの回答
tips
プレビュー
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。