Как извлечь и использовать ИСТИННЫЕ ответы одной функции в другой - PullRequest
0 голосов
/ 31 марта 2019

Мне нужно создать функцию (y), где y - это указанное число, кратное трем.Например, если 3 введено как y, то должны быть напечатаны 3, 6 и 9.Мой мыслительный процесс состоял в том, чтобы иметь функцию (x) с оператором if, чтобы определить, является ли число кратным трем или нет, и затем использовать оператор which в ИСТИННЫХ ответах в функции (x) в функции (y)

Это моя функция (x):

f <- function(x) { if (any(x %% 3== 0)) { TRUE } else { FALSE } }

Функция (y) будет в той же строке, что и оператор, где 3 - это первое отображаемое число, а затем до числа, указанного в трехкратных числах, равных трем.используя ИСТИННЫЙ ответ в функции (x), он напечатает каждый ответ и остановится, как только он достигнет указанного числа.Я просто не очень уверен, как выполнить мой мыслительный процесс или есть ли лучший способ сделать это?

1 Ответ

0 голосов
/ 31 марта 2019

Если вы заинтересованы в изучении functions, есть много документации. В вашем случае вы можете просто использовать функцию seq, например:

number <- 3
multiples <- 3
seq(number, number*multiples, number)
[1] 3 6 9
...