R语言按一定比例赋值

r语言 y是10x30的矩阵，总共300个数，有165个负值，怎么将其中的120个负值设为0，也就是设为0的比例为40%