有条件地将向量乘以另一个r [英] conditionally multiply a vector by another r

问题描述

我有以下向量

trans<- c(-2,3,10,-5,-2,56,0)

我想将每个元素乘以两个向量，具体取决于初始数是正数还是负数

and I want to multiply each element by a choice of two vectors depending on whether the initial number is positive or negative

negtrans<-c(1,2,3)
postrans<-c(4,5,6,7)

结果应如下所示
-2
12
50
-10
-6
336
0

the result should look like this -2 12 50 -10 -6 336 0

关键是保持订单完整

推荐答案

一种方法是

unsplit(Map(`*`, split(trans, trans>=0), 
               list(negtrans, postrans)),trans>=0)
#[1]  -2  12  50 -10  -6 336   0

这篇关于有条件地将向量乘以另一个r的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！