適用して名前をキープ

Question

I持っているような名前のベクトル：私は手動で値を変更した場合

data 
     req_ID effort satisfaction 
    1  r01  1   62 
    2  r02  4   55 
    3  r03  2   29 
    4  r04  3   41 

が、それは名前を保つ

mochila 

r01 r02 r03 r04 
0 0 0 0 

そして、データフレーム

mochila[1] <- 1 
mochila 

r01 r02 r03 r04 
    1 0 0 0 

しかし、例えば、私がこのように適用すると、

myfun<- function(x){ 
    return(1) 
} 

mochila <- apply(data,1,myfun) 

結果：

mochila 

[1] 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 

私は、すべての名前の位置を失った名前を保つためにいくつかの方法はありますか？

Answer 1

mochila[] <- exprが有効です。

?Extractから：

空のインデックスは、すべての値を選択します。これは、ほとんどの場合、すべてのエントリを置き換えますがattributesを維持するために使用されます。