Функция MapThread из Mathematica в R

Question

из Mathematica Я начал использовать R. В Mathematica есть функция MapThread. Элементы из разных списков подключаются к функции. Вот небольшой пример:

MapThread[#1*#2 &, {{1, 2, 3}, {4, 5, 6}}]

Возвращает:

{4, 10, 18}

мне было интересно, если есть идентичные функции в R.

Answer 1

You мог бы использовать mapply для этого:

mapply('*', c(1,2,3), c(4,5,6)) 
[1] 4 10 18 

Первый аргумент - это функция, которая будет применяться по-разному по следующим аргументам (в этом случае умножение *). Тогда вторым аргументом является первый вектор, а третий аргумент - второй вектор (на чьи элементы будет применена функция).

Вы можете увидеть больше примеров и прочитать об этом, если вы наберете ?mapply на консоли.

Answer 2

Если по какой-то странной причине вы можете сделать очевидным, например, c(1,2,3) * c(4,5,6), do.call будет более эффективным, чем mapply: do.call("*", list(c(1,2,3), c(4,5,6)))

Я думаю, что это эквивалент того, что делает ваш код Mathematica.