r - ネストされた条件を使用して data.frame 内の行のランダム サンプルを抽出する

Answer 1

dplyr を使用:

library(dplyr)
set.seed(12)
filter(iris, Species != "setosa") %>% sample_n(., 2) 

出力：

   Sepal.Length Sepal.Width Petal.Length Petal.Width    Species
7           6.3         3.3          4.7         1.6 versicolor
81          7.4         2.8          6.1         1.9  virginica

Answer 2

クリーンでシンプルなデータ テーブル アプローチ:

require(data.table)
iris <- data.table(iris)
cond <- iris[Species!= 'setosa', which = T]
iris[sample(cond, 2)]

Answer 3

1行でやらない方がすっきりしますが、

iris[iris$Species != "setosa",][sample(nrow(iris[iris$Species != "setosa",]), 2), ]