Есть ли встроенная функция или оператор, чтобы сделать следующее в R:
ElementwiseMultiply <- function ( a_, b_ )
{
c_ = a_ ;
for ( i in 1:ncol(a_) )
{
c_[,i] = ( a_[,i] * b_ ) ;
}
return ( c_ );
}
Например
> a_
[,1] [,2]
[1,] 1 4
[2,] 2 3
[3,] 3 2
> b_
[,1]
[1,] 2
[2,] -1
[3,] 1
> ElementwiseMultiply ( a_, b_ )
[,1] [,2]
[1,] 2 8
[2,] -2 -3
[3,] 3 2
