Вы можете использовать sapply
для перебора каждого элемента вектора, содержащего значения для cyl
. Например:
sapply(c(1,2,4,5,6), function(x)
nrow(subset(mtcars, cyl == x & carb == 4)))
[1] 0 0 0 0 4
Я предполагаю, что вы просто использовали mtcars
в качестве примера данных, поскольку единственными значениями для cyl
в этом наборе данных являются 4, 6, 8 и только cyl = 6, carb = 4
возвращает значения> 0.
Now each of the smaller files needs a subset of the #includes that were at the top of the long file.
Я делаю это с помощью VisualAssistX. Сначала скомпилируйте файл, чтобы увидеть, чего не хватает. Затем вы можете использовать функцию добавления включения VisualAssistX. Поэтому я просто щелкаю правой кнопкой мыши по функциям или классам, которые, как я знаю, нуждаются во включении, и нажимаю «Добавить включение». Перекомпилируйте пару раз, чтобы отфильтровать новые пропущенные включения, и все готово. Надеюсь, я написал это по понятным причинам:)
Не идеально, но быстрее, чем делать это вручную.